Searched refs:PREGRID (Results 1 – 3 of 3) sorted by relevance
169 REAL PREGRID(2)188 DATA PREGRID/2*0.0/195 SAVE PREGRID241 IF( (OLDGRID(1).NE.PREGRID(1)).OR.242 X (OLDGRID(2).NE.PREGRID(2)) ) THEN261 PREGRID(1) = OLDGRID(1)262 PREGRID(2) = OLDGRID(2)
174 REAL PREGRID(2)202 DATA PREGRID/2*0.0/210 SAVE PREGRID245 IF( (OLDGRID(1).NE.PREGRID(1)).OR.246 X (OLDGRID(2).NE.PREGRID(2)) ) THEN270 PREGRID(1) = OLDGRID(1)271 PREGRID(2) = OLDGRID(2)
879 void STDCALLBULL FC_FUNC(pregrid,PREGRID) (float *xi, /* unscaled x coordinate index i: 0,imax */ in FC_FUNC() argument