| File |
Line number |
Procedure |
Code |
|
./pkg/fizhi/fizhi_turb.F |
3121 |
PSI |
_RL X0(irun),X1(irun),Y0(irun),Y1(irun) |
|
./pkg/fizhi/fizhi_turb.F |
3177 |
PSI |
CALL PHI( Z0,X0,Y0,IFLAG,IBIT ) |
|
./pkg/fizhi/fizhi_turb.F |
3190 |
PSI |
ARG0(I) = 1. - X0(I) |
|
./pkg/fizhi/fizhi_turb.F |
3194 |
PSI |
ARG1(I) = ARG1(I) * ( 1.+X0(I) ) |
|
./pkg/fizhi/fizhi_turb.F |
3196 |
PSI |
DX(I) = X1(I) - X0(I) |
|
./pkg/fizhi/fizhi_turb.F |
3198 |
PSI |
ARG0(I) = -DX(I) / ( 1. + X1(I)*X0(I) ) |
|
./pkg/fizhi/fizhi_turb.F |
3211 |
PSI |
VXS(I) = X0(indx) |
|
./pkg/fizhi/fizhi_turb.F |
3316 |
PSI |
X0(I) = X0NUM(I) / X0DEN(I) |
|
./pkg/fizhi/fizhi_turb.F |
3317 |
PSI |
IF ( INTZ0(I).EQ.1 ) X0(I) = 0. |
|
./pkg/fizhi/fizhi_turb.F |
3339 |
PSI |
VXS(I) = X0(indx) |
|
./pkg/fizhi/fizhi_turb.F |
3371 |
PSI |
VYS(I) = X0(indx) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
3103 |
PSI |
_RL X0(irun),X1(irun),Y0(irun),Y1(irun) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
3159 |
PSI |
CALL PHI( Z0,X0,Y0,IFLAG,IBIT ) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
3172 |
PSI |
ARG0(I) = 1. - X0(I) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
3176 |
PSI |
ARG1(I) = ARG1(I) * ( 1.+X0(I) ) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
3178 |
PSI |
DX(I) = X1(I) - X0(I) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
3180 |
PSI |
ARG0(I) = -DX(I) / ( 1. + X1(I)*X0(I) ) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
3193 |
PSI |
VXS(I) = X0(indx) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
3298 |
PSI |
X0(I) = X0NUM(I) / X0DEN(I) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
3299 |
PSI |
IF ( INTZ0(I).EQ.1 ) X0(I) = 0. |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
3321 |
PSI |
VXS(I) = X0(indx) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
3353 |
PSI |
VYS(I) = X0(indx) |