File |
Line number |
Procedure |
Code |
./pkg/seaice/SEAICE_PARAMS.h |
472 |
NO PROCEDURE |
_RL SEAICEbasalDragK1, SEAICEbasalDragK2 |
./pkg/seaice/SEAICE_PARAMS.h |
525 |
NO PROCEDURE |
& SEAICEbasalDragK1, SEAICEbasalDragK2, |
./pkg/seaice/seaice_bottomdrag_coeffs.F |
118 |
SEAICE_BOTTOMDRAG_COEFFS |
tmpFld(I,J) = SEAICEbasalDragK2 / SQRT(tmp + u0sq) |
./pkg/seaice/seaice_calc_residual.F |
87 |
SEAICE_CALC_RESIDUAL |
IF (SEAICEbasalDragK2.GT.0. _d 0) CALL SEAICE_BOTTOMDRAG_COEFFS( |
./pkg/seaice/seaice_check.F |
966 |
SEAICE_CHECK |
IF ( SEAICEbasalDragK2 .GT. 0. _d 0 ) THEN |
./pkg/seaice/seaice_check.F |
968 |
SEAICE_CHECK |
& 'SEAICE_CHECK: SEAICEbasalDragK2 = ', SEAICEbasalDragK2 |
./pkg/seaice/seaice_evp.F |
750 |
SEAICE_EVP |
IF (SEAICEbasalDragK2.GT.0. _d 0) CALL SEAICE_BOTTOMDRAG_COEFFS( |
./pkg/seaice/seaice_krylov.F |
209 |
SEAICE_KRYLOV |
IF (SEAICEbasalDragK2.GT.0. _d 0) CALL SEAICE_BOTTOMDRAG_COEFFS( |
./pkg/seaice/seaice_lsr.F |
339 |
SEAICE_LSR |
IF (SEAICEbasalDragK2.GT.0. _d 0) CALL SEAICE_BOTTOMDRAG_COEFFS( |
./pkg/seaice/seaice_readparms.F |
147 |
SEAICE_READPARMS |
& SEAICEbasalDragK2, SEAICE_wetAlbTemp, SEAICE_waterAlbedo, |
./pkg/seaice/seaice_readparms.F |
383 |
SEAICE_READPARMS |
SEAICEbasalDragK2 = 0. _d 0 |
./pkg/seaice/seaice_summary.F |
149 |
SEAICE_SUMMARY |
IF ( SEAICEbasalDragK2 .NE. 0. _d 0 ) THEN |
./pkg/seaice/seaice_summary.F |
157 |
SEAICE_SUMMARY |
CALL WRITE_0D_RL( SEAICEbasalDragK2 ,INDEX_NONE, |