File |
Line number |
Procedure |
Code |
./pkg/fizhi/fizhi_turb.F |
1457 |
TRBFLX |
VRT1CON = 1. + VIRTCON |
./pkg/fizhi/fizhi_turb.F |
1743 |
TRBFLX |
BETAT(I,NLEV) = 1. + VIRTCON*SH(I,NLEV) - VRT1CON*SHL(I,NLEV) |
./pkg/fizhi/fizhi_turb.F |
1744 |
TRBFLX |
BETAW(I,NLEV) = VIRTCON * |
./pkg/fizhi/fizhi_turb.F |
1746 |
TRBFLX |
BETAL(I,NLEV) = (1.+VIRTCON*SH(I,NLEV)-TWO*VRT1CON*SHL(I,NLEV)) |
./pkg/fizhi/fizhi_turb.F |
1864 |
TRBFLX |
BETAT(I,L) = 1. + VIRTCON * SH(I,L) - VRT1CON * SHL(I,L) |
./pkg/fizhi/fizhi_turb.F |
1865 |
TRBFLX |
BETAW(I,L) = VIRTCON * |
./pkg/fizhi/fizhi_turb.F |
1867 |
TRBFLX |
BETAL(I,L) = ( 1. + VIRTCON*SH(I,L) - TWO*VRT1CON*SHL(I,L) ) |
./pkg/fizhi/getcon.F |
101 |
NO PROCEDURE |
PARAMETER ( VIRTCON= 0.609 ) |
./pkg/fizhi/getcon.F |
130 |
NO PROCEDURE |
DATA ANAME(27),ACON(27) / 'VIRTCON ', VIRTCON/ |
./pkg/fizhi/getcon.F |
35 |
NO PROCEDURE |
& HEATI, TICE, VKRM, DEG2RAD, CALTOJ, EPS, VIRTCON, EPSFAC, |