Changeset 201 for SH_SHM/trunk

Timestamp:

03/30/2010 02:19:10 PM (14 years ago)

Author:

marcus

Message:

r118 | klaus | 2010-03-29 20:56:05 +0200 (Mo, 29 Mär 2010) | 1 line

check for origin time from 1970 was not active

File:

• SH_SHM/trunk/util/check_evt.c (modified) (2 diffs)

SH_SHM/trunk/util/check_evt.c

@@ -75 +75 @@
 static float   efv_magn=0.0;              /* max. magnitude found */
 static int     efv_pkp_count=0;           /* number of PKP phases */
-static BOOLEAN efv_illegal_origin;        /* illegal origin time */
+static BOOLEAN efv_illegal_origin=FALSE;  /* illegal origin time */
 static BOOLEAN efv_foundPg=FALSE;         /* Pg phase found */
 static BOOLEAN efv_foundPnSn=FALSE;       /* Pn/Sn found */
@@ -550 +550 @@
         } /*endif*/
 
-} /* end of EfFInalCheck */
+        if  (efv_illegal_origin)
+                fprintf( out, "F038 %s: check year of origin time (1970?)\n", expl );
+
+
+} /* end of EfFinalCheck */