File |
Line number |
Procedure |
Code |
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
3127 |
PSI |
_RL ZWM,RZWM,Z0M,ZCM,RZCM,CM1,CM2,CM6,CM7,CM8ARG,YCM |
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
3131 |
PSI |
PARAMETER ( ZCM = 42. ) |
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
3132 |
PSI |
PARAMETER ( RZCM = 1./ZCM ) |
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
3137 |
PSI |
PARAMETER ( CM8ARG = CM7*ZCM*RZWM / (CM2+ZCM) ) |
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
3138 |
PSI |
PARAMETER ( YCM = 6. / ( 1. + 6.*CM1*ZCM ) ) |
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
3376 |
PSI |
IF ( Z2(I) .GT. ZCM ) THEN |
./pkg/fizhi/fizhi_turb.F |
3088 |
PSI |
_RL ZWM,RZWM,Z0M,ZCM,RZCM,CM1,CM2,CM6,CM7,CM8ARG,YCM |
./pkg/fizhi/fizhi_turb.F |
3092 |
PSI |
PARAMETER ( ZCM = 42. ) |
./pkg/fizhi/fizhi_turb.F |
3093 |
PSI |
PARAMETER ( RZCM = 1./ZCM ) |
./pkg/fizhi/fizhi_turb.F |
3098 |
PSI |
PARAMETER ( CM8ARG = CM7*ZCM*RZWM / (CM2+ZCM) ) |
./pkg/fizhi/fizhi_turb.F |
3099 |
PSI |
PARAMETER ( YCM = 6. / ( 1. + 6.*CM1*ZCM ) ) |
./pkg/fizhi/fizhi_turb.F |
3337 |
PSI |
IF ( Z2(I) .GT. ZCM ) THEN |