diff --git a/Src/LinearSolvers/MLMG/AMReX_MLCellLinOp.H b/Src/LinearSolvers/MLMG/AMReX_MLCellLinOp.H index 5991a9bb45..715e443005 100644 --- a/Src/LinearSolvers/MLMG/AMReX_MLCellLinOp.H +++ b/Src/LinearSolvers/MLMG/AMReX_MLCellLinOp.H @@ -1437,7 +1437,7 @@ MLCellLinOpT::compGrad (int amrlev, const Array& grad, { gy(i,j,k,n) = dyi*(s(i,j,k,n) - s(i,j-1,k,n)); if (coord == CoordSys::SPHERICAL) { - rinv = RT(1.0) / (problo[0] + (i + RT(0.5)) * dx[0]); + RT rinv = RT(1.0) / (problo[0] + (i + RT(0.5)) * dx[0]); gy(i,j,k,n) *= rinv; } });