;"A(U*U*UPROGNCONDSTATUSNOFEATURENOLDMSGTERPRIMSGFILESPRINCPNPUTU*UjuQUOTE;Loading GRAPHT pSETQxDEFPROPU:U*UT+INTERNAL-STRING-MARKER xALPHALESSPLISPV2071PUTPROPGRAPHTU*U.UVERSIONPUSHLAMBDAXORFILE-EXIT-FUNCTIONS           xGETGRAPHSU*UjULOADLISTCARNAMELISTFASLOAD xANDFEATURECOMPLRU:UjuSPECIALTEK-PRINTMODExBOUNDPxTEK-GRAPHMODExu*U*UxTEK-STREAMVIEWPORTGRAPHIC-OUTPUTSET-PENNARG-ERRORTEK-SET-PENMOVE-PENU*U*UTEK-MOVE-PENVECTOR-PENTEK-VECTOR-PENDRAW-POINTDRAW-LINEPRINT-TEXTU*U*PTEK-PRINT-TEXTTYOTEK-TYOBOUNDARIESWHICH-OPERATIONSUNKNOWN-COMMANDLSUBR-00@,8 Z(-,-,bZ Z -,Z( ,80B+ g1N+ & $ g1  Z(Z(+O0B+ g1N+ & $ g  (Z(Z(+O0B+ g1N+"`` & $ g Z(Z(  +O0B+% g1N+! & $ g4! Z(Z( $ "  +O0B+. g1N+) & $ g00 Z(Z( Z(E Z(+O0B+4 g1N+2 &  $ g Z( +O0B!(@+; g1N+9 & $ g 0 (Z(!+O0B"+H  .  ,< .  ,< .   ,< . -, -, $p-,0@ $w-, $w-,/  +O0B"+N g1N+M & $# gD00!zpj"QH+OZ( $#/,0 :P/+$+TYOSUBR,8B"  . (3O+X  $   .  Q ,[,8,8g,8",<!` /,x%Q,8  . (3O d+b  $  .  Q ,e,8,8g,8",</,x%\PTEKOUT A.p(N} A0 A2p(R}@,< A. ,< . ( ,< . ( ,< . (,<,<,< w}3Nw~+z.. ,< "p$   . w| Q/ w2Nw~+} p@3Nw+ w..0 ,< "p$   . w Q/ p3Nw+ ..d ,< "p$  . w Q/0@ w}.. ,< "p$  .H  w} Q/ ",xX%f,<  @ ,< $  .  Q $w "p %  .,\ Q  .,\ Q ,  ",x0%,<,<  . (3O d+'  $  .  ,<2 . ,< $p "w%  . 2 Q/ $p "w%  . w@0 Q  .,\ Q "/,xX@ @%,<,<  . (3O+; H $  .  ,< . d,< $p "w%  .  Q/1   . (.w ,< . ( .w,< $p "w%  . w Qd  .,\ Q/ "/jU ,xP%.FIXNUM*ARRAYMAKE-TEK-STREAM,8 ,L,8 0,8,8U,8V",<',8 .  Q ` . 0 Q ` . 0 Q@@0,X,X-, $ "-,,x"/`&&x%H;