% VAX-11 Librarian V04-00 ѐ~ ѐ!f   PASTDRAW_BOX r DRAW_FRAME GET_TERMMENUMENU11'301.AST01 4-Nov-1987 15:18 4-Nov-1987 15:18VAX FORTRAN V4.7-271  AST$P9+)7+)8 AST P   $QPH [ FOR$TIME_T_DS  FOR$WRITE_SF FOR$IO_T_DS FOR$IO_END LIB$PUT_SCREEN FOR$WRITE_SF FOR$IO_T_DS FOR$IO_END HAST FOR$TIME_T_DSLIB$PUT_SCREE N_$CODE$PDATA@$LOCAL FOR$IO_END FOR$IO_T_DS FOR$WRITE_SF_ww13013DRAW_BOX01 4-Nov-1987 15:18 4-Nov-1987 15:18VAX FORTRAN V4.7-271DRAW_BOXP+)7)(0)[1m)[5;50H+lqqqqqqqqqqqqqqqqqqqqqk+)[6;50Hx)[6;58H) ))[6;72Hx+)[7;50Htqqqqqqqqqqqqqqqqqqqqqu+)[8;50Hx S M T W T F S x+)[9;50HtqqqqqqqqqqqqqqqqqqqqquPASTDRAW_BOX r DRAW_FRAME GET_TERMMENUMENU1+)[10;50Hx)[10;72Hx+)[11;50Hx)[11;72Hx+)[12;50Hx)[12;72Hx+)[13;50Hx)[13;72Hx+)[14;50Hx)[14;72Hx+)[15;50Hx)[15;72Hx+)[16;50Hmqqqqqqqqqqqqqqqqqqqqqj+)[10;H+ +)[;51H+)[5;7m)[0;1m +)[0m)(B)8DRAW_BOX\P01dLPTQ`P|HH[Ѽ1$ SYS$ASCTIM<8 FOR$READ_IFk FOR$IO_L_RkR FOR$IO_END@ FOR$JDATE PPP ЫS ׫ PP P QQPPP P&PPPQQQPPT FOR$WRITE_SF FOR$IO_T_DS FOR$IO_T_DS FOR$IO_T_DS FOR$IO_T_DS FOR$IO_END  FOR$WRITE_SF FOR$IO_END> FOR$WRITE_SF FOR$IO_T_DS FOR$IO_T_DSTP FOR$IO_T_DS<8 FOR$IO_T_DS FOR$IO_T_DS FOR$IO_ENDe FOR$WRI TE_SF FOR$IO_T_DS FOR$IO_END FOR$WRITE_SF FOR$IO_T_DS FOR$IO_END FOR$WRITE_SF FOR$IO_T_DS FOR$IO_END FOR$WRITE_SF FOR$IO_T_DS FOR$IO_T_DS FOR$IO_END FOR$WRITE_SF FOR$IO_T_DS FOR$IO_T_DS FOR$IO_END  FOR$WRITE_SF FOR$IO_T_DS FOR$IO_T_DS FOR$IO_END% FOR$WRITE_SF FOR$IO_T_DS FOR$IO_T_DS FOR$IO_E ND@ FOR$WRITE_SF FOR$IO_T_DS FOR$IO_T_DS FOR$IO_END[ FOR$WRITE_SF FOR$IO_T_DS FOR$IO_T_DS FOR$IO_ENDv FOR$WRITE_SF FOR$IO_T_DS FOR$IO_ENDTPP3PU V FOR$WRITE_SF FOR$IO_T_DSU FOR$IO_L_V FOR$IO_ENDCSUS1UR FOR$WRITE_SF FOR$IO_T_DSU FOR$IO_L_V FOR$IO_T_DS FOR$IO_END FOR$WRITE_SFU FOR$IO_L_V FOR$IO_ENDTTTV FOR$WRITE_SF FOR$IO_T_DSV FOR$IO_L_V FOR$IO_ENDSUj FOR$WRITE_SF FOR$IO_T_DS FOR$IO_T_DS FOR$IO_T_DS FOR$IO_ENDAST |HDRAW_BOX SYS$ASCTIM FOR$JDATEAST$CODE$PDATA$LOCAL FOR$IO_END FOR$IO_L_R FOR$IO_L_V FOR$IO_T_DS FOR$WRITE_SF FOR$READ_IF>PWP]PqPPPP7QP!yP.i] ww13015 DRAW_FRAME01 4-Nov-1987 15:18 4-Nov-1987 15:18VAX FORTRAN V4.7-271 DRAW_FRAMEsP+)[2J)[0;0H)[7m))[0m )[7m))[0m))[7m))[0m )[7m))[0m+)[19;54H)[1;7m))[0m DRAW_FRAME`PPPQ(#Q for HELP 'P FOR$WRITE_SF FOR$IO_T_DSk FOR$IO_T_DS FOR$IO_T_DS FOR$IO_ENDO FOR$WRITE_SF FOR$IO_T_DS FOR$ IO_T_DS FOR$IO_T_DS FOR$IO_T_DS FOR$IO_ENDs next to your choice and press ; ' or enter the code character next to your  ' choice )'Q Q Q PH,[kT PQ P  FOR$WRITE_SF FOR$IO_T_DS FOR$IO_ENDTTk4 SYS$ASSIGNkTTPHSYS$QIOWT˄|SYS$QIO˰ SYS$WAITFR,ASTؑԼ 1 1 11T ˸SYS$QIO˰ SYS$WAITFR) x 1) z 1) | 1) ~ 1) 1 FOR$WRITE_SF FOR$IO_T_DS FOR$IO_T_DS  FOR$IO_T_DS FOR$IO_END/ FOR$WRITE_SF FOR$IO_T_DS FOR$IO_T_DS FOR$IO_END? FOR$WRITE_SF FOR$IO_T_DS FOR$IO_T_DS FOR$IO_ENDO FOR$WRITE_SF FOR$IO_T_DS$ FOR$IO_T_DS FOR$IO_T_DS FOR$IO_END1R Ѽ Z Ѽ A1/e FOR$WRITE_SF FOR$IO_T_DS FOR$IO_T_DS FOR$IO_END  FOR$WRITE_SF FOR$IO_T_DS FOR$IO_ENDTkxP[AOA[BOBOQ HGET_TERM SYS$ASSIGNSYS$QIOWSYS$QIO SYS$WAITFRASTw$CODE$PDATA$LOCAL FOR$IO_END FOR$IO_T_DS FOR$WRITE_SFIPP PPPP}PPmP@P P0P PP!P/P5PEPPvjk  www1`ʖ301/MENU01 4-Nov-1987 15:17 4-Nov-1987 15:17VAX FORTRAN V4.7-271 MENUAP sys$outputmenu_librarymenumenu1headng->  MENUlP<<TW        ` FDV$ATERM@\  FDV$LOPEN@ $ FDV$CLRSH@%4% FDV$CLRSH@<<DLd+d+ FDV$PUT@L22 FDV$PUT@h55 FDV$PUT@2 FDV$PUT@5 FDV$PUT@2 FDV$PUT@Q(  ;'PI\[}PQn~( n Q^( Gn~( n Q^( Pn~( n Q^( Yn~( n Q^( bn~( nQ^Ѽ DRAW_FRAMEѼV<8<@DSTR$TRIMk(PP FOR$WRITE_SF, FOR$IO_T_DS, FOR$IO_T_DSkTQ[0mQ [06;06H[07;06H[08;06H[09;06H[10;06H[11;06H[12;06H[13;06H[14;06H[15;06H[16;06H[17;06H[18;06H[19;06H[05;06H [06;06H [07;06H [08;06H [09;06H [10;06H [11;06H [12;06H [13;06H [14;06H [15;06H [16;06H [17;06H [18;06H [19;06H  HMENU1 DRAW_FRAMESTR$TRIMDRAW_BOXGET_TERMLIB$WAITV$CODEk$PDATA<$LOCAL FOR$IO_END FOR$IO_L_V FOR$IO_T_DS FOR$IO_T_V_DS FOR$WRITE_SFJPLPPTPpP0FPMP>PP:P|p Vww