ASNGRP.f90#20 CHARACTER LOWID*8 , HIGID*8 , INID*8 , IID1*8 , LID1*8 , HID1*8 , & #33 CALL SETIDG(HIGID,HID1,IH,HID2) #36 IF ( (IID1.GE.LID1 .AND. IID1.LE.HID1) .AND. & DSBLDG.f90#27 CHARACTER LID*8 , HID*8 , LID1*8 , LID2*8 , HID1*8 , HID2*8 #70 CALL SETIDG(HID,HID1,IH,HID2) #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 #99 CALL SETIDG(HID,HID1,IH,HID2) #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 #120 CALL SETIDG(HID,HID1,IH,HID2) #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 #78 CALL SETIDG(HIGID,HID1,IH,HID2) #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 #75 CALL SETIDG(HID,HID1,IH,HID2) #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 #78 CALL SETIDG(HID,HID1,IH,HID2) #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 #76 CALL SETIDG(HID,HID1,IH,HID2) #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 #95 CALL SETIDG(HID,HID1,IH,HID2) #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 #78 CALL SETIDG(HID,HID1,IH,HID2) #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 #78 CALL SETIDG(HIGID,HID1,IH,HID2) #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 #77 CALL SETIDG(HIGID,HID1,IH,HID2) #78 IF ( (HID1.LT.LID1) .OR. (IH.LT.IL) .OR. (HID2.LT.LID2) ) & URBANS.f90#27 CHARACTER*8 LOWID , HIGID , LID1 , LID2 , HID1 , HID2 #47 CALL SETIDG(HIGID,HID1,IH,HID2) #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