Symbol Description Uses
diffK4 bi-harmonic diffusion coefficient 15



File Line number Procedure Code
./pkg/generic_advdiff/gad_biharm_y.F 12 GAD_BIHARM_Y
     I           yA,del2T,diffK4,
./pkg/generic_advdiff/gad_biharm_y.F 38 GAD_BIHARM_Y
      _RL diffK4
./pkg/generic_advdiff/gad_biharm_y.F 57 GAD_BIHARM_Y
         dfy(i,j) = dfy(i,j) + diffK4
./pkg/generic_advdiff/gad_calc_rhs.F 14 GAD_CALC_RHS
     I           diffKh, diffK4, KappaR, Tracer,
./pkg/generic_advdiff/gad_calc_rhs.F 176 GAD_CALC_RHS
      IF (diffK4 .NE. 0.) THEN
./pkg/generic_advdiff/gad_calc_rhs.F 246 GAD_CALC_RHS
      IF (diffK4 .NE. 0.) THEN
./pkg/generic_advdiff/gad_calc_rhs.F 247 GAD_CALC_RHS
       CALL GAD_BIHARM_X(bi,bj,k,xA,df4,diffK4,df,myThid)
./pkg/generic_advdiff/gad_calc_rhs.F 271 GAD_CALC_RHS
     &    (diffKh.NE.0. .OR. diffK4 .NE.0. .OR. useGMRedi) ) THEN
./pkg/generic_advdiff/gad_calc_rhs.F 341 GAD_CALC_RHS
      IF (diffK4 .NE. 0.) THEN
./pkg/generic_advdiff/gad_calc_rhs.F 342 GAD_CALC_RHS
       CALL GAD_BIHARM_Y(bi,bj,k,yA,df4,diffK4,df,myThid)
./pkg/generic_advdiff/gad_calc_rhs.F 366 GAD_CALC_RHS
     &    (diffKh.NE.0. .OR. diffK4 .NE.0. .OR. useGMRedi) ) THEN
./pkg/generic_advdiff/gad_calc_rhs.F 90 GAD_CALC_RHS
      _RL diffKh, diffK4
./pkg/generic_advdiff/gad_biharm_x.F 12 GAD_BIHARM_X
     I           xA,del2T,diffK4,
./pkg/generic_advdiff/gad_biharm_x.F 38 GAD_BIHARM_X
      _RL diffK4
./pkg/generic_advdiff/gad_biharm_x.F 55 GAD_BIHARM_X
         dfx(i,j) = dfx(i,j) + diffK4