ALLSETUP.f90#44 & ATS(NSRC),AVS(NSRC),ADS(NSRC),ASYINI(NSRC),ASZINI(NSRC),& EV_HRQEXT.f90#40 AVS(IS) = EV_HRVS(IS,IHOUR) #56 IF ( AVS(IS).LT.0.0 ) THEN ! 0 #60 AVS(IS) = 1.0E-5 #61 ELSEIF ( AVS(IS).LT.1.0E-5 ) THEN #63 AVS(IS) = 1.0E-5 ! 0 #64 ELSEIF ( AVS(IS).GT.50.0 ) THEN HRQEXT.f90#125 AVS(IS) = HRVS #141 IF ( AVS(IS).LT.0.0 ) THEN ! 0 #145 AVS(IS) = 1.0E-5 #146 ELSEIF ( AVS(IS).LT.1.0E-5 ) THEN #148 AVS(IS) = 1.0E-5 ! 0 #149 ELSEIF ( AVS(IS).GT.50.0 ) THEN MAIN1.f90#283 & ATS(:) , AVS(:) , ADS(:) , ASYINI(:) , & PPARM.f90#34 AVS(ISDX) = TEMP(4) #58 IF ( AVS(ISDX).LT.0.0 ) THEN ! 9 #62 AVS(ISDX) = 1.0E-5 #63 ELSEIF ( AVS(ISDX).LT.1.0E-5 ) THEN #65 AVS(ISDX) = 1.0E-5 ! 0 #66 ELSEIF ( AVS(ISDX).GT.50.0 ) THEN PRTSRC.f90#111 & AVS(I) , ADS(I) , BLDING , URB , & SETSRC.f90#50 VS = AVS(ISRC) VARINI.f90#165 AVS(I) = 0.0
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