# STACK
SX: 45950
SY: 2.345
SZ: 1
ST: 1.25345460548105192300650643755816
SL: 1.5711484480016595215046328308671

# REGS
RA: 1012340
RB: 2.345
RC: 45950
RF: 5032921.210448703503622753014274646
RL: 0.00001
RP: 5
RS: 1.E-27
RV: 44.72135954999579392818347337462553
RX: 316.227766016837933199889354443272

# FLAGS

# MODE
MTRIG: DEG
MFMT: FIX 6

# EQUATION LIST
EQNPTR: 5
EQN
 X = -20 \mul; LOG( ( S - 1 ) \div; ( S + 1 ) )
 P = V ^ 2 \div; 400
 S = ( 1 + SQRT( R \div; F ) ) \div; ( 1 - SQRT( R \div; F ) )
 X = -10 \mul; LOG( R \div; F )
 X = 2 \mul; \pi; \mul; F \mul; L
 F = 1 \div; ( 2 \mul; \pi; \mul; SQRT( L \mul; C ) )
 X = 1 \div; ( 2 \mul; \pi; \mul; F \mul; C )
EQNEND

# PROGRAM
PTR: 10
PGM
  LBL A
  0
  STO C
  1.01234E6
  STO A
  2.345
  STO B
  LBL B
  RCL B
  RCL A
  \mul;
  RCL B
  -
  RCL A
  \div;
  RCL B
  \mul;
  3.5
  \div;
  SQRT
  1
  STO+ C
  GTO B
  RTN
PGMEND