| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/SEAICE_PARAMS.h |
428 |
NO PROCEDURE |
_RL SEAICEgStar, SEAICEhStar, SEAICEaStar, SEAICEshearParm |
|
./pkg/seaice/SEAICE_PARAMS.h |
469 |
NO PROCEDURE |
& SEAICEgStar, SEAICEhStar, SEAICEaStar, SEAICEshearParm, |
|
./pkg/seaice/seaice_prepare_ridging.F |
149 |
SEAICE_PREPARE_RIDGING |
recip_gStar = 1. _d 0 / SEAICEgStar |
|
./pkg/seaice/seaice_prepare_ridging.F |
154 |
SEAICE_PREPARE_RIDGING |
IF ( gSum(i,j,k) .LT. SEAICEgStar ) THEN |
|
./pkg/seaice/seaice_prepare_ridging.F |
158 |
SEAICE_PREPARE_RIDGING |
ELSEIF ( gSum(i,j,k-1) .LT. SEAICEgStar |
|
./pkg/seaice/seaice_prepare_ridging.F |
159 |
SEAICE_PREPARE_RIDGING |
& .AND. gSum(i,j,k) .GE. SEAICEgStar ) THEN |
|
./pkg/seaice/seaice_prepare_ridging.F |
161 |
SEAICE_PREPARE_RIDGING |
& (SEAICEgStar-gSum(i,j,k-1)) * recip_gStar |
|
./pkg/seaice/seaice_prepare_ridging.F |
162 |
SEAICE_PREPARE_RIDGING |
& *( 2. _d 0 - (gSum(i,j,k-1)+SEAICEgStar)*recip_gStar) |
|
./pkg/seaice/seaice_readparms.F |
114 |
SEAICE_READPARMS |
& SEAICEgStar, SEAICEhStar, SEAICEaStar, SEAICEshearParm, |
|
./pkg/seaice/seaice_readparms.F |
227 |
SEAICE_READPARMS |
SEAICEgStar = 0.15 _d 0 |
|
./pkg/seaice/seaice_summary.F |
455 |
SEAICE_SUMMARY |
CALL WRITE_0D_RL( SEAICEgStar ,INDEX_NONE, |