File |
Line number |
Procedure |
Code |
./pkg/streamice/streamice_visc_beta_hybrid.F |
111 |
STREAMICE_VISC_BETA_HYBRID |
u_shear(Nr+1) = 0.0 |
./pkg/streamice/streamice_visc_beta_hybrid.F |
184 |
STREAMICE_VISC_BETA_HYBRID |
u_shear (m) = u_shear (m+1) + |
./pkg/streamice/streamice_visc_beta_hybrid.F |
204 |
STREAMICE_VISC_BETA_HYBRID |
& streamice_delsigma(m)*(u_shear(m)+u_shear(m+1))*.5 |
./pkg/streamice/streamice_visc_beta_hybrid.F |
212 |
STREAMICE_VISC_BETA_HYBRID |
& u_shear(1) + umid - mean_u_shear |
./pkg/streamice/streamice_visc_beta_hybrid.F |
46 |
STREAMICE_VISC_BETA_HYBRID |
_RL omega_temp (Nr+1), u_shear(Nr+1), v_shear(Nr+1) |