Parent Directory | Revision Log | Revision Graph | Patch
revision 1.17 by dimitri, Thu Oct 23 07:14:49 2003 UTC | revision 1.17.2.1 by dimitri, Mon Nov 1 20:03:35 2004 UTC | |
---|---|---|
# | Line 101 C-- Apply mask and test consistancy | Line 101 C-- Apply mask and test consistancy |
101 | ENDIF | ENDIF |
102 | ||
103 | C-- Check that there are no values of temperature below freezing point. | C-- Check that there are no values of temperature below freezing point. |
104 | Tfreezing=-1.9 | Tfreezing=-3 |
105 | IF ( allowFreezing ) THEN | IF ( allowFreezing ) THEN |
106 | DO bj = myByLo(myThid), myByHi(myThid) | DO bj = myByLo(myThid), myByHi(myThid) |
107 | DO bi = myBxLo(myThid), myBxHi(myThid) | DO bi = myBxLo(myThid), myBxHi(myThid) |
|
ViewVC Help | |
Powered by ViewVC 1.1.22 |