53 |
#include "exf_param.h" |
#include "exf_param.h" |
54 |
#include "exf_constants.h" |
#include "exf_constants.h" |
55 |
#include "exf_fields.h" |
#include "exf_fields.h" |
56 |
|
#include "exf_clim_param.h" |
57 |
#include "exf_clim_fields.h" |
#include "exf_clim_fields.h" |
58 |
#ifdef ALLOW_AUTODIFF_TAMC |
#ifdef ALLOW_AUTODIFF_TAMC |
59 |
# include "tamc.h" |
# include "tamc.h" |
68 |
c == local variables == |
c == local variables == |
69 |
|
|
70 |
integer bi,bj |
integer bi,bj |
71 |
integer i,j |
integer i,j,k |
72 |
integer jtlo |
integer jtlo |
73 |
integer jthi |
integer jthi |
74 |
integer itlo |
integer itlo |
240 |
#ifdef ALLOW_CLIMSSS_RELAXATION |
#ifdef ALLOW_CLIMSSS_RELAXATION |
241 |
_EXCH_XY_R4( sss, mythid ) |
_EXCH_XY_R4( sss, mythid ) |
242 |
#endif |
#endif |
243 |
|
#ifdef ALLOW_CLIMTEMP_RELAXATION |
244 |
|
_EXCH_XYZ_R4( thetaStar, mythid ) |
245 |
|
#endif |
246 |
|
#ifdef ALLOW_CLIMSALT_RELAXATION |
247 |
|
_EXCH_XYZ_R4( saltStar, mythid ) |
248 |
|
#endif |
249 |
#ifdef ATMOSPHERIC_LOADING |
#ifdef ATMOSPHERIC_LOADING |
250 |
_EXCH_XY_R4( pload, mythid ) |
_EXCH_XY_R4( pload, mythid ) |
251 |
#endif |
#endif |