/[MITgcm]/MITgcm/pkg/exf/exf_param.h
ViewVC logotype

Diff of /MITgcm/pkg/exf/exf_param.h

Parent Directory Parent Directory | Revision Log Revision Log | View Revision Graph Revision Graph | View Patch Patch

revision 1.23 by heimbach, Thu Mar 2 02:53:23 2006 UTC revision 1.24 by heimbach, Thu May 25 18:32:56 2006 UTC
# Line 38  c     Calendar data. Line 38  c     Calendar data.
38    
39  c     Sea-water albedo  c     Sea-water albedo
40        _RL     exf_albedo        _RL     exf_albedo
41    c     longwave surface emittance
42          _RL     surfEmittance
43    
44  c     Maximum absolute windstress, used to reset unreastically high  c     Maximum absolute windstress, used to reset unreastically high
45  c     data values  c     data values
# Line 103  c     data values Line 105  c     data values
105        character*1 precipmask        character*1 precipmask
106        parameter(  precipmask = 's' )        parameter(  precipmask = 's' )
107    
108          integer snowprecipstartdate1
109          integer snowprecipstartdate2
110          _RL     snowprecipstartdate
111          _RL     snowprecipperiod
112          _RL     snowprecipconst
113          _RL     snowprecip_exfremo_intercept
114          _RL     snowprecip_exfremo_slope
115          character*1 snowprecipmask
116          parameter(  snowprecipmask = 's' )
117    
118        integer runoffstartdate1        integer runoffstartdate1
119        integer runoffstartdate2        integer runoffstartdate2
120        _RL     runoffstartdate        _RL     runoffstartdate
# Line 153  c     data values Line 165  c     data values
165        character*1 vwindmask        character*1 vwindmask
166        parameter(  vwindmask = 's' )        parameter(  vwindmask = 's' )
167    
168          integer wspeedstartdate1
169          integer wspeedstartdate2
170          _RL     wspeedstartdate
171          _RL     wspeedperiod
172          _RL     wspeedconst
173          _RL     wspeed_exfremo_intercept
174          _RL     wspeed_exfremo_slope
175          character*1 wspeedmask
176          parameter(  wspeedmask = 's' )
177    
178        integer swfluxstartdate1        integer swfluxstartdate1
179        integer swfluxstartdate2        integer swfluxstartdate2
180        _RL     swfluxstartdate        _RL     swfluxstartdate
# Line 229  c     File names. Line 251  c     File names.
251        character*(128) aqhfile        character*(128) aqhfile
252        character*(128) evapfile        character*(128) evapfile
253        character*(128) precipfile        character*(128) precipfile
254          character*(128) snowprecipfile
255        character*(128) sfluxfile        character*(128) sfluxfile
256        character*(128) runofffile        character*(128) runofffile
257        character*(128) ustressfile        character*(128) ustressfile
258        character*(128) vstressfile        character*(128) vstressfile
259        character*(128) uwindfile        character*(128) uwindfile
260        character*(128) vwindfile        character*(128) vwindfile
261          character*(128) wspeedfile
262        character*(128) swfluxfile        character*(128) swfluxfile
263        character*(128) lwfluxfile        character*(128) lwfluxfile
264        character*(128) swdownfile        character*(128) swdownfile
# Line 249  C                           instead of _ Line 273  C                           instead of _
273        logical useExfCheckRange        logical useExfCheckRange
274    
275        common /exf_param_l/        common /exf_param_l/
276       &                          useExfYearlyFields, twoDigitYear,       &                     useExfYearlyFields, twoDigitYear,
277       &                          useExfCheckRange       &                     useExfCheckRange
278        common /exf_param_i/        common /exf_param_i/
279       &                          hfluxstartdate1,   hfluxstartdate2,       &                     hfluxstartdate1,   hfluxstartdate2,
280       &                          atempstartdate1,   atempstartdate2,       &                     atempstartdate1,   atempstartdate2,
281       &                          aqhstartdate1,     aqhstartdate2,       &                     aqhstartdate1,     aqhstartdate2,
282       &                          sfluxstartdate1,   sfluxstartdate2,       &                     sfluxstartdate1,   sfluxstartdate2,
283       &                          evapstartdate1,    evapstartdate2,       &                     evapstartdate1,    evapstartdate2,
284       &                          runoffstartdate1,  runoffstartdate2,       &                     runoffstartdate1,  runoffstartdate2,
285       &                          precipstartdate1,  precipstartdate2,       &                     precipstartdate1,  precipstartdate2,
286       &                          ustressstartdate1, ustressstartdate2,       &                     snowprecipstartdate1, snowprecipstartdate2,
287       &                          vstressstartdate1, vstressstartdate2,       &                     ustressstartdate1, ustressstartdate2,
288       &                          uwindstartdate1,   uwindstartdate2,       &                     vstressstartdate1, vstressstartdate2,
289       &                          vwindstartdate1,   vwindstartdate2,       &                     uwindstartdate1,   uwindstartdate2,
290       &                          swfluxstartdate1,  swfluxstartdate2,       &                     vwindstartdate1,   vwindstartdate2,
291       &                          lwfluxstartdate1,  lwfluxstartdate2,       &                     wspeedstartdate1,  wspeedstartdate2,
292       &                          swdownstartdate1,  swdownstartdate2,       &                     swfluxstartdate1,  swfluxstartdate2,
293       &                          lwdownstartdate1,  lwdownstartdate2,       &                     lwfluxstartdate1,  lwfluxstartdate2,
294       &                          obcsNstartdate1,   obcsNstartdate2,       &                     swdownstartdate1,  swdownstartdate2,
295       &                          obcsSstartdate1,   obcsSstartdate2,       &                     lwdownstartdate1,  lwdownstartdate2,
296       &                          obcsEstartdate1,   obcsEstartdate2,       &                     obcsNstartdate1,   obcsNstartdate2,
297       &                          obcsWstartdate1,   obcsWstartdate2,       &                     obcsSstartdate1,   obcsSstartdate2,
298       &                          apressurestartdate1,apressurestartdate2       &                     obcsEstartdate1,   obcsEstartdate2,
299         &                     obcsWstartdate1,   obcsWstartdate2,
300         &                     apressurestartdate1,apressurestartdate2
301    
302        common /exf_param_r/        common /exf_param_r/
303       &                          year2sec,          windstressmax,       &                     year2sec,          windstressmax,
304       &                          repeatPeriod,      exf_albedo,       &                     repeatPeriod,      exf_albedo,
305       &                          hfluxperiod,       hfluxstartdate,       &                     surfEmittance,
306       &                          atempperiod,       atempstartdate,       &                     hfluxperiod,       hfluxstartdate,
307       &                          aqhperiod,         aqhstartdate,       &                     atempperiod,       atempstartdate,
308       &                          sfluxperiod,       sfluxstartdate,       &                     aqhperiod,         aqhstartdate,
309       &                          evapperiod,        evapstartdate,       &                     sfluxperiod,       sfluxstartdate,
310       &                          precipperiod,      precipstartdate,       &                     evapperiod,        evapstartdate,
311       &                          runoffperiod,      runoffstartdate,       &                     precipperiod,      precipstartdate,
312       &                          ustressperiod,     ustressstartdate,       &                     snowprecipperiod,  snowprecipstartdate,
313       &                          vstressperiod,     vstressstartdate,       &                     runoffperiod,      runoffstartdate,
314       &                          uwindperiod,       uwindstartdate,       &                     ustressperiod,     ustressstartdate,
315       &                          vwindperiod,       vwindstartdate,       &                     vstressperiod,     vstressstartdate,
316       &                          swfluxperiod,      swfluxstartdate,       &                     uwindperiod,       uwindstartdate,
317       &                          lwfluxperiod,      lwfluxstartdate,       &                     vwindperiod,       vwindstartdate,
318       &                          swdownperiod,      swdownstartdate,       &                     wspeedperiod,      wspeedstartdate,
319       &                          lwdownperiod,      lwdownstartdate,       &                     swfluxperiod,      swfluxstartdate,
320       &                          obcsNperiod,       obcsNstartdate,       &                     lwfluxperiod,      lwfluxstartdate,
321       &                          obcsSperiod,       obcsSstartdate,       &                     swdownperiod,      swdownstartdate,
322       &                          obcsEperiod,       obcsEstartdate,       &                     lwdownperiod,      lwdownstartdate,
323       &                          obcsWperiod,       obcsWstartdate,       &                     obcsNperiod,       obcsNstartdate,
324       &                          apressureperiod,   apressurestartdate,       &                     obcsSperiod,       obcsSstartdate,
325       &                          hfluxconst,       &                     obcsEperiod,       obcsEstartdate,
326       &                          atempconst,       &                     obcsWperiod,       obcsWstartdate,
327       &                          aqhconst,       &                     apressureperiod,   apressurestartdate,
328       &                          sfluxconst,       &                     hfluxconst,
329       &                          evapconst,       &                     atempconst,
330       &                          precipconst,       &                     aqhconst,
331       &                          runoffconst,       &                     sfluxconst,
332       &                          ustressconst,       &                     evapconst,
333       &                          vstressconst,       &                     precipconst,
334       &                          uwindconst,       &                     snowprecipconst,
335       &                          vwindconst,       &                     runoffconst,
336       &                          swfluxconst,       &                     ustressconst,
337       &                          lwfluxconst,       &                     vstressconst,
338       &                          swdownconst,       &                     uwindconst,
339       &                          lwdownconst,       &                     vwindconst,
340       &                          apressureconst       &                     wspeedconst,
341         &                     swfluxconst,
342         &                     lwfluxconst,
343         &                     swdownconst,
344         &                     lwdownconst,
345         &                     apressureconst
346    
347        common /exf_param_trend_removal/        common /exf_param_trend_removal/
348       &                          hflux_exfremo_intercept,       &                     hflux_exfremo_intercept,
349       &                          atemp_exfremo_intercept,       &                     atemp_exfremo_intercept,
350       &                          aqh_exfremo_intercept,       &                     aqh_exfremo_intercept,
351       &                          sflux_exfremo_intercept,       &                     sflux_exfremo_intercept,
352       &                          evap_exfremo_intercept,       &                     evap_exfremo_intercept,
353       &                          precip_exfremo_intercept,       &                     precip_exfremo_intercept,
354       &                          runoff_exfremo_intercept,       &                     snowprecip_exfremo_intercept,
355       &                          ustress_exfremo_intercept,       &                     runoff_exfremo_intercept,
356       &                          vstress_exfremo_intercept,       &                     ustress_exfremo_intercept,
357       &                          uwind_exfremo_intercept,       &                     vstress_exfremo_intercept,
358       &                          vwind_exfremo_intercept,       &                     uwind_exfremo_intercept,
359       &                          swflux_exfremo_intercept,       &                     vwind_exfremo_intercept,
360       &                          lwflux_exfremo_intercept,       &                     wspeed_exfremo_intercept,
361       &                          swdown_exfremo_intercept,       &                     swflux_exfremo_intercept,
362       &                          lwdown_exfremo_intercept,       &                     lwflux_exfremo_intercept,
363       &                          apressure_exfremo_intercept,       &                     swdown_exfremo_intercept,
364       &                          hflux_exfremo_slope,       &                     lwdown_exfremo_intercept,
365       &                          atemp_exfremo_slope,       &                     apressure_exfremo_intercept,
366       &                          aqh_exfremo_slope,       &                     hflux_exfremo_slope,
367       &                          sflux_exfremo_slope,       &                     atemp_exfremo_slope,
368       &                          evap_exfremo_slope,       &                     aqh_exfremo_slope,
369       &                          precip_exfremo_slope,       &                     sflux_exfremo_slope,
370       &                          runoff_exfremo_slope,       &                     evap_exfremo_slope,
371       &                          ustress_exfremo_slope,       &                     precip_exfremo_slope,
372       &                          vstress_exfremo_slope,       &                     snowprecip_exfremo_slope,
373       &                          uwind_exfremo_slope,       &                     runoff_exfremo_slope,
374       &                          vwind_exfremo_slope,       &                     ustress_exfremo_slope,
375       &                          swflux_exfremo_slope,       &                     vstress_exfremo_slope,
376       &                          lwflux_exfremo_slope,       &                     uwind_exfremo_slope,
377       &                          swdown_exfremo_slope,       &                     vwind_exfremo_slope,
378       &                          lwdown_exfremo_slope,       &                     wspeed_exfremo_slope,
379       &                          apressure_exfremo_slope       &                     swflux_exfremo_slope,
380         &                     lwflux_exfremo_slope,
381         &                     swdown_exfremo_slope,
382         &                     lwdown_exfremo_slope,
383         &                     apressure_exfremo_slope
384    
385        common /exf_param_c/        common /exf_param_c/
386       &                          hfluxfile,       &                     hfluxfile,
387       &                          atempfile,       &                     atempfile,
388       &                          aqhfile,       &                     aqhfile,
389       &                          sfluxfile,       &                     sfluxfile,
390       &                          evapfile,       &                     evapfile,
391       &                          precipfile,       &                     precipfile,
392       &                          runofffile,       &                     snowprecipfile,
393       &                          ustressfile,       &                     runofffile,
394       &                          vstressfile,       &                     ustressfile,
395       &                          uwindfile,       &                     vstressfile,
396       &                          vwindfile,       &                     uwindfile,
397       &                          swfluxfile,       &                     vwindfile,
398       &                          lwfluxfile,       &                     wspeedfile,
399       &                          swdownfile,       &                     swfluxfile,
400       &                          lwdownfile,       &                     lwfluxfile,
401       &                          apressurefile       &                     swdownfile,
402         &                     lwdownfile,
403         &                     apressurefile
404    
405  c     file precision and field type  c     file precision and field type
406    
407        common /exf_param_type/        common /exf_param_type/
408       &                        exf_iprec,       &                     exf_iprec,
409       &                        exf_yftype       &                     exf_yftype
410    
411        integer exf_iprec        integer exf_iprec
412        character*(2) exf_yftype        character*(2) exf_yftype
# Line 385  c     exf_outscale_*    output scaling f Line 422  c     exf_outscale_*    output scaling f
422        _RL     exf_inscal_vstress        _RL     exf_inscal_vstress
423        _RL     exf_inscal_uwind        _RL     exf_inscal_uwind
424        _RL     exf_inscal_vwind        _RL     exf_inscal_vwind
425          _RL     exf_inscal_wspeed
426        _RL     exf_inscal_swflux        _RL     exf_inscal_swflux
427        _RL     exf_inscal_lwflux        _RL     exf_inscal_lwflux
428        _RL     exf_inscal_precip        _RL     exf_inscal_precip
429          _RL     exf_inscal_snowprecip
430        _RL     exf_inscal_sst        _RL     exf_inscal_sst
431        _RL     exf_inscal_sss        _RL     exf_inscal_sss
432        _RL     exf_inscal_atemp        _RL     exf_inscal_atemp
# Line 415  c     exf_outscale_*    output scaling f Line 454  c     exf_outscale_*    output scaling f
454       &                    , exf_inscal_vstress       &                    , exf_inscal_vstress
455       &                    , exf_inscal_uwind       &                    , exf_inscal_uwind
456       &                    , exf_inscal_vwind       &                    , exf_inscal_vwind
457         &                    , exf_inscal_wspeed
458       &                    , exf_inscal_swflux       &                    , exf_inscal_swflux
459       &                    , exf_inscal_lwflux       &                    , exf_inscal_lwflux
460       &                    , exf_inscal_precip       &                    , exf_inscal_precip
461         &                    , exf_inscal_snowprecip
462       &                    , exf_inscal_sst       &                    , exf_inscal_sst
463       &                    , exf_inscal_sss       &                    , exf_inscal_sss
464       &                    , exf_inscal_atemp       &                    , exf_inscal_atemp
# Line 475  c for lat interpolation, arraysize curre Line 516  c for lat interpolation, arraysize curre
516        _RL precip_lon0, precip_lon_inc        _RL precip_lon0, precip_lon_inc
517        _RL precip_lat0, precip_lat_inc(MAX_LAT_INC)        _RL precip_lat0, precip_lat_inc(MAX_LAT_INC)
518        INTEGER precip_nlon, precip_nlat        INTEGER precip_nlon, precip_nlat
519          _RL snowprecip_lon0, snowprecip_lon_inc
520          _RL snowprecip_lat0, snowprecip_lat_inc(MAX_LAT_INC)
521          INTEGER snowprecip_nlon, snowprecip_nlat
522        _RL uwind_lon0, uwind_lon_inc        _RL uwind_lon0, uwind_lon_inc
523        _RL uwind_lat0, uwind_lat_inc(MAX_LAT_INC)        _RL uwind_lat0, uwind_lat_inc(MAX_LAT_INC)
524        INTEGER uwind_nlon, uwind_nlat        INTEGER uwind_nlon, uwind_nlat
525        _RL vwind_lon0, vwind_lon_inc        _RL vwind_lon0, vwind_lon_inc
526        _RL vwind_lat0, vwind_lat_inc(MAX_LAT_INC)        _RL vwind_lat0, vwind_lat_inc(MAX_LAT_INC)
527        INTEGER vwind_nlon, vwind_nlat        INTEGER vwind_nlon, vwind_nlat
528          _RL wspeed_lon0, wspeed_lon_inc
529          _RL wspeed_lat0, wspeed_lat_inc(MAX_LAT_INC)
530          INTEGER wspeed_nlon, wspeed_nlat
531        _RL lwflux_lon0, lwflux_lon_inc        _RL lwflux_lon0, lwflux_lon_inc
532        _RL lwflux_lat0, lwflux_lat_inc(MAX_LAT_INC)        _RL lwflux_lat0, lwflux_lat_inc(MAX_LAT_INC)
533        INTEGER lwflux_nlon, lwflux_nlat        INTEGER lwflux_nlon, lwflux_nlat
# Line 525  c for lat interpolation, arraysize curre Line 572  c for lat interpolation, arraysize curre
572       & precip_lon0, precip_lon_inc,       & precip_lon0, precip_lon_inc,
573       & precip_lat0, precip_lat_inc,       & precip_lat0, precip_lat_inc,
574       & precip_nlon, precip_nlat,       & precip_nlon, precip_nlat,
575         & snowprecip_lon0, snowprecip_lon_inc,
576         & snowprecip_lat0, snowprecip_lat_inc,
577         & snowprecip_nlon, snowprecip_nlat,
578       & uwind_lon0, uwind_lon_inc,       & uwind_lon0, uwind_lon_inc,
579       & uwind_lat0, uwind_lat_inc,       & uwind_lat0, uwind_lat_inc,
580       & uwind_nlon, uwind_nlat,       & uwind_nlon, uwind_nlat,
581       & vwind_lon0, vwind_lon_inc,       & vwind_lon0, vwind_lon_inc,
582       & vwind_lat0, vwind_lat_inc,       & vwind_lat0, vwind_lat_inc,
583       & vwind_nlon, vwind_nlat,       & vwind_nlon, vwind_nlat,
584         & wspeed_lon0, wspeed_lon_inc,
585         & wspeed_lat0, wspeed_lat_inc,
586         & wspeed_nlon, wspeed_nlat,
587       & lwflux_lon0, lwflux_lon_inc,       & lwflux_lon0, lwflux_lon_inc,
588       & lwflux_lat0, lwflux_lat_inc,       & lwflux_lat0, lwflux_lat_inc,
589       & lwflux_nlon, lwflux_nlat,       & lwflux_nlon, lwflux_nlat,
Legend:
Removed from v.1.23  
changed lines
  Added in v.1.24
  ViewVC Help
Powered by ViewVC 1.1.22