Changeset 191

Timestamp:

02/02/2010 04:10:30 PM (13 years ago)

Author:

marcus

Message:

r110 | svn | 2010-01-28 22:21:20 +0100 (Do, 28 Jan 2010) | 1 line

added checks for teleseismic depths in check_evt (depth 33 if no depth phases); new stations HAN7-9; added locations for I26H6-8

Location:

SH_SHM/trunk

Files:

• inputs/LocalSensitivities.dat (modified) (1 diff)
• inputs/LocalStatinf.dat (modified) (1 diff)
• inputs/STATINF.DAT (modified) (1 diff)
• util/check_evt.c (modified) (3 diffs)

SH_SHM/trunk/inputs/LocalSensitivities.dat

@@ -99 +99 @@
 ! zunächst Test der Datenübertragung mit Funkrouter, 500 Hz
 ! Der Austausch des LE3D-5s durch LE3Dlite ändert nichts an der Sensitivity
+han7-dh-?   16-jan-2010_12:00  ...                 3.9725
+han8-dh-?   16-jan-2010_12:00  ...                 3.9725
+han9-dh-?   16-jan-2010_12:00  ...                 3.9725
 
 stf1-hh-?   ...                ...                 1.0593

SH_SHM/trunk/inputs/LocalStatinf.dat

@@ -16 +16 @@
 HAN5   lat: 52.40488    lon: 9.81988   elevation: 54.7
 HAN6   lat: 52.437677   lon: 9.810629  elevation: 55.9
+HAN7   lat: 52.38411    lon: 9.872315  elevation: 50
+HAN8   lat: 52.39212    lon: 9.76544   elevation: 46
+HAN9   lat: 52.43997    lon: 9.854335  elevation: 62
 
 

SH_SHM/trunk/inputs/STATINF.DAT

@@ -99 +99 @@
 I26H4  lat:48.838572    lon:13.715775  elevation:1084.5  array:77 xrel:-0.172296   yrel:-0.837338   name:I26DE
 I26H5  lat:48.844298    lon:13.701987  elevation:1172.4  array:77 xrel:-1.173748   yrel:-0.184504   name:I26DE
+I26H6  lat:48.847854    lon:13.710707  elevation:1090.4
+I26H7  lat:48.846178    lon:13.713941  elevation:1098.5
+I26H8  lat:48.844365    lon:13.712018  elevation:1073.6
 IGAH1  lat:53.2579    lon:8.6890  elevation:40.0  array:81 xrel:0.0      yrel:0.0      name:IGADE
 IGAH2  lat:53.2596    lon:8.6963  elevation:38.0  array:81 xrel:0.4856   yrel:0.1890   name:IGADE

SH_SHM/trunk/util/check_evt.c

@@ -69 +69 @@
 static BOOLEAN efv_ms_found=FALSE;        /* ms determination done */
 static BOOLEAN efv_mbb_found=FALSE;       /* mbb determination done */
+static BOOLEAN efv_depth_phase_found=FALSE;/* depth phase found? */
 static int     efv_subtype=EVTYPE_UNDEF;  /* event type */
 static EvEventTypeT efv_evtype=EvcEventTypeUndefined; /* event type */
@@ -204 +205 @@
         if  (is_pkp_phase)
                 efv_foundTele = TRUE;
+
+        /* is it a depth phase ? */
+        if (event->phase[0] == 'p' || event->phase[0] == 's')
+                efv_depth_phase_found = TRUE;
+        /* or from foreign source */
+        if (event->source[0] != '\0' && (strcmp(event->source,"BGR") != 0)
+                && (strcmp(event->source,"SZGRF") != 0))
+                efv_depth_phase_found = TRUE;  /* assume that the other source has one*/
 
     /* is this a leftover from an amplitude measurement? */
@@ -493 +502 @@
                 fprintf( out, "F026 %s: depth %5.1f for teleseismic event\n",
                         expl, efv_depth );
+        if  (efv_evtype == EvcEventTypeTeleQuake && !efv_depth_phase_found
+                && ((efv_depth-33.0) > 0.01))
+                fprintf( out, "F037 %s: depth %5.1f for teleseismic event without depth phases\n",
+                        expl, efv_depth );
         if  ((efv_evtype == EvcEventTypeLocalQuake
                 || efv_evtype == EvcEventTypeRegioQuake) && (efv_depth < 2.0))