File |
Line number |
Procedure |
Code |
./pkg/seaice/SEAICE_PARAMS.h |
474 |
NO PROCEDURE |
_RL SEAICE_strength, SEAICE_cStar, SEAICEpressReplFac |
./pkg/seaice/SEAICE_PARAMS.h |
528 |
NO PROCEDURE |
& SEAICEpressReplFac, SEAICE_tensilFac, SEAICE_tensilDepth, |
./pkg/seaice/seaice_calc_viscosities.F |
171 |
SEAICE_CALC_VISCOSITIES |
& ( press0(I,J,bi,bj)*( 1. _d 0 - SEAICEpressReplFac ) |
./pkg/seaice/seaice_calc_viscosities.F |
173 |
SEAICE_CALC_VISCOSITIES |
& * SEAICEpressReplFac/( 1. _d 0 + tnsFac(I,J,bi,bj) ) |
./pkg/seaice/seaice_check.F |
954 |
SEAICE_CHECK |
IF ( SEAICEpressReplFac .LT. 0. _d 0 .OR. |
./pkg/seaice/seaice_check.F |
955 |
SEAICE_CHECK |
& SEAICEpressReplFac .GT. 1. _d 0 ) THEN |
./pkg/seaice/seaice_check.F |
957 |
SEAICE_CHECK |
& 'SEAICE_CHECK: SEAICEpressReplFac = ', SEAICEpressReplFac |
./pkg/seaice/seaice_evp.F |
489 |
SEAICE_EVP |
& ( press0(I,J,bi,bj) * ( 1. _d 0 - SEAICEpressReplFac ) |
./pkg/seaice/seaice_evp.F |
490 |
SEAICE_EVP |
& + TWO*zetaC(I,J)*deltaC(I,J,bi,bj)*SEAICEpressReplFac |
./pkg/seaice/seaice_readparms.F |
149 |
SEAICE_READPARMS |
& SEAICEpressReplFac, SEAICE_tensilFac, SEAICE_tensilDepth, |
./pkg/seaice/seaice_readparms.F |
394 |
SEAICE_READPARMS |
SEAICEpressReplFac = 1. _d 0 |
./pkg/seaice/seaice_summary.F |
168 |
SEAICE_SUMMARY |
CALL WRITE_0D_RL( SEAICEpressReplFac,INDEX_NONE, |