372 |
integer MAX_LAT_INC |
integer MAX_LAT_INC |
373 |
parameter(MAX_LAT_INC = 1) |
parameter(MAX_LAT_INC = 1) |
374 |
#else |
#else |
375 |
c for lat interpolation, arraysize currently set to 250 max data values |
c for lat interpolation, arraysize currently set to 2176 max data values |
376 |
integer MAX_LAT_INC |
integer MAX_LAT_INC |
377 |
parameter(MAX_LAT_INC = 1088) |
parameter(MAX_LAT_INC = 2176) |
378 |
_RL ustress_lon0, ustress_lon_inc |
_RL ustress_lon0, ustress_lon_inc |
379 |
_RL ustress_lat0, ustress_lat_inc(MAX_LAT_INC) |
_RL ustress_lat0, ustress_lat_inc(MAX_LAT_INC) |
380 |
INTEGER ustress_nlon, ustress_nlat |
INTEGER ustress_nlon, ustress_nlat |