| 57 | 
 C   (3-D generalisation of oceanic real-fresh water flux) | 
 C   (3-D generalisation of oceanic real-fresh water flux) | 
| 58 | 
 #undef ALLOW_ADDFLUID | 
 #undef ALLOW_ADDFLUID | 
| 59 | 
  | 
  | 
| 60 | 
  | 
 C o Choices for implicit solver routines solve_*diagonal.F | 
| 61 | 
  | 
 C   The following has low memory footprint, but not suitable for AD | 
| 62 | 
  | 
 #define SOLVE_DIAGONAL_LOWMEMORY | 
| 63 | 
  | 
 C   The following one suitable for AD but does not vectorize | 
| 64 | 
  | 
 #undef SOLVE_DIAGONAL_KINNER | 
| 65 | 
  | 
  | 
| 66 | 
 C o ALLOW isotropic scaling of harmonic and bi-harmonic terms when | 
 C o ALLOW isotropic scaling of harmonic and bi-harmonic terms when | 
| 67 | 
 C   using an locally isotropic spherical grid with (dlambda) x (dphi*cos(phi)) | 
 C   using an locally isotropic spherical grid with (dlambda) x (dphi*cos(phi)) | 
| 68 | 
 C *only for use on a lat-lon grid* | 
 C *only for use on a lat-lon grid* |