Full text-L - Philip M. Fearnside - Inpa

H62IF IVAR367111 .GE. ll GO TO HqOEAD 110,900511VAR3671II411 VAR3691!1411 VAR370CII411 VAR3711II~I,63 1 VAR3721II41,64 1VAR1731!I411 VAR3741II411 VAR3751II41, VAR376CII411 VAR3771II41,65 2VAR37811!411 VAR3871II41, Il4•1,ICON23166 9005 FOP~AT(4X1!5,5X,!4,!2,3!3, 12. 13. 3I2. 2ox, Ill67 C ABOVE FORMAT 9005 IS FOR CARD 23 INFORMATION IN ONE2368 999 CCNT!NUE69 DO 562 110•1,ICDS270 C FINDS CARD 2 INFORMATION LINE NOS. FOR BEFORE ANO AFTER FIELDS71 IFIV4R0231 !101 .EQ. ISEFFNI IBEF2•11072 !FIVAP023!I101 .eo. !AFTFNI !AFTZ•'llO73 562 CONTINUE74 MTOOl • 075 MT002 = 076 "T003 • 077 "T004 • O78 MT005 079 "T006 • 0"T007 • oeo81 MTOOB • 082 MT009 • 093 MTOlO • 084 "T011 • 085 TAA012 = o.a6 TAA011 • o.87 MT014 • 088 MT015 • 089 iAB016 • o.90 ~T017 • 091 MT013 • 092 ~T019 • 093 ~T020 • 094 MT021 = 095 TAA022 • O.96 MT023 • 097 MT024 a 09R TAA025 • Q.91 MT026 • 0100 MT027 = 0101 TAB023 • O.102 MT029 • 0103 TAll030 • O.104 MT031 • 0105 ~T032 = O106 MT033 • 0107 TAB034 = O.108 MT015 • 0109 MT016 = 0110 TAB037 • O.111 MT038 • 0112 MT03~ • 0113 TAB040 • O.11'>"T041 " O115 MT042 • 0116 TAB043 • O.117 "T044 • 0118 "T0i>5 • 0119 TAA046 = O.120 MT047 • 0