| File |
Line number |
Procedure |
Code |
|
./pkg/fizhi/fizhi_turb.F |
3077 |
PSI |
_RL X0(irun),X1(irun),Y0(irun),Y1(irun) |
|
./pkg/fizhi/fizhi_turb.F |
3133 |
PSI |
CALL PHI( Z0,X0,Y0,IFLAG,IBIT ) |
|
./pkg/fizhi/fizhi_turb.F |
3183 |
PSI |
ARG0(I) = 1. - Y0(I) |
|
./pkg/fizhi/fizhi_turb.F |
3187 |
PSI |
ARG1(I) = ARG1(I) * ( 1. + Y0(I) ) |
|
./pkg/fizhi/fizhi_turb.F |
3191 |
PSI |
PSI2(I) = PSI2(I) - Y1(I) + Y0(I) |
|
./pkg/fizhi/fizhi_turb.F |
3200 |
PSI |
VYS(I) = Y0(indx) |
|
./pkg/streamice/eta_gl_prime_streamice.F |
18 |
NO PROCEDURE |
_RL X, M1, M2, Y0, W |
|
./pkg/streamice/eta_gl_prime_streamice.F |
6 |
NO PROCEDURE |
_RL FUNCTION ETA_GL_PRIME_STREAMICE (X, M1, M2, Y0, W) |
|
./pkg/streamice/eta_gl_streamice.F |
18 |
NO PROCEDURE |
_RL X, M1, M2, Y0, W |
|
./pkg/streamice/eta_gl_streamice.F |
22 |
NO PROCEDURE |
ETA_GL_STREAMICE = Y0 + M1 * X |
|
./pkg/streamice/eta_gl_streamice.F |
24 |
NO PROCEDURE |
ETA_GL_STREAMICE = Y0 + M2 * X |
|
./pkg/streamice/eta_gl_streamice.F |
28 |
NO PROCEDURE |
ETA_GL_STREAMICE = Y0 + |
|
./pkg/streamice/eta_gl_streamice.F |
6 |
NO PROCEDURE |
_RL FUNCTION ETA_GL_STREAMICE (X, M1, M2, Y0, W) |
|
./pkg/streamice/eta_gl_streamice_prime.F |
18 |
NO PROCEDURE |
_RL X, M1, M2, Y0, W |
|
./pkg/streamice/eta_gl_streamice_prime.F |
6 |
NO PROCEDURE |
_RL FUNCTION ETA_GL_STREAMICE_PRIME (X, M1, M2, Y0, W) |
|
./pkg/streamice/streamice_invert_surf_forthick.F |
100 |
STREAMICE_INVERT_SURF_FORTHICK |
& Y0, |
|
./pkg/streamice/streamice_invert_surf_forthick.F |
37 |
STREAMICE_INVERT_SURF_FORTHICK |
type(active) :: X,Y0 |
|
./pkg/streamice/streamice_invert_surf_forthick.F |
94 |
STREAMICE_INVERT_SURF_FORTHICK |
Y0v = delta*HF |