From: Guido Kanschat <dr.guido.kanschat@gmail.com>
Date: Mon, 28 May 2001 11:28:04 +0000 (+0000)
Subject: delete even smaller values
X-Git-Tag: v8.0.0~19059
X-Git-Url: https://gitweb.dealii.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=71c1ceda36e873742afdad676595888a572a28ef;p=dealii.git

delete even smaller values


git-svn-id: https://svn.dealii.org/trunk@4735 0785d39b-7218-0410-832d-ea1e28bc413d
---

diff --git a/deal.II/common/scripts/normalize.pl b/deal.II/common/scripts/normalize.pl
index f229720041..01c31a35ae 100644
--- a/deal.II/common/scripts/normalize.pl
+++ b/deal.II/common/scripts/normalize.pl
@@ -31,7 +31,7 @@ s/line <\d+> of file <.*\//file </;
 
 # Make small exponentials zero
 
-s/-?\d\.\d+e-1\d+/0.00/g;
+s/-?\d?\.\d+e-[123456789]\d+/0.00/g;
 
 # All doubles have two decimals
 #s/(\.\d\d)\d+/\1/g;