ClrMemory: ?→C: ln( 1 - 4C2 : Fix 2: Rnd(√( - Ans - 8 + √( Ans2 -

9Ans + 64→M: Ans→Y: Fix 4: Lbl 0: B→A: 1 ÷ (1 + . 231642M:

Rnd( . 5 - E - 7√( e^( - M2 ) ) ( 1274148Ans - 1422484Ans2 +

7107069Ans3 - 7265760Ans2 2 + 5307027Ans^( 5→B: D=0→D:

Ans =>  . 01 - . 02(B>C M+ =>Goto 0: Norm 1: Y + (Y - M)(C - A) ÷ (A - B

ClrMemory: ?→C: Lbl 0: Fix 2: Rnd( M→M: B→A: M→Y:

Lbl 1: 1 ÷ (1 + . 231642M: . 5 - E - 7√( e^( - M2 ) )(1274148Ans

- 1422484Ans2 + 7107069Ans3 -7265760Ans2 2 + 5307027Ans^( 5→B:

X=0 => √( 2π )√( e^( M2 ) )(B - CM- => M→A: Ans => Goto 1:

X=0→X: Ans => Goto 0: Fix 4: Rnd( B→B: . 01M+:

B>C => .02M-: D=0→D: Ans => Goto 0: Norm 1:

M + (M - Y)(C - A) ÷ (A - B

ClrMemory: ?→C: . 5 - C: √( ln( Ans2 -1: Fix 2: Rnd( Ans - (2515517 +

802853Ans + 10328Ans2) ÷ ( E 6 + 1432788Ans + 189269Ans2 +

1308Ans3→M: Lbl 0: B→A: M→Y: Fix 4: 1 ÷ (1 + . 231642M:

Rnd( . 5 - E - 7√( e^( - M2 ) ) ( 1274148Ans - 1422484Ans2 + 7107069Ans3

- 7265760Ans2 2 + 5307027Ans^( 5→B: . 01M+: B>C => . 02M-:

D=0→D: Ans => Goto 0: Norm 1: M + (M - Y)(C - A) ÷ (A - B