| File |
Line number |
Procedure |
Code |
|
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
1565 |
TRBFLX |
_RL VTEMP(irun),VDZETA(irun) |
|
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
1898 |
TRBFLX |
4 VHZ,VPSIM,VAPSIM,VPSIG,VPSIHG,VTEMP,VDZETA,VDZ0,VDPSIM, |
|
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
2388 |
SFCFLX |
7 VHZ,VPSIM,VAPSIM,VPSIG,VPSIHG,VTEMP,VDZETA,VDZ0,VDPSIM, |
|
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
2453 |
SFCFLX |
_RL VTEMP(irun),VDZETA(irun),VDZ0(irun),VDPSIM(irun) |
|
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
2547 |
SFCFLX |
4 VTEMP,VTEMP,1,.TRUE.,IRUN,VDZETA, |
|
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
2619 |
SFCFLX |
4 VYY,VYY0,2,LWATER,IRUN,VDZETA, |
|
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
2627 |
SFCFLX |
VZETA(I) = VZETA(I) + VZETAL(I) * VDZETA(I) |
|
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
2679 |
SFCFLX |
4 VYY,VYY0,ITYPE,LWATER,IRUN,VDZETA, |
|
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
2696 |
SFCFLX |
VZETA(I) = VZETA(I) * ( 1. + VDZETA(I) ) |
|
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
4109 |
LINADJ |
2 VDZETA,VDZ0,VDPSIM,VDPSIH,INTRIB, |
|
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
4163 |
LINADJ |
_RL VDZETA(IRUN),VDZ0(IRUN),VDPSIM(IRUN) |
|
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
4298 |
LINADJ |
VDZETA1(I) = VDZETA(I) |
|
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
4313 |
LINADJ |
VDZETA(I) = VXNUM(I) / VDEN(I) |
|
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
4318 |
LINADJ |
IF ( (VRIB2(I).EQ.0.) .OR. (VDZETA(I).LE.-1.) ) THEN |
|
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
4323 |
LINADJ |
IF ( VINT1(I).EQ.1 ) VDZETA(I) = VDZETA1(I) |
|
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
4328 |
LINADJ |
VDZETA2(I) = VDZETA(I) + VDZETA1(I) |
|
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
4334 |
LINADJ |
IF(VINT1(I).EQ.1)VDZETA(I)=VXNUM1(I)*VRIB2(I) - 1. - VDZETA1(I) |
|
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
4345 |
LINADJ |
VDZ0(I) = VDZ0(I) - VZCOEF2(I) * VDZETA(I) |
|
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
4359 |
LINADJ |
1 VZCOEF1(I) * ( VWS2(I) - VWS1(I) ) - VZCOEF2(I) * VDZETA(I) |
|
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
4376 |
LINADJ |
VDPSIM(I) = VDX(I) * VDZETA(I) |
|
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
4377 |
LINADJ |
VDPSIH(I) = VDY(I) * VDZETA(I) |
|
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
4412 |
LINADJ |
VDZETA(I) = VDZETA1(I) + VDZETA(I) |
|
./pkg/fizhi/fizhi_turb.F |
1525 |
TRBFLX |
_RL VTEMP(irun),VDZETA(irun) |
|
./pkg/fizhi/fizhi_turb.F |
1858 |
TRBFLX |
4 VHZ,VPSIM,VAPSIM,VPSIG,VPSIHG,VTEMP,VDZETA,VDZ0,VDPSIM, |
|
./pkg/fizhi/fizhi_turb.F |
2349 |
SFCFLX |
7 VHZ,VPSIM,VAPSIM,VPSIG,VPSIHG,VTEMP,VDZETA,VDZ0,VDPSIM, |
|
./pkg/fizhi/fizhi_turb.F |
2414 |
SFCFLX |
_RL VTEMP(irun),VDZETA(irun),VDZ0(irun),VDPSIM(irun) |
|
./pkg/fizhi/fizhi_turb.F |
2508 |
SFCFLX |
4 VTEMP,VTEMP,1,.TRUE.,IRUN,VDZETA, |
|
./pkg/fizhi/fizhi_turb.F |
2580 |
SFCFLX |
4 VYY,VYY0,2,LWATER,IRUN,VDZETA, |
|
./pkg/fizhi/fizhi_turb.F |
2588 |
SFCFLX |
VZETA(I) = VZETA(I) + VZETAL(I) * VDZETA(I) |
|
./pkg/fizhi/fizhi_turb.F |
2640 |
SFCFLX |
4 VYY,VYY0,ITYPE,LWATER,IRUN,VDZETA, |
|
./pkg/fizhi/fizhi_turb.F |
2657 |
SFCFLX |
VZETA(I) = VZETA(I) * ( 1. + VDZETA(I) ) |
|
./pkg/fizhi/fizhi_turb.F |
4070 |
LINADJ |
2 VDZETA,VDZ0,VDPSIM,VDPSIH,INTRIB, |
|
./pkg/fizhi/fizhi_turb.F |
4124 |
LINADJ |
_RL VDZETA(IRUN),VDZ0(IRUN),VDPSIM(IRUN) |
|
./pkg/fizhi/fizhi_turb.F |
4259 |
LINADJ |
VDZETA1(I) = VDZETA(I) |
|
./pkg/fizhi/fizhi_turb.F |
4274 |
LINADJ |
VDZETA(I) = VXNUM(I) / VDEN(I) |
|
./pkg/fizhi/fizhi_turb.F |
4279 |
LINADJ |
IF ( (VRIB2(I).EQ.0.) .OR. (VDZETA(I).LE.-1.) ) THEN |
|
./pkg/fizhi/fizhi_turb.F |
4284 |
LINADJ |
IF ( VINT1(I).EQ.1 ) VDZETA(I) = VDZETA1(I) |
|
./pkg/fizhi/fizhi_turb.F |
4289 |
LINADJ |
VDZETA2(I) = VDZETA(I) + VDZETA1(I) |
|
./pkg/fizhi/fizhi_turb.F |
4295 |
LINADJ |
IF(VINT1(I).EQ.1)VDZETA(I)=VXNUM1(I)*VRIB2(I) - 1. - VDZETA1(I) |
|
./pkg/fizhi/fizhi_turb.F |
4306 |
LINADJ |
VDZ0(I) = VDZ0(I) - VZCOEF2(I) * VDZETA(I) |
|
./pkg/fizhi/fizhi_turb.F |
4320 |
LINADJ |
1 VZCOEF1(I) * ( VWS2(I) - VWS1(I) ) - VZCOEF2(I) * VDZETA(I) |
|
./pkg/fizhi/fizhi_turb.F |
4337 |
LINADJ |
VDPSIM(I) = VDX(I) * VDZETA(I) |
|
./pkg/fizhi/fizhi_turb.F |
4338 |
LINADJ |
VDPSIH(I) = VDY(I) * VDZETA(I) |
|
./pkg/fizhi/fizhi_turb.F |
4373 |
LINADJ |
VDZETA(I) = VDZETA1(I) + VDZETA(I) |