File |
Line number |
Procedure |
Code |
./pkg/fizhi/fizhi_turb.F |
469 |
TURBIO |
call STRIP2TILE(vz,igrd,v,nchp,ijall,istrip,nlay,nn) |
./pkg/fizhi/fizhi_turb.F |
547 |
TURBIO |
v(i,nlay+1) = 0. |
./pkg/fizhi/fizhi_turb.F |
617 |
TURBIO |
call TRBFLX(nn,th,thv,sh,u,v,qq,p,pe,pk,pke,dpstr,stwatr,stz0, |
./pkg/fizhi/fizhi_turb.F |
656 |
TURBIO |
wspeed(i) = sqrt(u(i,nlay)*u(i,nlay) + v(i,nlay)*v(i,nlay)) |
./pkg/fizhi/fizhi_turb.F |
953 |
TURBIO |
tends(i) = ( v(i,l)-tmpstrip(i) ) |
./pkg/fizhi/do_fizhi.F |
104 |
DO_FIZHI |
_RL u(sNx,sNy,Nrphys),v(sNx,sNy,Nrphys),t(sNx,sNy,Nrphys) |
./pkg/fizhi/do_fizhi.F |
202 |
DO_FIZHI |
v(i,j,L) = vphy(i,j,L,bi,bj) |
./pkg/fizhi/do_fizhi.F |
233 |
DO_FIZHI |
. xlons,p(1,1,bi,bj),u,v,t,q,pl(1,1,1,bi,bj),ple(1,1,1,bi,bj), |
./pkg/admtlm/admtlm_dsvd.F |
172 |
ADMTLM_DSVD |
& v(ldv,maxncv), u(ldu, maxnev), |
./pkg/admtlm/admtlm_dsvd.F |
409 |
ADMTLM_DSVD |
& ncv, v, ldv, iparam, ipntr, workd, workl, |
./pkg/admtlm/admtlm_dsvd.F |
548 |
ADMTLM_DSVD |
call DSEUPD ( rvec, 'All', select, s, v, ldv, sigma, |
./pkg/admtlm/admtlm_dsvd.F |
549 |
ADMTLM_DSVD |
& bmat, n, which, nev, tol, resid, ncv, v, ldv, |
./pkg/admtlm/admtlm_dsvd.F |
597 |
ADMTLM_DSVD |
tmpvec1(l) = v(l,j) |