[MITgcm-cvs] MITgcm/model/src CVS Commit
Patrick Heimbach
heimbach at forge.csail.mit.edu
Sun Mar 11 18:55:26 EDT 2012
Update of /u/gcmpack/MITgcm/model/src
In directory forge:/tmp/cvs-serv1478
Modified Files:
solve_pentadiagonal.F solve_tridiagonal.F
Log Message:
Modify diagonal solvers, now three versions (upon request):
#ifndef SOLVE_DIAGONAL_AUTODIFF
1. default version (dating back a while ago)
#else /* def SOLVE_DIAGONAL_AUTODIFF */
# ifdef SOLVE_DIAGONAL_KINNER
2. adjoinable version with k-innermost loop (G. Forget)
# else
3. adjoinable vectorized version of 2.
# endif
#endif /* SOLVE_DIAGONAL_AUTODIFF */
Flags are currently set within routine, could be moved to CPP-options
More information about the MITgcm-cvs
mailing list