| File |
Line number |
Procedure |
Code |
|
./pkg/streamice/STREAMICE.h |
308 |
NO PROCEDURE |
& float_frac_streamice, |
|
./pkg/streamice/STREAMICE.h |
385 |
NO PROCEDURE |
_RL float_frac_streamice (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
|
./pkg/streamice/streamice_advect_thickness.F |
331 |
STREAMICE_ADVECT_THICKNESS |
MR = (1.-float_frac_streamice(i,j,bi,bj)) * |
|
./pkg/streamice/streamice_diagnostics_state.F |
50 |
STREAMICE_DIAGNOSTICS_STATE |
CALL DIAGNOSTICS_FILL(float_frac_streamice,'SI_float', |
|
./pkg/streamice/streamice_driving_stress.F |
123 |
STREAMICE_DRIVING_STRESS |
IF (float_frac_streamice(i,j,bi,bj) .eq. 1.0) THEN |
|
./pkg/streamice/streamice_driving_stress.F |
169 |
STREAMICE_DRIVING_STRESS |
IF (float_frac_streamice(i-1,j-1,bi,bj) .eq. 1.0) THEN |
|
./pkg/streamice/streamice_driving_stress.F |
193 |
STREAMICE_DRIVING_STRESS |
IF (float_frac_streamice(i,j-1,bi,bj) .eq. 1.0) THEN |
|
./pkg/streamice/streamice_driving_stress.F |
242 |
STREAMICE_DRIVING_STRESS |
IF (float_frac_streamice(i,j-1,bi,bj) .eq. 1.0) THEN |
|
./pkg/streamice/streamice_driving_stress.F |
266 |
STREAMICE_DRIVING_STRESS |
IF (float_frac_streamice(i,j,bi,bj) .eq. 1.0) THEN |
|
./pkg/streamice/streamice_driving_stress.F |
313 |
STREAMICE_DRIVING_STRESS |
IF (float_frac_streamice(i-1,j-1,bi,bj) .eq. 1.0) THEN |
|
./pkg/streamice/streamice_driving_stress.F |
337 |
STREAMICE_DRIVING_STRESS |
IF (float_frac_streamice(i-1,j,bi,bj) .eq. 1.0) THEN |
|
./pkg/streamice/streamice_driving_stress.F |
99 |
STREAMICE_DRIVING_STRESS |
IF (float_frac_streamice(i-1,j,bi,bj) .eq. 1.0) THEN |
|
./pkg/streamice/streamice_driving_stress_ppm.F |
345 |
STREAMICE_DRIVING_STRESS_PPM |
IF (float_frac_streamice(i,j,bi,bj) .eq. 1.0) then |
|
./pkg/streamice/streamice_forced_buttress.F |
54 |
STREAMICE_FORCED_BUTTRESS |
IF (float_frac_streamice(i,j,bi,bj) .eq. 1.0) THEN |
|
./pkg/streamice/streamice_init_varia.F |
59 |
STREAMICE_INIT_VARIA |
float_frac_streamice(i,j,bi,bj) = 0. _d 0 |
|
./pkg/streamice/streamice_upd_ffrac_uncoupled.F |
105 |
STREAMICE_UPD_FFRAC_UNCOUPLED |
float_frac_streamice(i,j,bi,bj) = 0.0 |
|
./pkg/streamice/streamice_upd_ffrac_uncoupled.F |
116 |
STREAMICE_UPD_FFRAC_UNCOUPLED |
float_frac_streamice(i,j,bi,bj) = 1.0 |
|
./pkg/streamice/streamice_upd_ffrac_uncoupled.F |
133 |
STREAMICE_UPD_FFRAC_UNCOUPLED |
_EXCH_XY_RL(float_frac_streamice, myThid ) |
|
./pkg/streamice/streamice_upd_ffrac_uncoupled.F |
75 |
STREAMICE_UPD_FFRAC_UNCOUPLED |
float_frac_streamice(i,j,bi,bj) = |
|
./pkg/streamice/streamice_visc_beta.F |
107 |
STREAMICE_VISC_BETA |
& float_frac_streamice (i,j,bi,bj) |
|
./pkg/streamice/streamice_visc_beta_hybrid.F |
205 |
STREAMICE_VISC_BETA_HYBRID |
& float_frac_streamice(i,j,bi,bj) |