Changeset 85 for SH_SHM/trunk/util

Timestamp:

12/03/2008 02:37:21 PM (14 years ago)

Author:

marcus

Message:

r67 | svn | 2008-12-03 11:19:53 +0100 (Mi, 03 Dez 2008) | 1 line

check for small depths on teleseismic events

File:

• SH_SHM/trunk/util/check_evt.c (modified) (1 diff)

SH_SHM/trunk/util/check_evt.c

@@ -414 +414 @@
                 fprintf( out, "F023 %s: depth %5.1f given for blast\n",
                         efv_infile, efv_depth );
+        if  (efv_evtype = EvcEventTypeTeleQuake && (efv_depth < 10.0))
+                fprintf( out, "F026 %s: depth %5.1f for teleseismic event\n",
+                        efv_infile, efv_depth );
         if  (efv_evtype == EvcEventTypeUndefined)
                 fprintf( out, "F024 %s: no event type specified\n", efv_infile );