Test Statistic functions (Page 21 .. 22 of original manual)

Expected Output

1.316956719=1.316956
719
   ok!
1.407885953=1.407885
953
   ok!
53.375=53.375
   ok!
8=8
   ok!
427=427
   ok!
22805=22805
   ok!
70=70
   ok!
137.7142857=137.7142
857
   ok!
18.42898069=18.42898
069
   ok!

Program

PROGRAM LIST

*** P0
AC SAC 55 XD 54 XD 5
1 XD 55 XD 53 XD 53
XD 54 XD 52 XD σn -
1.316956719
GSBP9
σn_1 - 1.407885953
GSBP9
x ̅ - 53.375
GSBP9
MR09 - 8
GSBP9
MR08 - 427
GSBP9
MR07 - 22805
GSBP9

       ···82 steps

*** P9
“#=” RND0 X↔Y “;#”
SAVE invEXE RND0 =
x=0 GOTO0
“   diff=#”
GOTO1
LBL0
“   ok!”
LBL1
SAVE invEXE
       ···41 steps

*** P1
AC SAC 110 × 10 XD 1
30 × 31 XD 150 × 24
XD 170 XD XD 190 XD
XD XD MR09 - 70
GSBP9
x ̅ - 137.7142857
GSBP9
σn_1 - 18.42898069
GSBP9

       ···68 steps