Directory of image this file is from
This file as a plain text file
??2CDDNDO ADRDMPEDELRD TMHSTHBEDIPNETGR< DRH E0A<YHURDDPAAD HNDDVHAIHAHLEDLLIHTSATR XO $DFTFR8ET0 E\NDTLHDTSB<RU$TDNLE DMY< DN$L DHHVEDS ID HAG4UDEPNDSP DHPAD HAEP ITMN$SOTNDBPAD PSATTM8ETX ULNT<INBPA TDVJAC[ZDJAK4ZEJTZL<H"AC>J<[[0Z2LK)[4NK9DCYRK<(+1NKZFN ZH2ANDZA>DZB^DJHZGJ=ZC";JG9 JF>P+)8F8F=H*(ZING";NGRGBJ9DJI*.2AC6<(+[K 9PK7<X+]9DJE[ROR[PSROR[RJC1!O0O0IDBVDNDK^?+!0A.;J8J> +F^DJCKOZCRB+[;$BG2C0Y*!ZH<X+8JA^D;UJKZKA3.KA?A0^K?> *!/=>E8==2IO?XRO\2A ]S\S]S^*I;2J >A8A/=2JI; >CA</=JT <JU ;JNXSK:X\HD8!C9K8 7HD8!C6K5 4HR<(/3C9K2 1K0 /HR9J8HC.XRK-XHLH<(+KHR>(+PH*8LHXHK,XIK+XPLH\IPP+F/3HRC*K)XPLP (HR9J8JC K&XHLH %LH $/3>EA;?;*5B2[+HU>(G G I?^G!I" ?8GYH G?G19G$70FGV0.GGW00GHP?PIRCB>6/?9VXTZ?K>XHK=XP <+K;> *TK:Z?K9\HPP*O*XHQ\HPP*HHUK8>(*&HZK7> *&HT 6HT<Q:PTK5 4K>XHK=XPLH 4PP*,J??*8Z?K9 4K9 4 <*< 4*8 3 2*DK5 4K>XJHJ8!HH>(*<LJ 4+D OS/8 FORTRAN IV 3.02 PAGE ONEH Q MMPRBIL3= <=B ?>=7N?:TMVTWO THREE FOUR FIVE SIX SEVEN EIGHT NINE TEN ELEVENTWELVE? H,=?H5=AH><\IG:!IP9 IY NEW YEAR S DAYAPRIL FOOL S DAY MEMORIAL DAYINDEPENDENCE DAY HALLOWEEN CHRISTMAS DAY 1 2 3 4 5 6 7 8 910111213141516171819202122232425262728293031JAN FEB MAR APR MAY JUN JUL AUG SEP OCT NOV DEC RALFSV^-OU8D?H(Q.$F?VA<? EB +CD=:D\HB> -M%3A8!HC> -M <%6=SK$=TJ)=CKA.Y%L-QHY>(-%%3DAS<(8A9 F>OLUOLSLA%> +M,?KOXPHP8J8J8J HP /UK^A%<(/ H>A%H>7/ HUUHVUHWUHX>(/(H= HXU/(I580!+90&:H<[8/7K?XTJ1 >PT*B2JI; =DA<+<2IN*2A?H/;2KHF :S:HG :S: :N*C92B> *$2JO8C7>( ;2J:A2A =BJZ>+<J)Z12J =FBZXRK6Z2HR9F8DXRHR8DC5K4 >R2*7.3C3< K2=HK9K1 >/C??FAK0 >K/ >SL/MK. >JP[LK-XRLR9J9J9JCLRCLRPRC3> +ZK/ >K0 >/,/O GLBLBJBMB ? ?B0G?<P>$A>O>ERCBPR9?R SH* KG>(*IH/?K%9A<P[%<XSG SB0*\RRK>[HJCZ JQ[&*ASG?*T/=<B*2*.JCZ O&C<9J8JKE8J8JS&*3O&C [ES&O&C;XQHQK:<(*GK9<(*AK8<(.8A>(*AHQR.>OA??K7[S2IOF2A<(/H2J&PA/=2IOFC6< K59Z8J[%SFOFZRSF[GSH2A/HK4XHL\P\\HL\P\\HL\P\\H/3MNG,O?04A?=P=&C?<RC9?LJ?8A<(/?Z?$S",/?RIW>JHZ<K=Z>.C<Z:0Y*\0^C;K:>(/9R]*]*7*4J:9F8FC8N;^;J:9J8J8HC8N<^<J=Z]R<R>.R".RJ<Z;R<J:^<.R,*]>(2 O2A8 HT> /A9$K[K8AXR2ILR2A8!XRK7XHLH< HR>(+]PH+V: LHXHLHXRHR8J8J8J 6HR 6HRC5> + 4+B!>?6 .JMM?MCRM<>E?=A?C?>LKRCCDCE>EJ"HJA"H.B0&0!*J:.HGTS7ITT)EDWARWTACOTOEXT3QST<QLUJIFU^DOU7SNVGTDVVBDV&RTWQRDW STW2CLXDMOXQHOX!MMX6SSYBOPYSASY\DAY"DHY+MLZDDEZVBSZ$LTZ/IEZ6PH[KMK[&OT[2PD\FMT\XGV\ LI]FDP]]DL]0AA^KSF^*DF^6IIS.S&UNDEFINED ERRORILLEGAL USE OF IFBA GOTO STATEMENTBAD READ OR WRITE STATEMENTARGS IN COMMON OR VAR IN TWO COMMONS OR SYNTAX BADBAD IO LIST ELEMENTBAD EXTERNAL STMTSYNTAX ERROR IN EQUIVALENCEVARIABLE IS EQUIVALENCED MORE THAN ONCETHIS KIND OF STATEMENT NOT LEGAL AFTER LOGICAL IFBAD SYNTAX I DO OR IMPLIED DONOT LEGAL AS SUBROUTINE NAMESYNTAX ERROR IN TYPE STATEMENTDIMENSIONS TOO BIG, OR SYNTAX ERROR IN DIMENSION LISTILLEGAL AS DO ENDING STATEMENTATTEMPT TO RE-TYPE A VARIABLEATTEMPT TO RE-DIMENSION A VARIABLEINTERNAL COMPILER ABORT NUMBER ONE RROR IN COMPLEX LITERALOPERAND EXPECTED, NONE PRESENTHOLLERITH COUNT WRONG, OR MISSING QUOTESMISMATCHED PARENTHESISSUBSCRIPT OR ARGUMENT LIST ERRORILLEGAL OPERATORASSIGN ???DATA STATEMENT ?HOLLERITH COUNT OR QUOTE ERROR IN DATA STATEMENTTHIS LINE NUMBER I ALREADY DEFINEDWRONG WAY TO END A DO LOOPILLEGAL IN BLOCK DATALINE TOO BIGINPUT FILE ERROR, TAKEN AS END STATEMENTTHIS FUNCTION / SUBROUTINE STATEMENT IS UNACCEPTABLEYOU MISPELED A KEYWURDILLEGAL OPERAND TYPE FOR THIS OPERATORINTERNAL COMPILER ABORT NUMB R TWOILLEGAL VARIABLE TYPE MIXINGVARIABLE IN ASSIGNED OR COMPUTED GOTO MUST BE INTEGER OR REALEXPRESSION IN LOGICAL IF IS NOT TYPED LOGICALDO PARAMETERS MUST BE INTEGER OR REALYOUR DATA AND VARIABLE LISTS ARE OF DIFFERENT LENGTHSSUBROUTINES MAY ONLY HAVE IX ARGUMENTS THAT ARE DIMENSIONEDBAD STATEMENT FUNCTIONBAD DEFINE FILE<(/6ID<(/5K4<(+^8A<(+*W3K2[[H)?(+SS\+W: [\O3XK[,S]K[ ]+SBM??L(K,>(+ [,P"X!H)? %]I\[[+QS,/6AY-,\^.Y%BLBL*M+B*AA4>A^AZQ] Z.?BEF Note: Lines longer than 256 characters were wrapped