[MITgcm-cvs] MITgcm/pkg/seaice CVS Commit
Martin Losch
mlosch at forge.csail.mit.edu
Sun Oct 17 05:51:05 EDT 2010
Update of /u/gcmpack/MITgcm/pkg/seaice
In directory forge:/tmp/cvs-serv24356/pkg/seaice
Modified Files:
seaice_solve4temp.F
Log Message:
vectorize seaice_solve4temp.F
- move iterations loops outside of i/j-loops
- requires 2D arrays for TB and effConduct
- add 2D iceOrNot to replace HICE_ACTUAL.GT.0, as HICE_ACTUAL is
modified in this routine
- a little bit of clean up, adjusting indentation, etc.
- replaced a few TEN**a by exp(a*log(10.)) in new code for better
performance and '**TWO' by '**2' (because TWO is a float),
replaced ONE, ZERO
More information about the MITgcm-cvs
mailing list