| File |
Line number |
Procedure |
Code |
|
./pkg/fizhi/fizhi_rayleigh.F |
46 |
RAYLEIGH |
_RL z(im,jm,lm) |
|
./pkg/fizhi/fizhi_rayleigh.F |
75 |
RAYLEIGH |
z(i,j,lm) = zsurf(i,j) + 0.5 * dz(i,j,lm) |
|
./pkg/fizhi/fizhi_rayleigh.F |
82 |
RAYLEIGH |
z(i,j,L) = z(i,j,L+1) + 0.5 * (dz(i,j,L)+dz(i,j,L+1)) |
|
./pkg/fizhi/fizhi_rayleigh.F |
90 |
RAYLEIGH |
rf(i,j,L) = dampcoef*(1+tanh((z(i,j,L)-50000.)/5000.))/86400. |
|
./pkg/fizhi/fizhi_turb.F |
3028 |
PHI |
if( z(i).ge.0.15 ) then |
|
./pkg/fizhi/fizhi_turb.F |
3040 |
PHI |
if( z(i).ge.0.15 ) then |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
3010 |
PHI |
if( z(i).ge.0.15 ) then |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
3022 |
PHI |
if( z(i).ge.0.15 ) then |
|
./verification/dome/code/obcs_calc.F |
159 |
OBCS_CALC |
zt=(z(k) + Dmax - (hinit + Dmax))/(hinit+Dmax) |
|
./verification/dome/code/obcs_calc.F |
45 |
OBCS_CALC |
_RL z(nr) |
|
./verification/dome/code/obcs_calc.F |
75 |
OBCS_CALC |
z(1) = -delR(1)/2.0 |
|
./verification/dome/code/obcs_calc.F |
80 |
OBCS_CALC |
z(j) = z(j-1) - delR(j) |
|
./lsopt/lsline.F |
239 |
LSLINE |
z = xx(i) + tact*dd(i) |
|
./lsopt/lsline.F |
240 |
LSLINE |
if ((z.ne.xx(i)) .and. (z.ne.xdiff(i))) go to 950 |
|
./lsopt/lsline.F |
85 |
LSLINE |
double precision z, test, barr |