06-11-2014, 04:07 PM
For no input the programme returns two normal deviates for average 0 and standard deviation 1:
1 LBL T
2 XEQ T021
3 x<>y
4 XEQ T021
5 R↑
6 +
7 1
8 x<=y?
9 GTO T002
10 R↓
11 ENTER
12 LN
13 x<>y
14 ÷
15 -2
16 *
17 SQRTx
18 REGZ*REGX
19 REGZ*REGY
20 RTN
21 RANDOM
22 2
23 *
24 1
25 -
26 ENTER
27 x^2
28 RTN
Edit: Sorry, this should be in General Software.
1 LBL T
2 XEQ T021
3 x<>y
4 XEQ T021
5 R↑
6 +
7 1
8 x<=y?
9 GTO T002
10 R↓
11 ENTER
12 LN
13 x<>y
14 ÷
15 -2
16 *
17 SQRTx
18 REGZ*REGX
19 REGZ*REGY
20 RTN
21 RANDOM
22 2
23 *
24 1
25 -
26 ENTER
27 x^2
28 RTN
Edit: Sorry, this should be in General Software.