/[MITgcm]/MITgcm/pkg/exf/exf_clim_readparms.F
ViewVC logotype

Diff of /MITgcm/pkg/exf/exf_clim_readparms.F

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

revision 1.2 by heimbach, Thu Mar 6 00:47:33 2003 UTC revision 1.3 by dimitri, Mon Aug 4 22:53:41 2003 UTC
# Line 27  c     == global variables == Line 27  c     == global variables ==
27  #include "SIZE.h"  #include "SIZE.h"
28  #include "cal.h"  #include "cal.h"
29  #include "exf.h"  #include "exf.h"
30    #include "exf_param.h"
31  #include "exf_clim_param.h"  #include "exf_clim_param.h"
32    
33  c     == routine arguments ==  c     == routine arguments ==
# Line 49  c     Surface flux data. Line 49  c     Surface flux data.
49       &       climtempfile,       climsaltfile,    climsstfile,       &       climtempfile,       climsaltfile,    climsstfile,
50       &        climsssfile,       climsstconst,   climsssconst,       &        climsssfile,       climsstconst,   climsssconst,
51       &     exf_clim_iprec, exf_clim_yftype       &     exf_clim_iprec, exf_clim_yftype
52    #ifdef USE_EXF_INTERPOLATION
53         & ,climsst_lon0, climsst_lon_inc,
54         & climsst_lat0, climsst_lat_inc,
55         & climsst_nlon, climsst_nlat,
56         & climsss_lon0, climsss_lon_inc,
57         & climsss_lat0, climsss_lat_inc,
58         & climsss_nlon, climsss_nlat
59    #endif
60    
61        _BEGIN_MASTER(mythid)        _BEGIN_MASTER(mythid)
62    
Legend:
Removed from v.1.2  
changed lines
  Added in v.1.3
  ViewVC Help
Powered by ViewVC 1.1.22