fixed typo

nekStab · Dec 22, 2024 · 9753b00 · 9753b00
1 parent d4a742b
commit 9753b00
Show file tree

Hide file tree

Showing 2 changed files with 5 additions and 5 deletions.
diff --git a/src/NewtonKrylov.f90 b/src/NewtonKrylov.f90
@@ -189,7 +189,7 @@ subroutine newton_rsp(sys, X, solver, info, rtol, atol, options, linear_solver_o
 
       ! Check for lucky convergence.
       if (rnorm < target_tol) then
-         write(msg,'(2(A,E9.2))') 'nrorm= ', rnorm, ', target= ', target_tol
+         write(msg,'(2(A,E9.2))') 'rnorm= ', rnorm, ', target= ', target_tol
          call logger%log_warning(msg, module=this_module, procedure='newton_rsp')
          write(msg,'(A)') 'Initial guess is a fixed point to tolerance!'
          call logger%log_warning(msg, module=this_module, procedure='newton_rsp')
@@ -354,7 +354,7 @@ subroutine newton_rdp(sys, X, solver, info, rtol, atol, options, linear_solver_o
 
       ! Check for lucky convergence.
       if (rnorm < target_tol) then
-         write(msg,'(2(A,E9.2))') 'nrorm= ', rnorm, ', target= ', target_tol
+         write(msg,'(2(A,E9.2))') 'rnorm= ', rnorm, ', target= ', target_tol
          call logger%log_warning(msg, module=this_module, procedure='newton_rdp')
          write(msg,'(A)') 'Initial guess is a fixed point to tolerance!'
          call logger%log_warning(msg, module=this_module, procedure='newton_rdp')
@@ -519,7 +519,7 @@ subroutine newton_csp(sys, X, solver, info, rtol, atol, options, linear_solver_o
 
       ! Check for lucky convergence.
       if (rnorm < target_tol) then
-         write(msg,'(2(A,E9.2))') 'nrorm= ', rnorm, ', target= ', target_tol
+         write(msg,'(2(A,E9.2))') 'rnorm= ', rnorm, ', target= ', target_tol
          call logger%log_warning(msg, module=this_module, procedure='newton_csp')
          write(msg,'(A)') 'Initial guess is a fixed point to tolerance!'
          call logger%log_warning(msg, module=this_module, procedure='newton_csp')
@@ -684,7 +684,7 @@ subroutine newton_cdp(sys, X, solver, info, rtol, atol, options, linear_solver_o
 
       ! Check for lucky convergence.
       if (rnorm < target_tol) then
-         write(msg,'(2(A,E9.2))') 'nrorm= ', rnorm, ', target= ', target_tol
+         write(msg,'(2(A,E9.2))') 'rnorm= ', rnorm, ', target= ', target_tol
          call logger%log_warning(msg, module=this_module, procedure='newton_cdp')
          write(msg,'(A)') 'Initial guess is a fixed point to tolerance!'
          call logger%log_warning(msg, module=this_module, procedure='newton_cdp')

diff --git a/src/NewtonKrylov.fypp b/src/NewtonKrylov.fypp
@@ -178,7 +178,7 @@ contains
 
       ! Check for lucky convergence.
       if (rnorm < target_tol) then
-         write(msg,'(2(A,E9.2))') 'nrorm= ', rnorm, ', target= ', target_tol
+         write(msg,'(2(A,E9.2))') 'rnorm= ', rnorm, ', target= ', target_tol
          call logger%log_warning(msg, module=this_module, procedure='newton_${type[0]}$${kind}$')
          write(msg,'(A)') 'Initial guess is a fixed point to tolerance!'
          call logger%log_warning(msg, module=this_module, procedure='newton_${type[0]}$${kind}$')