File |
Line number |
Procedure |
Code |
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
1549 |
TRBFLX |
_RL AA(irun,NLEV),BB(irun,NLEV),SSDEV(irun,NLEV) |
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
1854 |
TRBFLX |
SSDEV(I,NLEV)=CT(I)*(AA(I,NLEV)*DSH(I,NLEV) |
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
1860 |
TRBFLX |
SSDEV(I,NLEV) = B2*YY(I)*SSDEV(I,NLEV)*SSDEV(I,NLEV)/QBYU(I) |
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
1861 |
TRBFLX |
SVAR(I,NLEV) = SQRT(SSDEV(I,NLEV)) |
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
1952 |
TRBFLX |
SSDEV(I,1) = XL(I,1)*(AA(I,1)*DSH(I,1)- |
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
1954 |
TRBFLX |
SSDEV(I,1) = B2 * KHSAVE(I,1) * SSDEV(I,1) * SSDEV(I,1) |
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
1955 |
TRBFLX |
SVAR(I,1) = SQRT(SSDEV(I,1)) |
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
1960 |
TRBFLX |
SSDEV(I,2) = XL(I,1)*(AA(I,2)*DSH(I,1)- |
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
1962 |
TRBFLX |
SSDEV(I,2) = B2 * KHSAVE(I,1) * SSDEV(I,1) * SSDEV(I,1) |
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
1963 |
TRBFLX |
SVAR(I,2) = SQRT(SSDEV(I,2)) |
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
1965 |
TRBFLX |
SSDEV(I,2) = XL(I,2)*(AA(I,2)*DSH(I,2)- |
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
1967 |
TRBFLX |
SSDEV(I,2) = B2 * KHSAVE(I,2) * SSDEV(I,2) * SSDEV(I,2) |
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
1968 |
TRBFLX |
TEMP(I,2) = SQRT(SSDEV(I,2)) |
./pkg/fizhi/fizhi_turb.F |
1509 |
TRBFLX |
_RL AA(irun,NLEV),BB(irun,NLEV),SSDEV(irun,NLEV) |
./pkg/fizhi/fizhi_turb.F |
1814 |
TRBFLX |
SSDEV(I,NLEV)=CT(I)*(AA(I,NLEV)*DSH(I,NLEV) |
./pkg/fizhi/fizhi_turb.F |
1820 |
TRBFLX |
SSDEV(I,NLEV) = B2*YY(I)*SSDEV(I,NLEV)*SSDEV(I,NLEV)/QBYU(I) |
./pkg/fizhi/fizhi_turb.F |
1821 |
TRBFLX |
SVAR(I,NLEV) = SQRT(SSDEV(I,NLEV)) |
./pkg/fizhi/fizhi_turb.F |
1912 |
TRBFLX |
SSDEV(I,1) = XL(I,1)*(AA(I,1)*DSH(I,1)- |
./pkg/fizhi/fizhi_turb.F |
1914 |
TRBFLX |
SSDEV(I,1) = B2 * KHSAVE(I,1) * SSDEV(I,1) * SSDEV(I,1) |
./pkg/fizhi/fizhi_turb.F |
1915 |
TRBFLX |
SVAR(I,1) = SQRT(SSDEV(I,1)) |
./pkg/fizhi/fizhi_turb.F |
1920 |
TRBFLX |
SSDEV(I,2) = XL(I,1)*(AA(I,2)*DSH(I,1)- |
./pkg/fizhi/fizhi_turb.F |
1922 |
TRBFLX |
SSDEV(I,2) = B2 * KHSAVE(I,1) * SSDEV(I,1) * SSDEV(I,1) |
./pkg/fizhi/fizhi_turb.F |
1923 |
TRBFLX |
SVAR(I,2) = SQRT(SSDEV(I,2)) |
./pkg/fizhi/fizhi_turb.F |
1925 |
TRBFLX |
SSDEV(I,2) = XL(I,2)*(AA(I,2)*DSH(I,2)- |
./pkg/fizhi/fizhi_turb.F |
1927 |
TRBFLX |
SSDEV(I,2) = B2 * KHSAVE(I,2) * SSDEV(I,2) * SSDEV(I,2) |
./pkg/fizhi/fizhi_turb.F |
1928 |
TRBFLX |
TEMP(I,2) = SQRT(SSDEV(I,2)) |