diff --git a/src/fortran/stokes_static.F90 b/src/fortran/stokes_static.F90
index 7c3ed89..c71e5d2 100644
--- a/src/fortran/stokes_static.F90
+++ b/src/fortran/stokes_static.F90
@@ -142,8 +142,8 @@ PROGRAM stokes_static
   !CHECK COMPUTATIONAL NODE
 
   !Get the computational nodes information
-  CALL cmfe_ComputationalNumberOfNodesGet(NumberOfComputationalNodes,Err)
-  CALL cmfe_ComputationalNodeNumberGet(ComputationalNodeNumber,Err)
+  CALL cmfe_ComputationalNumberOfNodesGet(numberOfComputationalNodes,err)
+  CALL cmfe_ComputationalNodeNumberGet(computationalNodeNumber,err)
 
   !
   !================================================================================================================================