Symbol Description Uses
thFe_inv 4


File Line number Procedure Code
./pkg/bling/bling_production.F 160 BLING_PROD 
      _RL thFe_inv(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr)
./pkg/bling/bling_production.F 459 BLING_PROD 
             thFe_inv(i,j,k) = 0.
./pkg/bling/bling_production.F 461 BLING_PROD 
             thFe_inv(i,j,k) = 1./theta_Fe(i,j,k)
./pkg/bling/bling_production.F 864 BLING_PROD 
        CALL DIAGNOSTICS_FILL(thFe_inv,'BLGC2CHL',0,Nr,2,bi,bj,myThid)