ALLSETUP.f90#44
     &          ATS(NSRC),AVS(NSRC),ADS(NSRC),ASYINI(NSRC),ASZINI(NSRC),&
MAIN1.f90#283
     &                      ATS(:) , AVS(:) , ADS(:) , ASYINI(:) ,      &
PPARM.f90#35
      ADS(ISDX) = TEMP(5)
#71
      IF ( ADS(ISDX).LT.0.0 ) THEN                                      !      9
#74
      ELSEIF ( ADS(ISDX).LT.1.0E-5 ) THEN
#76
         ADS(ISDX) = 1.0E-5                                             !      0
#77
      ELSEIF ( ADS(ISDX).GT.20.0 ) THEN
PRTSRC.f90#111
     &                          AVS(I) , ADS(I) , BLDING , URB ,        &
SETSRC.f90#49
         DS = ADS(ISRC)
VARINI.f90#164
         ADS(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