Symbol Description Uses
pinv 16



File Line number Procedure Code
./pkg/fizhi/fizhi_step_diag.F 197 FIZHI_STEP_DIAG
     &      * pk(i,j,L,bi,bj)*pinv(i,j)*86400
./pkg/fizhi/fizhi_step_diag.F 210 FIZHI_STEP_DIAG
     &                                      pinv(i,j)*86400*1000
./pkg/fizhi/fizhi_step_diag.F 224 FIZHI_STEP_DIAG
     &                      * pk(i,j,l,bi,bj)*pinv(i,j)*86400
./pkg/fizhi/fizhi_step_diag.F 238 FIZHI_STEP_DIAG
     &                      * pk(i,j,l,bi,bj)*pinv(i,j)*86400
./pkg/fizhi/fizhi_step_diag.F 251 FIZHI_STEP_DIAG
     &                   pk(i,j,l,bi,bj)*pinv(i,j)*86400
./pkg/fizhi/fizhi_step_diag.F 264 FIZHI_STEP_DIAG
     &                   pk(i,j,l,bi,bj)*pinv(i,j)*86400
./pkg/fizhi/fizhi_step_diag.F 347 FIZHI_STEP_DIAG
       tmpdiag(i,j) = qbar(i,j)*pinv(i,j)*pinv(i,j)*86400
./pkg/fizhi/fizhi_step_diag.F 371 FIZHI_STEP_DIAG
       tmpdiag(i,j) = qbar(i,j)*pinv(i,j)*pinv(i,j)*86400
./pkg/fizhi/fizhi_step_diag.F 396 FIZHI_STEP_DIAG
       tmpdiag(i,j) = qbar(i,j)*pinv(i,j)*pinv(i,j)*86400
./pkg/fizhi/fizhi_step_diag.F 421 FIZHI_STEP_DIAG
     &             radswt(i,j,bi,bj) * pinv(i,j) * pinv(i,j) * 86400
./pkg/fizhi/fizhi_step_diag.F 43 FIZHI_STEP_DIAG
      _RL pinv(im2,jm2), qbar(im2,jm2),tmpdiag(im2,jm2)
./pkg/fizhi/fizhi_step_diag.F 54 FIZHI_STEP_DIAG
      pinv(i,j) = 1.0 / p(i,j,bi,bj)