diff --git a/source/abundances.f90 b/source/abundances.f90
index 1673d23..5a9ec31 100644
--- a/source/abundances.f90
+++ b/source/abundances.f90
@@ -1370,7 +1370,7 @@ subroutine abundances(linelist, listlength, iteration_result, meanextinction, ca
        NeabundRL = 0.d0
      endif
 
-!rewrite all the ICFs so that they are simply the factor by which the summed ionic abundances are multipled to get the total elemental abundance
+!rewrite all the ICFs so that they are simply the factor by which the summed ionic abundances are multiplied to get the total elemental abundance
 
 if (ciiCELabund + ciiiCELabund + civCELabund .gt. 0.d0) CELicfC = CabundCEL/(ciiCELabund + ciiiCELabund + civCELabund)
 if (niiCELabund + niiiCELabund + nivCELabund + nvCELabund .gt. 0.d0) CELicfN = NabundCEL/(niiCELabund + niiiCELabund + nivCELabund + nvCELabund)