| File |
Line number |
Procedure |
Code |
|
./pkg/streamice/streamice_taub.F |
38 |
STREAMICE_TAUB |
_RL ux, uy, vx, vy, exx, eyy, exy, second_inv, unorm |
|
./pkg/streamice/streamice_visc_beta.F |
103 |
STREAMICE_VISC_BETA |
unorm = sqrt(umid**2+vmid**2+eps_u_min**2) |
|
./pkg/streamice/streamice_visc_beta.F |
106 |
STREAMICE_VISC_BETA |
& unorm ** (n_basal_friction-1.0) * |
|
./pkg/streamice/streamice_visc_beta.F |
37 |
STREAMICE_VISC_BETA |
_RL ux, uy, vx, vy, exx, eyy, exy, second_inv, unorm |
|
./pkg/streamice/streamice_visc_beta_hybrid.F |
200 |
STREAMICE_VISC_BETA_HYBRID |
unorm = sqrt(ub**2+vb**2+eps_u_min**2) |
|
./pkg/streamice/streamice_visc_beta_hybrid.F |
203 |
STREAMICE_VISC_BETA_HYBRID |
& STREAMICE_BSTRESS_EXP (unorm,n_basal_friction) * |
|
./pkg/streamice/streamice_visc_beta_hybrid.F |
41 |
STREAMICE_VISC_BETA_HYBRID |
_RL ux, uy, vx, vy, exx, eyy, exy, unorm, second_inv |