ASNGRP.f90#21 & PATH*2 , MODNAM*6 , IID2*8 , LID2*8 , HID2*8 #32 CALL SETIDG(LOWID,LID1,IL,LID2) #38 & (IID2.GE.LID2 .AND. IID2.LE.HID2) ) INGRP = .TRUE. DSBLDG.f90#27 CHARACTER LID*8 , HID*8 , LID1*8 , LID2*8 , HID1*8 , HID2*8 #69 CALL SETIDG(LID,LID1,IL,LID2) ! 0 #71 IF ( (HID1.LT.LID1) .OR. (IH.LT.IL) .OR. (HID2.LT.LID2) ) THEN EMVARY.f90#33 CHARACTER LID*8 , HID*8 , LID1*8 , LID2*8 , HID1*8 , HID2*8 #98 CALL SETIDG(LID,LID1,IL,LID2) ! 0 #100 IF ( (HID1.LT.LID1) .OR. (IH.LT.IL) .OR. (HID2.LT.LID2) ) THEN GASDEP.f90#29 CHARACTER LID*8 , HID*8 , LID1*8 , LID2*8 , HID1*8 , HID2*8 #119 CALL SETIDG(LID,LID1,IL,LID2) ! 0 #121 IF ( (HID1.LT.LID1) .OR. (IH.LT.IL) .OR. (HID2.LT.LID2) ) THEN HREMIS.f90#30 CHARACTER*8 LOWID , HIGID , LID1 , LID2 , HID1 , HID2 , TEMPID #77 CALL SETIDG(LOWID,LID1,IL,LID2) #79 IF ( (HID1.LT.LID1) .OR. (IH.LT.IL) .OR. (HID2.LT.LID2) ) & INPPDM.f90#29 CHARACTER LID*8 , HID*8 , LID1*8 , LID2*8 , HID1*8 , HID2*8 #74 CALL SETIDG(LID,LID1,IL,LID2) ! 0 #76 IF ( (HID1.LT.LID1) .OR. (IH.LT.IL) .OR. (HID2.LT.LID2) ) THEN INPPDN.f90#29 CHARACTER LID*8 , HID*8 , LID1*8 , LID2*8 , HID1*8 , HID2*8 #77 CALL SETIDG(LID,LID1,IL,LID2) ! 0 #79 IF ( (HID1.LT.LID1) .OR. (IH.LT.IL) .OR. (HID2.LT.LID2) ) THEN INPPHI.f90#27 CHARACTER LID*8 , HID*8 , LID1*8 , LID2*8 , HID1*8 , HID2*8 #75 CALL SETIDG(LID,LID1,IL,LID2) ! 0 #77 IF ( (HID1.LT.LID1) .OR. (IH.LT.IL) .OR. (HID2.LT.LID2) ) THEN METH_2.f90#26 CHARACTER LID*8 , HID*8 , LID1*8 , LID2*8 , HID1*8 , HID2*8 #94 CALL SETIDG(LID,LID1,IL,LID2) ! 0 #96 IF ( (HID1.LT.LID1) .OR. (IH.LT.IL) .OR. (HID2.LT.LID2) ) THEN NO2RAT.f90#27 CHARACTER LID*8 , HID*8 , LID1*8 , LID2*8 , HID1*8 , HID2*8 #77 CALL SETIDG(LID,LID1,IL,LID2) ! 0 #79 IF ( (HID1.LT.LID1) .OR. (IH.LT.IL) .OR. (HID2.LT.LID2) ) THEN OLMGRP.f90#27 CHARACTER*8 LOWID , HIGID , LID1 , LID2 , HID1 , HID2 , TEMPID #77 CALL SETIDG(LOWID,LID1,IL,LID2) #79 IF ( (HID1.LT.LID1) .OR. (IH.LT.IL) .OR. (HID2.LT.LID2) ) & SOGRP.f90#27 CHARACTER*8 LOWID , HIGID , LID1 , LID2 , HID1 , HID2 , TEMPID #76 CALL SETIDG(LOWID,LID1,IL,LID2) #78 IF ( (HID1.LT.LID1) .OR. (IH.LT.IL) .OR. (HID2.LT.LID2) ) & URBANS.f90#27 CHARACTER*8 LOWID , HIGID , LID1 , LID2 , HID1 , HID2 #46 CALL SETIDG(LOWID,LID1,IL,LID2) #48 IF ( (HID1.LT.LID1) .OR. (IH.LT.IL) .OR. (HID2.LT.LID2) ) THEN
HyperKWIC - Version 1.00DD executed at 20:00 on 1 Mar 2018 | Personal or Academic or Evaluation User | Free for Non-Commercial, Non-Government Use