diff --git a/source/fortran/iteration_variables.f90 b/source/fortran/iteration_variables.f90
index ed65fd83f8..d64a0d7ef3 100755
--- a/source/fortran/iteration_variables.f90
+++ b/source/fortran/iteration_variables.f90
@@ -2230,7 +2230,7 @@ end subroutine set_itv_98
!---------------------------------
-
+
!---------------------------------
@@ -3372,7 +3372,7 @@ end function itv_151
!---------------------------------
subroutine init_itv_152
- !!
(152) fbmaxcs : Ratio of separatrix density to Greenwald density
+ !! (152) fgwsep : Ratio of separatrix density to Greenwald density
use numerics, only: lablxc, boundl, boundu
implicit none
lablxc(152) = 'fgwsep '
@@ -4060,7 +4060,7 @@ subroutine loadxc
case (99);
case (100);
case (101);
- case (102);
+ case (102);
case (103); xcm(i) = itv_103()
case (104); xcm(i) = itv_104()
case (105); xcm(i) = itv_105()
@@ -4327,7 +4327,7 @@ subroutine convxc(xc,nn)
case (99);
case (100);
case (101);
- case (102);
+ case (102);
case (103); call set_itv_103(ratio)
case (104); call set_itv_104(ratio)
case (105); call set_itv_105(ratio)
diff --git a/source/fortran/numerics.f90 b/source/fortran/numerics.f90
index 4410f0d675..74ca524e8c 100755
--- a/source/fortran/numerics.f90
+++ b/source/fortran/numerics.f90
@@ -353,7 +353,7 @@ module numerics
!! (149) fbmaxcs : F-value for max peak CS field (con. 79, itvar 149)
!! (150) REMOVED
!! (151) REMOVED
- !! (152) fbmaxcs : Ratio of separatrix density to Greenwald density
+ !! (152) fgwsep : Ratio of separatrix density to Greenwald density
!! (153) fpdivlim : F-value for minimum pdivt (con. 80)
!! (154) fne0 : F-value for ne(0) > ne(ped) (con. 81)
!! (155) pfusife : IFE input fusion power (MW) (ifedrv=3 only)