GENCAR.f90#78 YINT = TEMPP(4) #95 YCOORD(J,INNET) = YINT + YDELTA*FLOAT(J-1) ! 0 MAIN1.f90#442 REAL :: XINT , YINT POLORG.f90#61 YINT = AYS(ISDX) #73 CALL STONUM(FIELD(ISC+1),ILEN_FLD,YINT,IMIT) ! 0 PREGENCAR.f90#74 YINT = TEMPP(4) REPOLR.f90#140 YINT = 0.0 SETPOL.f90#62 AYR(JSET) = YINT + XCOORD(I,INNET)*COS(YTEMP) #68 YORIG(INNET) = YINT VARINI.f90#409 YINT = 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