| File |
Line number |
Procedure |
Code |
|
./pkg/diagnostics/diagnostics_out.F |
402 |
DIAGNOSTICS_OUT |
call PRESTOPRES(qprs(1,1,k),qinp,pkz,pksrf,0.,p,sNx,sNy, |
|
./pkg/diagnostics/diagnostics_out.F |
409 |
DIAGNOSTICS_OUT |
qtmp1(i,j,k,bi,bj) = qprs(i,j,k) |
|
./pkg/diagnostics/diagnostics_out.F |
79 |
DIAGNOSTICS_OUT |
_RL qprs(sNx,sNy,nplevs) |
|
./pkg/diagnostics/prestopres.F |
110 |
PRESTOPRES |
qprs(i,1) = qinp(i,1,lm-1)*temp + qinp(i,1,lm)*(1.-temp) |
|
./pkg/diagnostics/prestopres.F |
112 |
PRESTOPRES |
qprs(i,1) = qinp(i,1,lm) |
|
./pkg/diagnostics/prestopres.F |
1 |
PRESTOPRES |
subroutine PRESTOPRES ( qprs,qinp,pkz,pksrf,ptop,p,im,jm,lm ) |
|
./pkg/diagnostics/prestopres.F |
33 |
PRESTOPRES |
real qprs(im,jm) |
|
./pkg/diagnostics/prestopres.F |
54 |
PRESTOPRES |
qprs(i,1) = undef |
|
./pkg/diagnostics/prestopres.F |
75 |
PRESTOPRES |
qprs(i,1) = qinp(i,1,L+1)*temp + qinp(i,1,L)*(1.-temp) |
|
./pkg/diagnostics/prestopres.F |
77 |
PRESTOPRES |
qprs(i,1) = qinp(i,1,L+1) |
|
./pkg/diagnostics/prestopres.F |
79 |
PRESTOPRES |
qprs(i,1) = qinp(i,1,L) |
|
./pkg/diagnostics/prestopres.F |
96 |
PRESTOPRES |
qprs(i,1) = qinp(i,1,2)*temp + qinp(i,1,1)*(1.-temp) |
|
./pkg/diagnostics/prestopres.F |
98 |
PRESTOPRES |
qprs(i,1) = qinp(i,1,1) |