Changeset 40 for SH_SHM/trunk/command
- Timestamp:
- 10/30/2008 10:44:49 PM (14 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
SH_SHM/trunk/command/ROTAZ.SHC
r16 r40 10 10 default 1 2,3 trace list (N,E) 11 11 default 2 0 azimuth 12 default 3 ;; lowdw 13 default 4 ;; hiwdw 12 14 13 15 sdef negaz ! negative azimuth … … 16 18 nr 17 19 calc r &negaz = 0 - #2 /fmt=<%3.1@f> 18 rot #1 "negaz 20 rot #1 "negaz #3 #4 19 21 calc i &trcno = "trcno + 1 20 22 set "trcno comp r
Note: See TracChangeset
for help on using the changeset viewer.