Symbol Description Uses
kbottom 4


File Line number Procedure Code
./pkg/ggl90/ggl90_idemix.F 228 GGL90_IDEMIX 
         forc(i,j,kbottom)=forc(i,j,kbottom)
./pkg/ggl90/ggl90_idemix.F 229 GGL90_IDEMIX 
     &     + gm_forc(i,j)*recip_drC(kbottom)
./pkg/ggl90/ggl90_idemix.F 230 GGL90_IDEMIX 
     &                  *recip_hFacI(i,j,kbottom)