1 files changed, 1 insertions, 1 deletions
diff --git a/src/cg.F90 b/src/cg.F90
index a1a1536..c5f18cf 100644
--- a/src/cg.F90
+++ b/src/cg.F90
@@ -142,7 +142,7 @@ subroutine NoExcision_CGInit_2 (CCTK_ARGUMENTS)
 
     where ( cont ) infnormresid = sqrt(infnormresid)
 
-    ! Check if some variables has already converged. This happens when the
+    ! Check if some variables have already converged. This happens when the
     ! variable is identically zero.
 
     do i = 1, 16