Symbol | Description | Uses |
Ldim | 4 |
File | Line number | Procedure | Code |
./pkg/fizhi/fizhi_fillnegs.F | 26 | QCHECK |
integer idim1,idim2,jdim1,jdim2,Ldim,im1,im2,jm1,jm2 |
./pkg/fizhi/fizhi_fillnegs.F | 36 | QCHECK |
DO L=2,Ldim |
./pkg/fizhi/fizhi_fillnegs.F | 51 | QCHECK |
if(qz(i,j,Ldim,bi,bj).lt.0.0 _d 0)qz(i,j,Ldim,bi,bj) = 0.0 _d 0 |