00 { 37-Byte Prgm } 01▸LBL "E1" 02 MVAR "X" 03 MVAR "Y" 04 MVAR "Z" 05 2 06 RCL "X" 07 3 08 Y↑X 09 × 10 RCL+ "Y" 11 7 12 RCL× "Z" 13 + 14 96 15 - 16 END 00 { 40-Byte Prgm } 01▸LBL "E2" 02 MVAR "X" 03 MVAR "Y" 04 MVAR "Z" 05 3 06 RCL× "X" 07 6 08 RCL "Y" 09 3 10 Y↑X 11 × 12 + 13 2 14 RCL× "Z" 15 - 16 65 17 - 18 END 00 { 41-Byte Prgm } 01▸LBL "E3" 02 MVAR "X" 03 MVAR "Y" 04 MVAR "Z" 05 -6 06 RCL× "X" 07 4 08 RCL× "Y" 09 + 10 2 11 RCL "Z" 12 3 13 Y↑X 14 × 15 + 16 42 17 - 18 END 00 { 89-Byte Prgm } 01▸LBL "TEST" 02 1 03 STO "X" 04 2 05 STO "Y" 06 3 07 STO "Z" 08 3 09 1 10 NEWMAT 11 ENTER 12 EDIT 13 "E1" 14 ASTO ST X 15 → 16 "E2" 17 ASTO ST X 18 → 19 "E3" 20 ASTO ST X 21 EXITALL 22 X<>Y 23 EDIT 24 "X" 25 ASTO ST X 26 → 27 "Y" 28 ASTO ST X 29 → 30 "Z" 31 ASTO ST X 32 EXITALL 33 1ᴇ-7 34 1ᴇ-7 35 XEQ "SES" 36 END