(LAP RTLIN SUBR) 
	(PUSH P 1.) 
	(PUSH P 2.) 
	(PUSH P 3.) 
	(PUSH P (C 0. 0. (QUOTE NIL) 0.)) 
	(PUSH P (C 0. 0. (QUOTE NIL) 0.)) 
	(PUSH P (C 0. 0. (QUOTE NIL) 0.)) 
	(PUSH P (C 0. 0. (QUOTE NIL) 0.)) 
	(PUSH P (C 0. 0. (QUOTE NIL) 0.)) 
	(PUSH P (C 0. 0. (QUOTE NIL) 0.)) 
	(PUSH P (C 0. 0. (QUOTE NIL) 0.)) 
	(PUSH P (C 0. 0. (QUOTE NIL) 0.)) 
	(PUSH P (C 0. 0. (QUOTE NIL) 0.)) 
	(PUSH P (C 0. 0. (QUOTE NIL) 0.)) 
	(JUMPN 3. TAG15) 
	(MOVEI 1. (QUOTE T)) 
	(JRST 0. TAG11) 
TAG15 	(HLRZ@ 1. -11. P) 
	(HLRZ@ 1. 1.) 
	(MOVEM 1. -4. P) 
	(HLRZ@ 1. -11. P) 
	(HRRZ@ 1. 1.) 
	(MOVEM 1. -5. P) 
	(MOVE 1. -4. P) 
	(CALL 1. (E NODE)) 
	(MOVEM 1. 0. P) 
	(MOVE 1. -5. P) 
	(CALL 1. (E NODE)) 
	(MOVEI 2. (QUOTE 20.)) 
	(MOVEM 1. -1. P) 
	(MOVE 1. -4. P) 
	(CALL 2. (E *PLUS)) 
	(CALL 1. (E NODE)) 
	(MOVEI 2. (QUOTE 20.)) 
	(MOVEM 1. -2. P) 
	(MOVE 1. -5. P) 
	(CALL 2. (E *PLUS)) 
	(CALL 1. (E NODE)) 
	(MOVE 4. 1.) 
	(MOVE 3. -2. P) 
	(MOVE 2. -1. P) 
	(MOVEM 1. -3. P) 
	(MOVE 1. 0. P) 
	(CALL 4. (E SLOPE)) 
	(MOVE 4. -3. P) 
	(MOVE 3. -2. P) 
	(MOVE 2. -1. P) 
	(MOVEM 1. -7. P) 
	(MOVE 1. 0. P) 
	(CALL 4. (E YINTCP)) 
	(MOVEM 1. -8. P) 
	(PUSH P (C 0. 0. (QUOTE T) 0.)) 
	(PUSH P -11. P) 
TAG1 	(MOVE 1. 0. P) 
	(JUMPE 1. TAG10) 
	(HLRZ@ 1. 1.) 
	(MOVE 2. 1.) 
	(MOVEM 1. -8. P) 
	(MOVE 1. -13. P) 
	(CALL 2. (E CONCT)) 
	(MOVEM 1. -11. P) 
	(HLRZ@ 1. -8. P) 
	(HLRZ@ 1. 1.) 
	(MOVEM 1. -6. P) 
	(HLRZ@ 1. -8. P) 
	(HRRZ@ 1. 1.) 
	(MOVEM 1. -7. P) 
	(MOVE 1. -6. P) 
	(CALL 1. (E NODE)) 
	(PUSH P 1.) 
	(MOVE 1. -8. P) 
	(CALL 1. (E NODE)) 
	(MOVEI 2. (QUOTE 20.)) 
	(PUSH P 1.) 
	(MOVE 1. -8. P) 
	(CALL 2. (E *PLUS)) 
	(CALL 1. (E NODE)) 
	(MOVEI 2. (QUOTE 20.)) 
	(PUSH P 1.) 
	(MOVE 1. -10. P) 
	(CALL 2. (E *PLUS)) 
	(CALL 1. (E NODE)) 
	(PUSH P 1.) 
	(MOVE 4. 1.) 
	(MOVE 3. -1. P) 
	(MOVE 2. -2. P) 
	(MOVE 1. -3. P) 
	(CALL 4. (E SLOPE)) 
	(HRRZ@ 2. 1.) 
	(PUSH P 1.) 
	(HLRZ@ 1. -14. P) 
	(CALL 2. (E *TIMES)) 
	(HRRZ@ 2. -14. P) 
	(PUSH P (C 0. 0. (QUOTE NIL) 0.)) 
	(PUSH P (C 0. 0. (QUOTE NIL) 0.)) 
	(PUSH P 1.) 
	(HLRZ@ 1. -3. P) 
	(CALL 2. (E *TIMES)) 
	(MOVE 2. 1.) 
	(POP P 1.) 
	(CALL 2. (E *DIF)) 
	(MOVEM 1. 0. P) 
	(CAIN 1. (QUOTE 0.)) 
	(JRST 0. TAG4) 
	(MOVE 1. -18. P) 
	(JUMPE 1. TAG25) 
	(MOVEI 1. (QUOTE T)) 
	(JRST 0. TAG21) 
TAG25 	(MOVE 1. -21. P) 
	(JUMPE 1. TAG26) 
	(MOVEI 1. (QUOTE T)) 
	(JRST 0. TAG21) 
TAG26 	(MOVE 2. -9. P) 
	(MOVE 1. -10. P) 
	(CALL 2. (E *DIF)) 
	(MOVE 2. -6. P) 
	(PUSH P 1.) 
	(MOVE 1. -6. P) 
	(CALL 2. (E *DIF)) 
	(MOVE 2. -6. P) 
	(PUSH P 1.) 
	(MOVE 1. -6. P) 
	(CALL 2. (E *TIMES)) 
	(MOVE 2. -5. P) 
	(PUSH P 1.) 
	(MOVE 1. -9. P) 
	(CALL 2. (E *TIMES)) 
	(MOVE 2. 1.) 
	(POP P 1.) 
	(CALL 2. (E *DIF)) 
	(MOVE 2. -1. P) 
	(CALL 2. (E *TIMES)) 
	(MOVE 2. -12. P) 
	(PUSH P 1.) 
	(MOVE 1. -14. P) 
	(CALL 2. (E *TIMES)) 
	(MOVE 2. -15. P) 
	(PUSH P 1.) 
	(MOVE 1. -13. P) 
	(CALL 2. (E *TIMES)) 
	(MOVE 2. 1.) 
	(POP P 1.) 
	(CALL 2. (E *DIF)) 
	(MOVE 2. -1. P) 
	(CALL 2. (E *TIMES)) 
	(MOVE 2. 1.) 
	(POP P 1.) 
	(CALL 2. (E *DIF)) 
	(MOVE 2. -13. P) 
	(PUSH P 1.) 
	(MOVE 1. -15. P) 
	(CALL 2. (E *DIF)) 
	(MOVE 2. -1. P) 
	(CALL 2. (E *TIMES)) 
	(MOVE 2. -7. P) 
	(PUSH P 1.) 
	(MOVE 1. -7. P) 
	(CALL 2. (E *DIF)) 
	(MOVE 2. -3. P) 
	(CALL 2. (E *TIMES)) 
	(MOVE 2. 1.) 
	(POP P 1.) 
	(CALL 2. (E *DIF)) 
	(POP P 2.) 
	(CALL 2. (E XCONS)) 
	(SUB P (C 0. 0. 2. 2.)) 
	(MOVEM 1. 0. P) 
	(MOVE 1. -9. P) 
	(CAMN 1. -10. P) 
	(JRST 0. TAG3) 
	(MOVE 1. -6. P) 
	(CAMN 1. -5. P) 
	(JRST 0. TAG2) 
	(MOVE 3. -5. P) 
	(MOVE 2. -6. P) 
	(MOVE 1. 0. P) 
	(CALL 3. (E CLCINTA)) 
	(JUMPE 1. TAG34) 
	(MOVE 3. -10. P) 
	(MOVE 2. -9. P) 
	(MOVE 1. 0. P) 
	(CALL 3. (E CLCINTA)) 
	(JUMPN 1. TAG33) 
TAG34 	(TDZA 1. 1.) 
TAG33 	(MOVEI 1. (QUOTE T)) 
	(JRST 0. TAG21) 
TAG31 
TAG2 	(MOVE 3. -10. P) 
	(MOVE 2. -9. P) 
	(MOVE 1. 0. P) 
	(CALL 3. (E CLCINTA)) 
	(JUMPE 1. TAG36) 
	(MOVEI 1. (QUOTE T)) 
	(JRST 0. TAG21) 
TAG36 	(MOVE 2. -11. P) 
	(MOVE 1. -12. P) 
	(CALL 2. (E *DIF)) 
	(MOVE 2. -4. P) 
	(PUSH P 1.) 
	(MOVE 1. -4. P) 
	(CALL 2. (E *DIF)) 
	(MOVE 2. -4. P) 
	(PUSH P 1.) 
	(MOVE 1. -8. P) 
	(CALL 2. (E *TIMES)) 
	(MOVE 2. -7. P) 
	(PUSH P 1.) 
	(MOVE 1. -7. P) 
	(CALL 2. (E *TIMES)) 
	(MOVE 2. 1.) 
	(POP P 1.) 
	(CALL 2. (E *DIF)) 
	(MOVE 2. -1. P) 
	(CALL 2. (E *TIMES)) 
	(MOVE 2. -14. P) 
	(PUSH P 1.) 
	(MOVE 1. -12. P) 
	(CALL 2. (E *TIMES)) 
	(MOVE 2. -13. P) 
	(PUSH P 1.) 
	(MOVE 1. -15. P) 
	(CALL 2. (E *TIMES)) 
	(MOVE 2. 1.) 
	(POP P 1.) 
	(CALL 2. (E *DIF)) 
	(MOVE 2. -1. P) 
	(CALL 2. (E *TIMES)) 
	(MOVE 2. 1.) 
	(POP P 1.) 
	(CALL 2. (E *DIF)) 
	(MOVE 2. -11. P) 
	(PUSH P 1.) 
	(MOVE 1. -13. P) 
	(CALL 2. (E *DIF)) 
	(MOVE 2. -1. P) 
	(CALL 2. (E *TIMES)) 
	(MOVE 2. -9. P) 
	(PUSH P 1.) 
	(MOVE 1. -9. P) 
	(CALL 2. (E *DIF)) 
	(MOVE 2. -3. P) 
	(CALL 2. (E *TIMES)) 
	(MOVE 2. 1.) 
	(POP P 1.) 
	(CALL 2. (E *DIF)) 
	(POP P 2.) 
	(CALL 2. (E XCONS)) 
	(SUB P (C 0. 0. 2. 2.)) 
	(MOVEM 1. 0. P) 
	(MOVE 3. -3. P) 
	(MOVE 2. -4. P) 
	(CALL 3. (E CLCINTA)) 
	(JRST 0. TAG21) 
TAG3 	(MOVE 3. -5. P) 
	(MOVE 2. -6. P) 
	(MOVE 1. 0. P) 
	(CALL 3. (E CLCINTA)) 
	(JUMPE 1. TAG41) 
	(MOVEI 1. (QUOTE T)) 
	(JRST 0. TAG21) 
TAG41 	(MOVE 2. -11. P) 
	(MOVE 1. -12. P) 
	(CALL 2. (E *DIF)) 
	(MOVE 2. -4. P) 
	(PUSH P 1.) 
	(MOVE 1. -4. P) 
	(CALL 2. (E *DIF)) 
	(MOVE 2. -4. P) 
	(PUSH P 1.) 
	(MOVE 1. -8. P) 
	(CALL 2. (E *TIMES)) 
	(MOVE 2. -7. P) 
	(PUSH P 1.) 
	(MOVE 1. -7. P) 
	(CALL 2. (E *TIMES)) 
	(MOVE 2. 1.) 
	(POP P 1.) 
	(CALL 2. (E *DIF)) 
	(MOVE 2. -1. P) 
	(CALL 2. (E *TIMES)) 
	(MOVE 2. -14. P) 
	(PUSH P 1.) 
	(MOVE 1. -12. P) 
	(CALL 2. (E *TIMES)) 
	(MOVE 2. -13. P) 
	(PUSH P 1.) 
	(MOVE 1. -15. P) 
	(CALL 2. (E *TIMES)) 
	(MOVE 2. 1.) 
	(POP P 1.) 
	(CALL 2. (E *DIF)) 
	(MOVE 2. -1. P) 
	(CALL 2. (E *TIMES)) 
	(MOVE 2. 1.) 
	(POP P 1.) 
	(CALL 2. (E *DIF)) 
	(MOVE 2. -11. P) 
	(PUSH P 1.) 
	(MOVE 1. -13. P) 
	(CALL 2. (E *DIF)) 
	(MOVE 2. -1. P) 
	(CALL 2. (E *TIMES)) 
	(MOVE 2. -9. P) 
	(PUSH P 1.) 
	(MOVE 1. -9. P) 
	(CALL 2. (E *DIF)) 
	(MOVE 2. -3. P) 
	(CALL 2. (E *TIMES)) 
	(MOVE 2. 1.) 
	(POP P 1.) 
	(CALL 2. (E *DIF)) 
	(POP P 2.) 
	(CALL 2. (E XCONS)) 
	(SUB P (C 0. 0. 2. 2.)) 
	(MOVEM 1. 0. P) 
	(MOVE 3. -12. P) 
	(MOVE 2. -11. P) 
	(CALL 3. (E CLCINTA)) 
	(JRST 0. TAG21) 
TAG4 	(MOVE 4. -3. P) 
	(MOVE 3. -4. P) 
	(MOVE 2. -5. P) 
	(MOVE 1. -6. P) 
	(CALL 4. (E YINTCP)) 
	(HRRZ@ 2. 1.) 
	(MOVEM 1. -1. P) 
	(HLRZ@ 1. -17. P) 
	(CALL 2. (E *TIMES)) 
	(HRRZ@ 2. -17. P) 
	(PUSH P 1.) 
	(HLRZ@ 1. -2. P) 
	(CALL 2. (E *TIMES)) 
	(MOVE 2. 1.) 
	(POP P 1.) 
	(CALL 2. (E *DIF)) 
	(MOVEM 1. 0. P) 
	(CAIE 1. (QUOTE 0.)) 
	(JRST 0. TAG47) 
	(HRRZ@ 1. -17. P) 
	(CAIE 1. (QUOTE 0.)) 
	(JRST 0. TAG46) 
	(HRRZ@ 1. -1. P) 
	(CAIE 1. (QUOTE 0.)) 
	(JRST 0. TAG46) 
	(MOVE 1. -9. P) 
	(CAMN 1. -6. P) 
	(JRST 0. TAG46) 
TAG47 	(MOVEI 1. (QUOTE T)) 
	(JRST 0. TAG21) 
TAG46 	(MOVE 1. -9. P) 
	(CAME 1. -10. P) 
	(JRST 0. TAG50) 
	(MOVE 2. -12. P) 
	(MOVE 1. -11. P) 
	(CALL 2. (E MIN)) 
	(MOVE 2. -3. P) 
	(PUSH P 1.) 
	(MOVE 1. -5. P) 
	(CALL 2. (E MAX)) 
	(MOVE 2. 1.) 
	(POP P 1.) 
	(CALL 2. (E GEQ)) 
	(JUMPN 1. TAG51) 
	(MOVE 2. -3. P) 
	(MOVE 1. -4. P) 
	(CALL 2. (E MIN)) 
	(MOVE 2. -12. P) 
	(PUSH P 1.) 
	(MOVE 1. -12. P) 
	(CALL 2. (E MAX)) 
	(MOVE 2. 1.) 
	(POP P 1.) 
	(CALL 2. (E GEQ)) 
	(JUMPN 1. TAG51) 
	(TDZA 1. 1.) 
TAG51 	(MOVEI 1. (QUOTE T)) 
	(JRST 0. TAG49) 
TAG50 	(MOVE 2. -10. P) 
	(MOVE 1. -9. P) 
	(CALL 2. (E MIN)) 
	(MOVE 2. -5. P) 
	(PUSH P 1.) 
	(MOVE 1. -7. P) 
	(CALL 2. (E MAX)) 
	(MOVE 2. 1.) 
	(POP P 1.) 
	(CALL 2. (E GEQ)) 
	(JUMPN 1. TAG55) 
	(MOVE 2. -5. P) 
	(MOVE 1. -6. P) 
	(CALL 2. (E MIN)) 
	(MOVE 2. -10. P) 
	(PUSH P 1.) 
	(MOVE 1. -10. P) 
	(CALL 2. (E MAX)) 
	(MOVE 2. 1.) 
	(POP P 1.) 
	(CALL 2. (E GEQ)) 
	(JUMPN 1. TAG55) 
	(TDZA 1. 1.) 
TAG55 	(MOVEI 1. (QUOTE T)) 
TAG53 
TAG49 
TAG21 	(MOVEM 1. -8. P) 
	(SUB P (C 0. 0. 7. 7.)) 
	(JUMPE 1. TAG17) 
TAG5 
TAG6 
TAG7 
TAG8 
TAG9 	(HRRZ@ 1. 0. P) 
	(MOVEM 1. 0. P) 
	(JRST 0. TAG1) 
TAG10 	(MOVE 1. -1. P) 
	(JRST 0. TAG16) 
TAG17 	(MOVEI 1. (QUOTE NIL)) 
TAG16 	(SUB P (C 0. 0. 2. 2.)) 
TAG11 	(SUB P (C 0. 0. 13. 13.)) 
	(POPJ P) 
	NIL