| File |
Line number |
Procedure |
Code |
|
./pkg/streamice/STREAMICE.h |
387 |
NO PROCEDURE |
& U_streamice, |
|
./pkg/streamice/STREAMICE.h |
478 |
NO PROCEDURE |
_RL U_streamice (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
|
./pkg/streamice/streamice_diagnostics_state.F |
105 |
STREAMICE_DIAGNOSTICS_STATE |
CALL DIAGNOSTICS_FILL(U_streamice,'SI_Uvel ', |
|
./pkg/streamice/streamice_get_fp_err_oad.F |
61 |
STREAMICE_GET_FP_ERR_OAD |
& ABS (U_streamice(i,j,bi,bj)-u_new_SI(i,j,bi,bj)) |
|
./pkg/streamice/streamice_get_vel_fp_err.F |
62 |
STREAMICE_GET_VEL_FP_ERR |
& ABS (U_streamice(i,j,bi,bj)-u_new_SI(i,j,bi,bj)) |
|
./pkg/streamice/streamice_get_vel_fp_err.F |
64 |
STREAMICE_GET_VEL_FP_ERR |
& ABS (U_streamice(i,j,bi,bj)-u_old_SI(i,j,bi,bj)) |
|
./pkg/streamice/streamice_get_vel_fp_err.F |
92 |
STREAMICE_GET_VEL_FP_ERR |
& (ABS(U_streamice(i,j,bi,bj)- |
|
./pkg/streamice/streamice_get_vel_fp_err.F |
95 |
STREAMICE_GET_VEL_FP_ERR |
& (ABS(U_streamice(i,j,bi,bj)- |
|
./pkg/streamice/streamice_get_vel_resid_err.F |
79 |
STREAMICE_GET_VEL_RESID_ERR |
I U_streamice, |
|
./pkg/streamice/streamice_init_varia.F |
54 |
STREAMICE_INIT_VARIA |
U_streamice(i,j,bi,bj) = 0. _d 0 |
|
./pkg/streamice/streamice_read_pickup.F |
139 |
STREAMICE_READ_PICKUP |
CALL READ_MFLDS_3D_RL( 'SI_uvel ', U_streamice, |
|
./pkg/streamice/streamice_taub.F |
72 |
STREAMICE_TAUB |
& U_streamice(i+k,j+l,bi,bj) |
|
./pkg/streamice/streamice_timestep.F |
159 |
STREAMICE_TIMESTEP |
& U_streamice(i,j,bi,bj)**2 + |
|
./pkg/streamice/streamice_vel_phi.F |
57 |
STREAMICE_VEL_PHI |
_EXCH_XY_RL( U_streamice , myThid ) |
|
./pkg/streamice/streamice_vel_phi.F |
76 |
STREAMICE_VEL_PHI |
u_new_SI(i,j,bi,bj) = U_streamice(i,j,bi,bj) |
|
./pkg/streamice/streamice_vel_phistage.F |
143 |
STREAMICE_VEL_PHISTAGE |
U_streamice (i,j,bi,bj)=u_new_SI (i,j,bi,bj) |
|
./pkg/streamice/streamice_vel_solve.F |
220 |
STREAMICE_VEL_SOLVE |
& U_streamice, |
|
./pkg/streamice/streamice_vel_solve.F |
295 |
STREAMICE_VEL_SOLVE |
u_old_SI (i,j,bi,bj) = U_streamice (i,j,bi,bj) |
|
./pkg/streamice/streamice_vel_solve.F |
345 |
STREAMICE_VEL_SOLVE |
_EXCH_XY_RL(U_streamice, myThid) |
|
./pkg/streamice/streamice_vel_solve.F |
98 |
STREAMICE_VEL_SOLVE |
u_old_SI (i,j,bi,bj) = U_streamice (i,j,bi,bj) |
|
./pkg/streamice/streamice_vel_solve_openad.F |
239 |
STREAMICE_VEL_SOLVE_OPENAD |
_EXCH_XY_RL(U_streamice, myThid) |
|
./pkg/streamice/streamice_vel_solve_openad.F |
93 |
STREAMICE_VEL_SOLVE_OPENAD |
U_streamice (i,j,bi,bj)=U_streamice (i,j,bi,bj) |
|
./pkg/streamice/streamice_visc_beta.F |
54 |
STREAMICE_VISC_BETA |
& U_streamice(i+k,j+l,bi,bj) |
|
./pkg/streamice/streamice_visc_beta.F |
62 |
STREAMICE_VISC_BETA |
ux = (U_streamice(i+1,j+1,bi,bj) + |
|
./pkg/streamice/streamice_visc_beta.F |
63 |
STREAMICE_VISC_BETA |
& U_streamice(i+1,j,bi,bj) - |
|
./pkg/streamice/streamice_visc_beta.F |
64 |
STREAMICE_VISC_BETA |
& U_streamice(i,j+1,bi,bj) - |
|
./pkg/streamice/streamice_visc_beta.F |
65 |
STREAMICE_VISC_BETA |
& U_streamice(i,j,bi,bj)) / |
|
./pkg/streamice/streamice_visc_beta.F |
72 |
STREAMICE_VISC_BETA |
uy = (U_streamice(i+1,j+1,bi,bj) - |
|
./pkg/streamice/streamice_visc_beta.F |
73 |
STREAMICE_VISC_BETA |
& U_streamice(i+1,j,bi,bj) + |
|
./pkg/streamice/streamice_visc_beta.F |
74 |
STREAMICE_VISC_BETA |
& U_streamice(i,j+1,bi,bj) - |
|
./pkg/streamice/streamice_visc_beta.F |
75 |
STREAMICE_VISC_BETA |
& U_streamice(i,j,bi,bj)) / |
|
./pkg/streamice/streamice_visc_beta_hybrid.F |
74 |
STREAMICE_VISC_BETA_HYBRID |
& U_streamice(i+k,j+l,bi,bj) |
|
./pkg/streamice/streamice_visc_beta_hybrid.F |
82 |
STREAMICE_VISC_BETA_HYBRID |
ux = (U_streamice(i+1,j+1,bi,bj) + |
|
./pkg/streamice/streamice_visc_beta_hybrid.F |
83 |
STREAMICE_VISC_BETA_HYBRID |
& U_streamice(i+1,j,bi,bj) - |
|
./pkg/streamice/streamice_visc_beta_hybrid.F |
84 |
STREAMICE_VISC_BETA_HYBRID |
& U_streamice(i,j+1,bi,bj) - |
|
./pkg/streamice/streamice_visc_beta_hybrid.F |
85 |
STREAMICE_VISC_BETA_HYBRID |
& U_streamice(i,j,bi,bj)) / |
|
./pkg/streamice/streamice_visc_beta_hybrid.F |
92 |
STREAMICE_VISC_BETA_HYBRID |
uy = (U_streamice(i+1,j+1,bi,bj) - |
|
./pkg/streamice/streamice_visc_beta_hybrid.F |
93 |
STREAMICE_VISC_BETA_HYBRID |
& U_streamice(i+1,j,bi,bj) + |
|
./pkg/streamice/streamice_visc_beta_hybrid.F |
94 |
STREAMICE_VISC_BETA_HYBRID |
& U_streamice(i,j+1,bi,bj) - |
|
./pkg/streamice/streamice_visc_beta_hybrid.F |
95 |
STREAMICE_VISC_BETA_HYBRID |
& U_streamice(i,j,bi,bj)) / |
|
./pkg/streamice/streamice_write_pickup.F |
99 |
STREAMICE_WRITE_PICKUP |
CALL WRITE_REC_3D_RL( fn, fp, 1, U_streamice, |