PROG
224
001: 32 25 11 : g LBL a
002: 35 71 01 : h F? 1
003: 22 00    : GTO 0
004: 35 51 01 : h SF 1
005: 03       : 3
006: 35 22    : h RTN
007: 31 25 00 : f LBL 0
008: 02       : 2
009: 35 61 01 : h CF 1
010: 35 22    : h RTN
011: 32 25 12 : g LBL b
012: 35 71 00 : h F? 0
013: 22 00    : GTO 0
014: 35 51 00 : h SF 0
015: 01       : 1
016: 35 22    : h RTN
017: 31 25 00 : f LBL 0
018: 35 61 00 : h CF 0
019: 00       : 0
020: 35 22    : h RTN
021: 31 25 14 : f LBL D
022: 33 07    : STO 7
023: 01       : 1
024: 22 00    : GTO 0
025: 31 25 15 : f LBL E
026: 33 08    : STO 8
027: 02       : 2
028: 31 25 00 : f LBL 0
029: 35 51 02 : h SF 2
030: 31 22 05 : f GSB 5
031: 22 24    : GTO (i)
032: 31 25 01 : f LBL 1
033: 33 09    : STO 9
034: 35 53    : h Rv
035: 33 11    : STO A
036: 35 53    : h Rv
037: 33 12    : STO B
038: 01       : 1
039: 35 22    : h RTN
040: 31 25 02 : f LBL 2
041: 33 13    : STO C
042: 35 53    : h Rv
043: 33 14    : STO D
044: 35 53    : h Rv
045: 33 15    : STO E
046: 02       : 2
047: 35 22    : h RTN
048: 32 25 14 : g LBL d
049: 00       : 0
050: 31 25 05 : f LBL 5
051: 35 33    : h STI
052: 35 54    : h R^
053: 35 71 01 : h F? 1
054: 22 00    : GTO 0
055: 44       : CLx
056: 01       : 1
057: 32 62    : g SIN-1
058: 31 25 00 : f LBL 0
059: 35 53    : h Rv
060: 44       : CLx
061: 35 34    : h RCI
062: 35 53    : h Rv
063: 35 71 00 : h F? 0
064: 31 84    : f -x-
065: 35 52    : h x<->y
066: 01       : 1
067: 31 72    : f R<-P
068: 35 54    : h R^
069: 35 54    : h R^
070: 31 72    : f R<-P
071: 35 52    : h x<->y
072: 35 54    : h R^
073: 35 52    : h x<->y
074: 71       : x
075: 35 82    : h LSTx
076: 35 54    : h R^
077: 71       : x
078: 22 02    : GTO 2
079: 32 25 15 : g LBL e
080: 35 53    : h Rv
081: 35 53    : h Rv
082: 35 71 01 : h F? 1
083: 22 00    : GTO 0
084: 44       : CLx
085: 31 25 00 : f LBL 0
086: 35 53    : h Rv
087: 44       : CLx
088: 35 53    : h Rv
089: 35 71 00 : h F? 0
090: 31 84    : f -x-
091: 31 25 06 : f LBL 6
092: 32 72    : g R->P
093: 35 52    : h x<->y
094: 31 71    : f x<0
095: 31 22 03 : f GSB 3
096: 35 53    : h Rv
097: 35 52    : h x<->y
098: 35 71 01 : h F? 1
099: 22 00    : GTO 0
100: 44       : CLx
101: 31 25 00 : f LBL 0
102: 32 72    : g R->P
103: 35 54    : h R^
104: 35 52    : h x<->y
105: 31 25 02 : f LBL 2
106: 35 54    : h R^
107: 44       : CLx
108: 35 53    : h Rv
109: 35 71 02 : h F? 2
110: 35 22    : h RTN
111: 35 71 00 : h F? 0
112: 31 84    : f -x-
113: 35 22    : h RTN
114: 31 25 03 : f LBL 3
115: 01       : 1
116: 42       : CHS
117: 32 63    : g COS-1
118: 61       : +
119: 35 82    : h LSTx
120: 61       : +
121: 35 22    : h RTN
122: 31 25 11 : f LBL A
123: 34 12    : RCL B
124: 34 15    : RCL E
125: 61       : +
126: 34 14    : RCL D
127: 34 11    : RCL A
128: 61       : +
129: 34 13    : RCL C
130: 34 09    : RCL 9
131: 61       : +
132: 35 51 02 : h SF 2
133: 31 22 06 : f GSB 6
134: 32 84    : g STK
135: 35 22    : h RTN
136: 31 25 12 : f LBL B
137: 34 09    : RCL 9
138: 34 14    : RCL D
139: 71       : x
140: 34 11    : RCL A
141: 34 13    : RCL C
142: 71       : x
143: 51       : -
144: 34 12    : RCL B
145: 34 13    : RCL C
146: 71       : x
147: 34 09    : RCL 9
148: 34 15    : RCL E
149: 71       : x
150: 51       : -
151: 34 12    : RCL B
152: 34 14    : RCL D
153: 71       : x
154: 35 33    : h STI
155: 44       : CLx
156: 34 11    : RCL A
157: 34 15    : RCL E
158: 71       : x
159: 35 34    : h RCI
160: 51       : -
161: 32 72    : g R->P
162: 35 52    : h x<->y
163: 31 71    : f x<0
164: 31 22 03 : f GSB 3
165: 35 53    : h Rv
166: 35 52    : h x<->y
167: 32 72    : g R->P
168: 35 54    : h R^
169: 35 52    : h x<->y
170: 35 54    : h R^
171: 44       : CLx
172: 35 53    : h Rv
173: 32 84    : g STK
174: 35 22    : h RTN
175: 31 25 13 : f LBL C
176: 35 84    : h SPACE
177: 34 07    : RCL 7
178: 34 08    : RCL 8
179: 71       : x
180: 35 62    : h 1/x
181: 34 09    : RCL 9
182: 34 13    : RCL C
183: 71       : x
184: 34 11    : RCL A
185: 34 14    : RCL D
186: 71       : x
187: 61       : +
188: 34 12    : RCL B
189: 34 15    : RCL E
190: 71       : x
191: 61       : +
192: 31 84    : f -x-
193: 71       : x
194: 35 82    : h LSTx
195: 35 52    : h x<->y
196: 32 63    : g COS-1
197: 31 84    : f -x-
198: 35 22    : h RTN
199: 84       : R/S
200: 84       : R/S
201: 84       : R/S
202: 84       : R/S
203: 84       : R/S
204: 84       : R/S
205: 84       : R/S
206: 84       : R/S
207: 84       : R/S
208: 84       : R/S
209: 84       : R/S
210: 84       : R/S
211: 84       : R/S
212: 84       : R/S
213: 84       : R/S
214: 84       : R/S
215: 84       : R/S
216: 84       : R/S
217: 84       : R/S
218: 84       : R/S
219: 84       : R/S
220: 84       : R/S
221: 84       : R/S
222: 84       : R/S
223: 84       : R/S
224: 84       : R/S
DATA
26
01: 0
02: 0
03: 0
04: 0
05: 0
06: 0
07: 0
08: 0
09: 0
10: 0
11: 0
12: 0
13: 0
14: 0
15: 0
16: 0
17: 0
18: 0
19: 0
20: 0
21: 0
22: 0
23: 0
24: 0
25: 0
26: 0
STATE
7
DEG
FIX
2
0
0
0
0
HELP
29
f A     Select 2D or 3D vectors.
f B     Pause input mode
f d     Convert to Cartesian
f e     Convert to Spherical

D       Vector 1
E       Vector 2

A       Add vectors
B       Cross product
C       Dot product

Use North as y axis, East as x axis, Up as z axis.
θ is azimuth: degrees CCW from East (from the x axis).
Φ is declination: degrees from straight up (90° = ground level).

1. Optional. Select 2D (default) or 3D. f [A]. In 2D you can skip Φ values.
2. Optional. Select Print/Pause input mode.
3. For 2D mode.
3a. Optional. y↑x, f [E] to get θ↑r.
3b. Store v1. θ↑r, [D].
3c. Optional. y↑x, f [E] to get θ↑r.
3d. Store v2. θ↑r, [E].
3e. Add vectors. [A]. get θ↑r.
3f. Calc cross product. [B]. get θ↑r.
3g. Calc dot product. [C]. get r↑γ.
3h. Optional. θ↑r, f [D] to get y↑x.
4. For 3D mode. As above but enter z before y↑x or Φ before θ↑r. Outputs Φ↑θ↑r or z↑y↑x.

CARD
11
Title: SD-08A Vector Operations
A: V1+V2
B: V1xV2
C: V1.V2
D: V1Φ↑θ↑r
E: V2Φ↑θ↑r
a: 3D/2D?
b: P?
c: 
d: S&rArr;C
e: C&rArr;S
END