| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/SEAICE_PARAMS.h |
424 |
NO PROCEDURE |
_RL SEAICEpresH0 |
|
./pkg/seaice/SEAICE_PARAMS.h |
438 |
NO PROCEDURE |
& SEAICEpresH0, |
|
./pkg/seaice/seaice_calc_ice_strength.F |
103 |
SEAICE_CALC_ICE_STRENGTH |
IF ( (HEFF(i,j,bi,bj).LE.SEAICEpresH0).AND. |
|
./pkg/seaice/seaice_calc_ice_strength.F |
105 |
SEAICE_CALC_ICE_STRENGTH |
tmpscal1=MAX(HEFF(i,j,bi,bj)/SEAICEpresH0,ZERO) |
|
./pkg/seaice/seaice_calc_ice_strength.F |
106 |
SEAICE_CALC_ICE_STRENGTH |
tmpscal2=SEAICEpresH0*(tmpscal1**SEAICEpresPow0) |
|
./pkg/seaice/seaice_calc_ice_strength.F |
107 |
SEAICE_CALC_ICE_STRENGTH |
ELSEIF ( (HEFF(i,j,bi,bj).GT.SEAICEpresH0).AND. |
|
./pkg/seaice/seaice_calc_ice_strength.F |
109 |
SEAICE_CALC_ICE_STRENGTH |
tmpscal1=MAX(HEFF(i,j,bi,bj)/SEAICEpresH0,ZERO) |
|
./pkg/seaice/seaice_calc_ice_strength.F |
110 |
SEAICE_CALC_ICE_STRENGTH |
tmpscal2=SEAICEpresH0*(tmpscal1**SEAICEpresPow1) |
|
./pkg/seaice/seaice_check.F |
385 |
SEAICE_CHECK |
IF ( SEAICEpresH0 .LE. 0. _d 0 .OR. |
|
./pkg/seaice/seaice_readparms.F |
117 |
SEAICE_READPARMS |
& SEAICEpresH0, SEAICEpresPow0, SEAICEpresPow1, |
|
./pkg/seaice/seaice_readparms.F |
298 |
SEAICE_READPARMS |
SEAICEpresH0 = 1. _d 0 |
|
./pkg/seaice/seaice_summary.F |
144 |
SEAICE_SUMMARY |
CALL WRITE_0D_RL( SEAICEpresH0 ,INDEX_NONE, |