A(
L #stat2_real
L #input_sz_real
+R
T #stat2_real
AN OV
SAVE
CLR
A BR
)
JNB _001
L #stat1_int
L 1
+I
T #stat1_int
A(
L #stat1_int
L 100
==I
)
JNB _002
L #stat2_real
L 1.000000e+002
/R
T #output_real
AN OV
SAVE
CLR
_002: A BR
= L 0.0
A L 0.0
JNB _003
L 0
T #stat1_int
_003: NOP 0
A L 0.0
JNB _004
L 0.000000e+000
T #stat2_real
_004: NOP 0