C $Header: /u/gcmpack/MITgcm/pkg/exf/EXF_PARAM.h,v 1.38 2016/10/15 21:25:45 mmazloff Exp $ C $Name: $ C C ================================================================== C HEADER EXF_PARAM.h C ================================================================== C C o Header file for the surface flux data. Used by the external C forcing package. C C started: Christian Eckert eckert@mit.edu 30-Jun-1999 C C changed: Christian Eckert eckert@mit.edu 14-Jan-2000 C - Restructured the original version in order to have a C better interface to the MITgcmUV. C C Christian Eckert eckert@mit.edu 12-Feb-2000 C - Changed some variables names (package prefix: exf_) C C Patrick Heimbach, heimbach@mit.edu 04-May-2000 C - included exf_iprec to enable easy C switch between 32bit/64 bit data format C C Patrick Heimbach, heimbach@mit.edu 01-May-2001 C - added obcs parameters C C mods for pkg/seaice: menemenlis@jpl.nasa.gov 20-Dec-2002 C C ================================================================== C HEADER EXF_PARAM.h C ================================================================== C Repeat period for forcing fields (s) C For example, for yearly repeat period: repeatPeriod=31556925. C Note: this option is not yet coded for sub-daily C forcing and for leap years but this limitation can be C circumvented by using a 4-year (1461-day) repeatPeriod _RL repeatPeriod C useExfCheckRange :: check range of input/output field values C useExfYearlyFields :: when set, automatically add extension C _YEAR to input file names; the yearly files need C to contain all the records that pertain to C a particular year, including day 1, hour zero C twoDigitYear :: when set, use 2-digit year extension YR C instead of _YEAR for useExfYearlyFields C useOBCSYearlyFields :: when reading Open-Boundary values, assume yearly C climatology (def=false) C readStressOnAgrid :: read wind-streess located on model-grid, A-grid position C rotateStressOnAgrid :: rotate from zonal/meridional components to U/V components C readStressOnCgrid :: read wind-streess located on model-grid, C-grid position C stressIsOnCgrid :: ustress & vstress are positioned on Arakawa C-grid C useStabilityFct_overIce :: over sea-ice, compute turbulent transfert C coeff. function of stability (like over C open ocean) rather than using fixed Coeff. C useAtmWind :: use wind vector (uwind/vwind) to compute C the wind stress (ustress/vstress) C useRelativeWind :: Subtract U/VVEL or U/VICE from U/VWIND before C computing U/VSTRESS C noNegativeEvap :: prevent negative evap (= sea-surface condensation) C useExfZenAlbedo :: ocean albedo (direct part) may vary C with zenith angle (see select_ZenAlbedo) C select_ZenAlbedo :: switch to different methods to compute albedo (direct part) C :: 0 just use exf_albedo C :: 1 use daily mean albedo from exf_zenithangle_table.F C :: 2 use daily mean albedo computed as in pkg/aim_v23 C :: 3 use daily variable albedo C useExfZenIncoming :: compute incoming solar radiation along with zenith angle C exf_debugLev :: select message printing to STDOUT (e.g., when read rec) C exf_monFreq :: Monitor Frequency (s) for EXF logical useExfCheckRange logical useExfYearlyFields, twoDigitYear logical useOBCSYearlyFields logical readStressOnAgrid logical rotateStressOnAgrid logical readStressOnCgrid logical stressIsOnCgrid logical useStabilityFct_overIce logical useRelativeWind logical noNegativeEvap logical useAtmWind logical useExfZenAlbedo integer select_ZenAlbedo logical useExfZenIncoming INTEGER exf_debugLev _RL exf_monFreq C Drag coefficient scaling factor _RL exf_scal_BulkCdn C Maximum absolute windstress, used to reset unreastically high C data values _RL windstressmax C freezing temperature is the minimum temperature allowed, used C to reset climatological temperatures fields where they have C values below climtempfreeze _RL climtempfreeze C---+----1----+----2----+----3----+----4----+----5----+----6----+----7-|--+----| C Description of contents of surface boundary condition files C Note: fieldperiod=0 means input file is one time-constant field C fieldperiod=-12 means input file contains 12 monthly means integer hfluxstartdate1 integer hfluxstartdate2 _RL hfluxstartdate _RL hfluxperiod _RL hfluxconst _RL hflux_exfremo_intercept _RL hflux_exfremo_slope character*1 hfluxmask integer atempstartdate1 integer atempstartdate2 _RL atempstartdate _RL atempperiod _RL atempconst _RL atemp_exfremo_intercept _RL atemp_exfremo_slope character*1 atempmask integer aqhstartdate1 integer aqhstartdate2 _RL aqhstartdate _RL aqhperiod _RL aqhconst _RL aqh_exfremo_intercept _RL aqh_exfremo_slope character*1 aqhmask integer sfluxstartdate1 integer sfluxstartdate2 _RL sfluxstartdate _RL sfluxperiod _RL sfluxconst _RL sflux_exfremo_intercept _RL sflux_exfremo_slope character*1 sfluxmask integer evapstartdate1 integer evapstartdate2 _RL evapstartdate _RL evapperiod _RL evapconst _RL evap_exfremo_intercept _RL evap_exfremo_slope character*1 evapmask integer precipstartdate1 integer precipstartdate2 _RL precipstartdate _RL precipperiod _RL precipconst _RL precip_exfremo_intercept _RL precip_exfremo_slope character*1 precipmask integer snowprecipstartdate1 integer snowprecipstartdate2 _RL snowprecipstartdate _RL snowprecipperiod _RL snowprecipconst _RL snowprecip_exfremo_intercept _RL snowprecip_exfremo_slope character*1 snowprecipmask integer runoffstartdate1 integer runoffstartdate2 _RL runoffstartdate _RL runoffperiod _RL runoffconst _RL runoff_exfremo_intercept _RL runoff_exfremo_slope character*1 runoffmask _RL runoftempconst _RL runoftemp_exfremo_intercept _RL runoftemp_exfremo_slope integer ustressstartdate1 integer ustressstartdate2 _RL ustressstartdate _RL ustressperiod _RL ustressconst _RL ustress_exfremo_intercept _RL ustress_exfremo_slope character*1 ustressmask integer vstressstartdate1 integer vstressstartdate2 _RL vstressstartdate _RL vstressperiod _RL vstressconst _RL vstress_exfremo_intercept _RL vstress_exfremo_slope character*1 vstressmask integer uwindstartdate1 integer uwindstartdate2 _RL uwindstartdate _RL uwindperiod _RL uwindconst _RL uwind_exfremo_intercept _RL uwind_exfremo_slope character*1 uwindmask integer vwindstartdate1 integer vwindstartdate2 _RL vwindstartdate _RL vwindperiod _RL vwindconst _RL vwind_exfremo_intercept _RL vwind_exfremo_slope character*1 vwindmask integer wspeedstartdate1 integer wspeedstartdate2 _RL wspeedstartdate _RL wspeedperiod _RL wspeedconst _RL wspeed_exfremo_intercept _RL wspeed_exfremo_slope character*1 wspeedmask integer swfluxstartdate1 integer swfluxstartdate2 _RL swfluxstartdate _RL swfluxperiod _RL swfluxconst _RL swflux_exfremo_intercept _RL swflux_exfremo_slope character*1 swfluxmask integer lwfluxstartdate1 integer lwfluxstartdate2 _RL lwfluxstartdate _RL lwfluxperiod _RL lwfluxconst _RL lwflux_exfremo_intercept _RL lwflux_exfremo_slope character*1 lwfluxmask integer swdownstartdate1 integer swdownstartdate2 _RL swdownstartdate _RL swdownperiod _RL swdownconst _RL swdown_exfremo_intercept _RL swdown_exfremo_slope character*1 swdownmask integer lwdownstartdate1 integer lwdownstartdate2 _RL lwdownstartdate _RL lwdownperiod _RL lwdownconst _RL lwdown_exfremo_intercept _RL lwdown_exfremo_slope character*1 lwdownmask integer apressurestartdate1 integer apressurestartdate2 _RL apressurestartdate _RL apressureperiod _RL apressureconst _RL apressure_exfremo_intercept _RL apressure_exfremo_slope character*1 apressuremask integer areamaskstartdate1 integer areamaskstartdate2 _RL areamaskstartdate _RL areamaskperiod _RL areamaskTauRelax _RL areamaskconst _RL areamask_exfremo_intercept _RL areamask_exfremo_slope character*1 areamaskmask c Calendar data. integer climsststartdate1 integer climsststartdate2 _RL climsststartdate _RL climsstperiod _RL climsstTauRelax _RL climsstconst _RL climsst_exfremo_intercept _RL climsst_exfremo_slope character*1 climsstmask integer climsssstartdate1 integer climsssstartdate2 _RL climsssstartdate _RL climsssperiod _RL climsssTauRelax _RL climsssconst _RL climsss_exfremo_intercept _RL climsss_exfremo_slope character*1 climsssmask integer climustrstartdate1 integer climustrstartdate2 _RL climustrstartdate _RL climustrperiod _RL climustrTauRelax _RL climustrconst _RL climustr_exfremo_intercept _RL climustr_exfremo_slope character*1 climustrmask integer climvstrstartdate1 integer climvstrstartdate2 _RL climvstrstartdate _RL climvstrperiod _RL climvstrTauRelax _RL climvstrconst _RL climvstr_exfremo_intercept _RL climvstr_exfremo_slope character*1 climvstrmask c the following variables are used in conjunction with pkg/obcs c to describe S/T/U/V open boundary condition files integer obcsNstartdate1 integer obcsNstartdate2 integer obcsSstartdate1 integer obcsSstartdate2 integer obcsEstartdate1 integer obcsEstartdate2 integer obcsWstartdate1 integer obcsWstartdate2 _RL obcsNstartdate _RL obcsNperiod _RL obcsSstartdate _RL obcsSperiod _RL obcsEstartdate _RL obcsEperiod _RL obcsWstartdate _RL obcsWperiod c the following variables are used in conjunction with pkg/obcs c and pkg/seaice to describe area, heff, hsnow, hsalt, uice, c and vice open boundary condition files integer siobNstartdate1 integer siobNstartdate2 integer siobSstartdate1 integer siobSstartdate2 integer siobEstartdate1 integer siobEstartdate2 integer siobWstartdate1 integer siobWstartdate2 _RL siobNstartdate _RL siobNperiod _RL siobSstartdate _RL siobSperiod _RL siobEstartdate _RL siobEperiod _RL siobWstartdate _RL siobWperiod c File names. character*(128) hfluxfile character*(128) atempfile character*(128) aqhfile character*(128) evapfile character*(128) precipfile character*(128) snowprecipfile character*(128) sfluxfile character*(128) runofffile character*(128) runoftempfile character*(128) ustressfile character*(128) vstressfile character*(128) uwindfile character*(128) vwindfile character*(128) wspeedfile character*(128) swfluxfile character*(128) lwfluxfile character*(128) swdownfile character*(128) lwdownfile character*(128) apressurefile character*(128) areamaskfile character*(128) climsstfile character*(128) climsssfile character*(128) climustrfile character*(128) climvstrfile COMMON /EXF_PARAM_L/ & useExfCheckRange, & useExfYearlyFields, twoDigitYear, & useOBCSYearlyFields, & useExfZenAlbedo, useExfZenIncoming, & readStressOnAgrid, readStressOnCgrid, & stressIsOnCgrid, useStabilityFct_overIce, & useAtmWind, useRelativeWind, noNegativeEvap, & rotateStressOnAgrid COMMON /EXF_PARAM_I/ & select_ZenAlbedo, exf_debugLev, & hfluxstartdate1, hfluxstartdate2, & atempstartdate1, atempstartdate2, & aqhstartdate1, aqhstartdate2, & sfluxstartdate1, sfluxstartdate2, & evapstartdate1, evapstartdate2, & runoffstartdate1, runoffstartdate2, & precipstartdate1, precipstartdate2, & snowprecipstartdate1, snowprecipstartdate2, & ustressstartdate1, ustressstartdate2, & vstressstartdate1, vstressstartdate2, & uwindstartdate1, uwindstartdate2, & vwindstartdate1, vwindstartdate2, & wspeedstartdate1, wspeedstartdate2, & swfluxstartdate1, swfluxstartdate2, & lwfluxstartdate1, lwfluxstartdate2, & swdownstartdate1, swdownstartdate2, & lwdownstartdate1, lwdownstartdate2, & obcsNstartdate1, obcsNstartdate2, & obcsSstartdate1, obcsSstartdate2, & obcsEstartdate1, obcsEstartdate2, & obcsWstartdate1, obcsWstartdate2, & siobNstartdate1, siobNstartdate2, & siobSstartdate1, siobSstartdate2, & siobEstartdate1, siobEstartdate2, & siobWstartdate1, siobWstartdate2, & apressurestartdate1,apressurestartdate2, & areamaskstartdate1,areamaskstartdate2 COMMON /EXF_PARAM_R/ & repeatPeriod, exf_monFreq, & exf_scal_BulkCdn, windstressmax, & hfluxperiod, hfluxstartdate, & atempperiod, atempstartdate, & aqhperiod, aqhstartdate, & sfluxperiod, sfluxstartdate, & evapperiod, evapstartdate, & precipperiod, precipstartdate, & snowprecipperiod, snowprecipstartdate, & runoffperiod, runoffstartdate, & ustressperiod, ustressstartdate, & vstressperiod, vstressstartdate, & uwindperiod, uwindstartdate, & vwindperiod, vwindstartdate, & wspeedperiod, wspeedstartdate, & swfluxperiod, swfluxstartdate, & lwfluxperiod, lwfluxstartdate, & swdownperiod, swdownstartdate, & lwdownperiod, lwdownstartdate, & obcsNperiod, obcsNstartdate, & obcsSperiod, obcsSstartdate, & obcsEperiod, obcsEstartdate, & obcsWperiod, obcsWstartdate, & siobNperiod, siobNstartdate, & siobSperiod, siobSstartdate, & siobEperiod, siobEstartdate, & siobWperiod, siobWstartdate, & apressureperiod, apressurestartdate, & areamaskperiod, areamaskstartdate, & hfluxconst, & atempconst, & aqhconst, & sfluxconst, & evapconst, & precipconst, & snowprecipconst, & runoffconst, & runoftempconst, & ustressconst, & vstressconst, & uwindconst, & vwindconst, & wspeedconst, & swfluxconst, & lwfluxconst, & swdownconst, & lwdownconst, & apressureconst, & areamaskTauRelax, & areamaskconst COMMON /EXF_PARAM_TREND_REMOVAL/ & hflux_exfremo_intercept, & atemp_exfremo_intercept, & aqh_exfremo_intercept, & sflux_exfremo_intercept, & evap_exfremo_intercept, & precip_exfremo_intercept, & snowprecip_exfremo_intercept, & runoff_exfremo_intercept, & runoftemp_exfremo_intercept, & ustress_exfremo_intercept, & vstress_exfremo_intercept, & uwind_exfremo_intercept, & vwind_exfremo_intercept, & wspeed_exfremo_intercept, & swflux_exfremo_intercept, & lwflux_exfremo_intercept, & swdown_exfremo_intercept, & lwdown_exfremo_intercept, & apressure_exfremo_intercept, & areamask_exfremo_intercept, & hflux_exfremo_slope, & atemp_exfremo_slope, & aqh_exfremo_slope, & sflux_exfremo_slope, & evap_exfremo_slope, & precip_exfremo_slope, & snowprecip_exfremo_slope, & runoff_exfremo_slope, & runoftemp_exfremo_slope, & ustress_exfremo_slope, & vstress_exfremo_slope, & uwind_exfremo_slope, & vwind_exfremo_slope, & wspeed_exfremo_slope, & swflux_exfremo_slope, & lwflux_exfremo_slope, & swdown_exfremo_slope, & lwdown_exfremo_slope, & apressure_exfremo_slope, & areamask_exfremo_slope COMMON /EXF_PARAM_C/ & hfluxfile, hfluxmask, & atempfile, atempmask, & aqhfile, aqhmask, & sfluxfile, sfluxmask, & evapfile, evapmask, & precipfile, precipmask, & snowprecipfile,snowprecipmask, & runofffile, runoffmask, & runoftempfile, & ustressfile, ustressmask, & vstressfile, vstressmask, & uwindfile, uwindmask, & vwindfile, vwindmask, & wspeedfile, wspeedmask, & swfluxfile, swfluxmask, & lwfluxfile, lwfluxmask, & swdownfile, swdownmask, & lwdownfile, lwdownmask, & apressurefile, apressuremask, & areamaskfile, areamaskmask COMMON /EXF_CLIM_I/ & climsststartdate1, climsststartdate2, & climsssstartdate1, climsssstartdate2, & climustrstartdate1, climustrstartdate2, & climvstrstartdate1, climvstrstartdate2 COMMON /EXF_CLIM_C/ & climsstfile, climsstmask, & climsssfile, climsssmask, & climustrfile, climustrmask, & climvstrfile, climvstrmask COMMON /EXF_CLIM_R/ & climtempfreeze, & climsstperiod, climsststartdate, & climsssperiod, climsssstartdate, & climustrperiod, climustrstartdate, & climvstrperiod, climvstrstartdate, & climsstTauRelax, climsssTauRelax, & climustrTauRelax, climvstrTauRelax, & climsstconst, climsssconst, & climustrconst, climvstrconst, & climsst_exfremo_intercept, climsst_exfremo_slope, & climsss_exfremo_intercept, climsss_exfremo_slope, & climustr_exfremo_intercept, climustr_exfremo_slope, & climvstr_exfremo_intercept, climvstr_exfremo_slope, & exf_inscal_climsst, exf_inscal_climsss, & exf_inscal_climustr, exf_inscal_climvstr c file precision and field type COMMON /EXF_PARAM_TYPE/ & exf_iprec, & exf_iprec_obcs integer exf_iprec integer exf_iprec_obcs c exf_inscal_* input scaling factors c exf_offset_atemp input air temperature offset c (for conversion from C to K, if needed) c exf_outscale_* output scaling factors _RL exf_inscal_hflux _RL exf_inscal_sflux _RL exf_inscal_ustress _RL exf_inscal_vstress _RL exf_inscal_uwind _RL exf_inscal_vwind _RL exf_inscal_wspeed _RL exf_inscal_swflux _RL exf_inscal_lwflux _RL exf_inscal_precip _RL exf_inscal_snowprecip _RL exf_inscal_sst _RL exf_inscal_sss _RL exf_inscal_atemp _RL exf_offset_atemp _RL exf_inscal_aqh _RL exf_inscal_evap _RL exf_inscal_apressure _RL exf_inscal_runoff _RL exf_inscal_runoftemp _RL exf_inscal_swdown _RL exf_inscal_lwdown _RL exf_inscal_climsst _RL exf_inscal_climsss _RL exf_inscal_climustr _RL exf_inscal_climvstr _RL exf_inscal_areamask _RL exf_outscal_hflux _RL exf_outscal_sflux _RL exf_outscal_ustress _RL exf_outscal_vstress _RL exf_outscal_swflux _RL exf_outscal_sst _RL exf_outscal_sss _RL exf_outscal_apressure _RL exf_outscal_areamask COMMON /EXF_PARAM_SCAL/ & exf_inscal_hflux & , exf_inscal_sflux & , exf_inscal_ustress & , exf_inscal_vstress & , exf_inscal_uwind & , exf_inscal_vwind & , exf_inscal_wspeed & , exf_inscal_swflux & , exf_inscal_lwflux & , exf_inscal_precip & , exf_inscal_snowprecip & , exf_inscal_sst & , exf_inscal_sss & , exf_inscal_atemp & , exf_offset_atemp & , exf_inscal_aqh & , exf_inscal_evap & , exf_inscal_apressure & , exf_inscal_runoff & , exf_inscal_runoftemp & , exf_inscal_swdown & , exf_inscal_lwdown & , exf_inscal_areamask & , exf_outscal_hflux & , exf_outscal_sflux & , exf_outscal_ustress & , exf_outscal_vstress & , exf_outscal_swflux & , exf_outscal_sst & , exf_outscal_sss & , exf_outscal_apressure & , exf_outscal_areamask #ifndef USE_EXF_INTERPOLATION c-- set dummy dimension 1 INTEGER exf_interp_bufferSize PARAMETER( exf_interp_bufferSize = 1 ) INTEGER MAX_LAT_INC PARAMETER(MAX_LAT_INC = 1) #else /* USE_EXF_INTERPOLATION */ C To read input data without dynamical allocation (EXF_INTERP_USE_DYNALLOC undef), C buffer size currently set to 65000 (allows to read-in a 1x1 global data set) C Increase to 140000 to accommodate for ECMWF-INTERIM INTEGER exf_interp_bufferSize PARAMETER( exf_interp_bufferSize = 140000 ) c for lat interpolation, arraysize currently set to 1279 max data values c to accomodate ECMWF operational analysis INTEGER MAX_LAT_INC PARAMETER(MAX_LAT_INC = 1279) C-- Interpolation parameters (for each input field): C {inputField}_lon0 :: longitude of the 1rst point (South-East corner) C {inputField}_lon_inc :: longitude increment (uniform) C {inputField}_lat0 :: latitude of the 1rst point (South-East corner) C {inputField}_lat_inc :: latitude increment (vector, fct of latitude only) C {inputField}_nlon :: input filed 1rst dim, longitudinal direction C {inputField}_nlat :: input filed 2nd dim, latitudinal direction C {inputField}_interpMethod :: interpolation method: =0 : no interpolation ; C :: =1,11,21 : bilinear ; =2,12,22 : bicubic ; C :: =1,2 for tracer ; =11,12 for U ; =21,22 for V. C- Global parameters (for all fields): C exf_output_interp :: output directly interpolation result (before C rescaling, rotation or time-interp) C- Internal parameters, for 2 components vector field: C uvInterp_stress :: interpolate wind-stress u & v components together C uvInterp_wind :: interpolate wind u & v components together C uvInterp_climstr :: interpolate clim stress u & v components together _RL ustress_lon0, ustress_lon_inc _RL ustress_lat0, ustress_lat_inc(MAX_LAT_INC) INTEGER ustress_nlon, ustress_nlat, ustress_interpMethod _RL vstress_lon0, vstress_lon_inc _RL vstress_lat0, vstress_lat_inc(MAX_LAT_INC) INTEGER vstress_nlon, vstress_nlat, vstress_interpMethod _RL hflux_lon0, hflux_lon_inc _RL hflux_lat0, hflux_lat_inc(MAX_LAT_INC) INTEGER hflux_nlon, hflux_nlat, hflux_interpMethod _RL sflux_lon0, sflux_lon_inc _RL sflux_lat0, sflux_lat_inc(MAX_LAT_INC) INTEGER sflux_nlon, sflux_nlat, sflux_interpMethod _RL swflux_lon0, swflux_lon_inc _RL swflux_lat0, swflux_lat_inc(MAX_LAT_INC) INTEGER swflux_nlon, swflux_nlat, swflux_interpMethod _RL runoff_lon0, runoff_lon_inc _RL runoff_lat0, runoff_lat_inc(MAX_LAT_INC) INTEGER runoff_nlon, runoff_nlat, runoff_interpMethod _RL atemp_lon0, atemp_lon_inc _RL atemp_lat0, atemp_lat_inc(MAX_LAT_INC) INTEGER atemp_nlon, atemp_nlat, atemp_interpMethod _RL aqh_lon0, aqh_lon_inc _RL aqh_lat0, aqh_lat_inc(MAX_LAT_INC) INTEGER aqh_nlon, aqh_nlat, aqh_interpMethod _RL evap_lon0, evap_lon_inc _RL evap_lat0, evap_lat_inc(MAX_LAT_INC) INTEGER evap_nlon, evap_nlat, evap_interpMethod _RL precip_lon0, precip_lon_inc _RL precip_lat0, precip_lat_inc(MAX_LAT_INC) INTEGER precip_nlon, precip_nlat, precip_interpMethod _RL snowprecip_lon0, snowprecip_lon_inc _RL snowprecip_lat0, snowprecip_lat_inc(MAX_LAT_INC) INTEGER snowprecip_nlon, snowprecip_nlat, snowprecip_interpMethod _RL uwind_lon0, uwind_lon_inc _RL uwind_lat0, uwind_lat_inc(MAX_LAT_INC) INTEGER uwind_nlon, uwind_nlat, uwind_interpMethod _RL vwind_lon0, vwind_lon_inc _RL vwind_lat0, vwind_lat_inc(MAX_LAT_INC) INTEGER vwind_nlon, vwind_nlat, vwind_interpMethod _RL wspeed_lon0, wspeed_lon_inc _RL wspeed_lat0, wspeed_lat_inc(MAX_LAT_INC) INTEGER wspeed_nlon, wspeed_nlat, wspeed_interpMethod _RL lwflux_lon0, lwflux_lon_inc _RL lwflux_lat0, lwflux_lat_inc(MAX_LAT_INC) INTEGER lwflux_nlon, lwflux_nlat, lwflux_interpMethod _RL swdown_lon0, swdown_lon_inc _RL swdown_lat0, swdown_lat_inc(MAX_LAT_INC) INTEGER swdown_nlon, swdown_nlat, swdown_interpMethod _RL lwdown_lon0, lwdown_lon_inc _RL lwdown_lat0, lwdown_lat_inc(MAX_LAT_INC) INTEGER lwdown_nlon, lwdown_nlat, lwdown_interpMethod _RL apressure_lon0,apressure_lon_inc _RL apressure_lat0,apressure_lat_inc(MAX_LAT_INC) INTEGER apressure_nlon,apressure_nlat,apressure_interpMethod _RL areamask_lon0,areamask_lon_inc _RL areamask_lat0,areamask_lat_inc(MAX_LAT_INC) INTEGER areamask_nlon,areamask_nlat,areamask_interpMethod LOGICAL exf_output_interp LOGICAL uvInterp_stress LOGICAL uvInterp_wind LOGICAL uvInterp_climstr COMMON /EXF_INTERPOLATION_L/ & exf_output_interp, & uvInterp_stress, uvInterp_wind, uvInterp_climstr COMMON /EXF_INTERPOLATION_RL/ & ustress_lon0, ustress_lon_inc, & ustress_lat0, ustress_lat_inc, & vstress_lon0, vstress_lon_inc, & vstress_lat0, vstress_lat_inc, & hflux_lon0, hflux_lon_inc, & hflux_lat0, hflux_lat_inc, & sflux_lon0, sflux_lon_inc, & sflux_lat0, sflux_lat_inc, & swflux_lon0, swflux_lon_inc, & swflux_lat0, swflux_lat_inc, & runoff_lon0, runoff_lon_inc, & runoff_lat0, runoff_lat_inc, & atemp_lon0, atemp_lon_inc, & atemp_lat0, atemp_lat_inc, & aqh_lon0, aqh_lon_inc, & aqh_lat0, aqh_lat_inc, & evap_lon0, evap_lon_inc, & evap_lat0, evap_lat_inc, & precip_lon0, precip_lon_inc, & precip_lat0, precip_lat_inc, & snowprecip_lon0, snowprecip_lon_inc, & snowprecip_lat0, snowprecip_lat_inc, & uwind_lon0, uwind_lon_inc, & uwind_lat0, uwind_lat_inc, & vwind_lon0, vwind_lon_inc, & vwind_lat0, vwind_lat_inc, & wspeed_lon0, wspeed_lon_inc, & wspeed_lat0, wspeed_lat_inc, & lwflux_lon0, lwflux_lon_inc, & lwflux_lat0, lwflux_lat_inc, & swdown_lon0, swdown_lon_inc, & swdown_lat0, swdown_lat_inc, & lwdown_lon0, lwdown_lon_inc, & lwdown_lat0, lwdown_lat_inc, & apressure_lon0,apressure_lon_inc, & apressure_lat0,apressure_lat_inc, & areamask_lon0,areamask_lon_inc, & areamask_lat0,areamask_lat_inc COMMON /EXF_INTERPOLATION_I/ & ustress_nlon, ustress_nlat, ustress_interpMethod, & vstress_nlon, vstress_nlat, vstress_interpMethod, & hflux_nlon, hflux_nlat, hflux_interpMethod, & sflux_nlon, sflux_nlat, sflux_interpMethod, & swflux_nlon, swflux_nlat, swflux_interpMethod, & runoff_nlon, runoff_nlat, runoff_interpMethod, & atemp_nlon, atemp_nlat, atemp_interpMethod, & aqh_nlon, aqh_nlat, aqh_interpMethod, & evap_nlon, evap_nlat, evap_interpMethod, & precip_nlon, precip_nlat, precip_interpMethod, & snowprecip_nlon, snowprecip_nlat, snowprecip_interpMethod, & uwind_nlon, uwind_nlat, uwind_interpMethod, & vwind_nlon, vwind_nlat, vwind_interpMethod, & wspeed_nlon, wspeed_nlat, wspeed_interpMethod, & lwflux_nlon, lwflux_nlat, lwflux_interpMethod, & swdown_nlon, swdown_nlat, swdown_interpMethod, & lwdown_nlon, lwdown_nlat, lwdown_interpMethod, & apressure_nlon,apressure_nlat,apressure_interpMethod, & areamask_nlon,areamask_nlat,areamask_interpMethod _RL climsst_lon0, climsst_lon_inc _RL climsst_lat0, climsst_lat_inc(MAX_LAT_INC) INTEGER climsst_nlon, climsst_nlat, climsst_interpMethod _RL climsss_lon0, climsss_lon_inc _RL climsss_lat0, climsss_lat_inc(MAX_LAT_INC) INTEGER climsss_nlon, climsss_nlat, climsss_interpMethod _RL climustr_lon0, climustr_lon_inc _RL climustr_lat0, climustr_lat_inc(MAX_LAT_INC) INTEGER climustr_nlon, climustr_nlat, climustr_interpMethod _RL climvstr_lon0, climvstr_lon_inc _RL climvstr_lat0, climvstr_lat_inc(MAX_LAT_INC) INTEGER climvstr_nlon, climvstr_nlat, climvstr_interpMethod COMMON /EXF_CLIM_INTERPOLATION/ & climsst_lon0, climsst_lon_inc, & climsst_lat0, climsst_lat_inc, & climsss_lon0, climsss_lon_inc, & climsss_lat0, climsss_lat_inc, & climustr_lon0, climustr_lon_inc, & climustr_lat0, climustr_lat_inc, & climvstr_lon0, climvstr_lon_inc, & climvstr_lat0, climvstr_lat_inc, & climsst_nlon, climsst_nlat, climsst_interpMethod, & climsss_nlon, climsss_nlat, climsss_interpMethod, & climustr_nlon, climustr_nlat, climustr_interpMethod, & climvstr_nlon, climvstr_nlat, climvstr_interpMethod #endif /* USE_EXF_INTERPOLATION */