diff --git a/src/geometry_mod.F90 b/src/geometry_mod.F90 index 84bac73585763b75c7b02324628a4cfdeb771488..83a972fd8e3d7057fc1bcb965193de5883f71e0d 100644 --- a/src/geometry_mod.F90 +++ b/src/geometry_mod.F90 @@ -139,9 +139,6 @@ CONTAINS ENDDO ! coefficient in the front of parallel derivative gradz_coeff(iz,eo) = 1._dp / jacobian(iz,eo) / hatB(iz,eo) - ! Factor in front of the nonlinear term - hatB_NL(iz,eo) = Jacobian(iz,eo)& - *(gxx(iz,eo)*gyy(iz,eo) - gxy(iz,eo)**2)/hatB(iz,eo) ENDDO ENDDO @@ -213,6 +210,8 @@ CONTAINS ENDDO ! coefficient in the front of parallel derivative gradz_coeff(iz,eo) = 1._dp / Jacobian(iz,eo) / hatB(iz,eo) + ! Nonlinear term prefactor + hatB_NL(iz,eo) = 1._dp !Jacobian(iz,eo)*(gxx(iz,eo)*gyy(iz,eo) - gxy(iz,eo)**2)/hatB(iz,eo) ENDDO zloop ENDDO parity