Changeset 382
- Timestamp:
- 05/04/2011 04:25:21 PM (11 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
SH_SHM/trunk/command/EPI_DIST.SHC
r16 r382 18 18 call statloc ^station("cnt) &slat &slon 19 19 call locdiff "slat "slon #1 #2 &dist &azim 20 set/file "cnt distance "dist21 set/file "cnt azimuth "azim22 set/file "cnt lat #123 set/file "cnt lon #220 set/file/mod "cnt distance "dist 21 set/file/mod "cnt azimuth "azim 22 set/file/mod "cnt lat #1 23 set/file/mod "cnt lon #2 24 24 calc/fmt=<%4.2@f> r &dist = "dist 25 25 echo set station ^station("cnt) distance "dist deg, azimuth "azim deg
Note: See TracChangeset
for help on using the changeset viewer.