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

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

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

revision 1.13 by gforget, Tue Jul 13 00:02:10 2010 UTC revision 1.15 by gforget, Tue Aug 28 19:17:46 2012 UTC
# Line 42  c     == global variables == Line 42  c     == global variables ==
42  #include "EXF_FIELDS.h"  #include "EXF_FIELDS.h"
43  #include "EXF_PARAM.h"  #include "EXF_PARAM.h"
44  #ifdef ALLOW_AUTODIFF  #ifdef ALLOW_AUTODIFF
45    # include "CTRL_SIZE.h"
46  # include "ctrl.h"  # include "ctrl.h"
47  # include "ctrl_dummy.h"  # include "ctrl_dummy.h"
48  #endif  #endif
# Line 81  c     == end of interface == Line 82  c     == end of interface ==
82       &     mytime, myiter, mythid )       &     mytime, myiter, mythid )
83  #endif  #endif
84    
85          IF ( .NOT.useAtmWind ) THEN
86  #ifndef ALLOW_ROTATE_UV_CONTROLS  #ifndef ALLOW_ROTATE_UV_CONTROLS
87    
88  #ifdef ALLOW_USTRESS_CONTROL  #ifdef ALLOW_USTRESS_CONTROL
# Line 153  c     == end of interface == Line 155  c     == end of interface ==
155    
156  #endif  #endif
157  #endif /* ALLOW_ROTATE_UV_CONTROLS */  #endif /* ALLOW_ROTATE_UV_CONTROLS */
158          ENDIF
159    
160    
161        end        end
Legend:
Removed from v.1.13  
changed lines
  Added in v.1.15
  ViewVC Help
Powered by ViewVC 1.1.22