74 |
|
|
75 |
C---+----1----+----2----+----3----+----4----+----5----+----6----+----7-|--+----| |
C---+----1----+----2----+----3----+----4----+----5----+----6----+----7-|--+----| |
76 |
|
|
77 |
|
#ifdef ALLOW_SUBGLACIAL_RUNOFF |
78 |
|
IF ( SGrunofffile .NE. ' ' ) THEN |
79 |
|
CALL SGRUNOFF_READ(myTime, myIter, myThid) |
80 |
|
ENDIF |
81 |
|
#endif /* ALLOW_SUBGLACIAL_RUNOFF*/ |
82 |
|
|
83 |
C Linear dependence of freezing point on salinity. |
C Linear dependence of freezing point on salinity. |
84 |
a0 = -0.0575 _d 0 |
a0 = -0.0575 _d 0 |
85 |
c0 = 0.0901 _d 0 |
c0 = 0.0901 _d 0 |