| 1 | command CALL <subfunction> <p1> <p2> ... <pN> |
|---|
| 2 | ============ |
|---|
| 3 | |
|---|
| 4 | key: special utilities |
|---|
| 5 | ! version 2, 6-May-92 |
|---|
| 6 | |
|---|
| 7 | Special utilities for the user. The action depends on the <subfunction> |
|---|
| 8 | keyword. |
|---|
| 9 | |
|---|
| 10 | |
|---|
| 11 | parameters |
|---|
| 12 | ---------- |
|---|
| 13 | |
|---|
| 14 | <subfunction> --- parameter type: string |
|---|
| 15 | Subfunction of utility. Possible values are: |
|---|
| 16 | |
|---|
| 17 | slowness computes slowness in sec/deg for an event at <p2> deg |
|---|
| 18 | distance and depth <p3> km. Uses travel time table set with |
|---|
| 19 | command FCT TT_TABLE <table-file>. |
|---|
| 20 | <p1> -- string: phase (valid P or S) |
|---|
| 21 | <p2> -- real: distance station -- event in degrees |
|---|
| 22 | <p3> -- real: depth of event in km |
|---|
| 23 | <p4> -- symbol address: output variable (slowness) |
|---|
| 24 | |
|---|
| 25 | travel computes travel time in sec for an event at <p2> deg |
|---|
| 26 | distance and depth <p3> km. Uses travel time table set with |
|---|
| 27 | command "fct tt_table <table-file>". |
|---|
| 28 | <p1> -- string: phase (valid P or S) |
|---|
| 29 | <p2> -- real: distance station -- event in degrees |
|---|
| 30 | <p3> -- real: depth of event in km |
|---|
| 31 | <p4> -- symbol address: output variable (travel time in sec) |
|---|
| 32 | |
|---|
| 33 | locdiff computes difference of two locations given in latitude |
|---|
| 34 | and longitude (in deg). |
|---|
| 35 | <p1> -- real: latitude of first location (in deg) |
|---|
| 36 | <p2> -- real: longitude of first location (in deg) |
|---|
| 37 | <p3> -- real: latitude of second location (in deg) |
|---|
| 38 | <p4> -- real: longitude of second location (in deg) |
|---|
| 39 | <p5> -- symbol address: output variable (distance in deg) |
|---|
| 40 | <p6> -- symbol address: output variable (azimuth) |
|---|
| 41 | |
|---|
| 42 | locadd adds a distance vector of a specified length and direction |
|---|
| 43 | to a given location |
|---|
| 44 | <p1> -- real: latitude of input location (in deg) |
|---|
| 45 | <p2> -- real: longitude of input location (in deg) |
|---|
| 46 | <p3> -- real: length of distance vector (in deg) |
|---|
| 47 | <p4> -- real: direction of distance vector (in deg) |
|---|
| 48 | <p5> -- symbol address: output variable (new latitude in deg) |
|---|
| 49 | <p6> -- symbol address: output variable (new longitude in deg) |
|---|
| 50 | |
|---|
| 51 | phasediff computes difference travel times of various phases |
|---|
| 52 | generated at a discontinuity. |
|---|
| 53 | <p1> -- string: phase; valid: S-P, Ppp-P, Pps-p, XS-P |
|---|
| 54 | <p2> -- real: conversion depth in km |
|---|
| 55 | <p3> -- real: slowness in (sec/deg) |
|---|
| 56 | <p4> -- symbol address: output variable (time in sec) |
|---|
| 57 | |
|---|
| 58 | inci computes theoretical angle of incidence of P |
|---|
| 59 | <p1> -- real: distance in deg |
|---|
| 60 | <p2> -- real: depth in km |
|---|
| 61 | <p3> -- symbol address output variable (angle in deg) |
|---|
| 62 | |
|---|
| 63 | random generates uniform random number within a given interval. |
|---|
| 64 | <p1> -- real: lo bound of interval |
|---|
| 65 | <p2> -- real: hi bound of interval |
|---|
| 66 | <p3> -- symbol address: output variable (random number) |
|---|
| 67 | |
|---|
| 68 | grandom generates normally distributed random number. |
|---|
| 69 | <p1> -- real: center of gaussian |
|---|
| 70 | <p2> -- real: half-width of gaussian |
|---|
| 71 | <p3> -- symbol address: output variable (random number) |
|---|
| 72 | |
|---|
| 73 | |
|---|
| 74 | example |
|---|
| 75 | ------- |
|---|
| 76 | |
|---|
| 77 | call slowness p ^distance(2) ^depth(2) &slo |
|---|
| 78 | computes P-slowness of second trace on display and stores result |
|---|
| 79 | in variable "slo". |
|---|
| 80 | |
|---|
