diff --git a/src/CPFEM.f90 b/src/CPFEM.f90
index 9059c2a4b..c590a86b5 100644
--- a/src/CPFEM.f90
+++ b/src/CPFEM.f90
@@ -85,7 +85,7 @@ subroutine CPFEM_initAll(el,ip)
     call rotations_init
     call HDF5_utilities_init
     call results_init
-    call discretization_march_init(ip, el)
+    call discretization_marc_init(ip, el)
     call lattice_init
     call material_init
     call constitutive_init