Update for new computation environment routines.

Author: chrispbradley

src/fortran/uniaxial_extension.F90

@@ -93,6 +93,7 @@ SUBROUTINE SOLVE_MODEL(compressible, useGeneratedMesh, zeroLoad, useSimplex, use
 
     TYPE(cmfe_BasisType)                  :: basis,pressureBasis
     TYPE(cmfe_BoundaryConditionsType)     :: boundaryConditions
+    TYPE(cmfe_ComputationEnvironmentType) :: computationEnvironment
     TYPE(cmfe_CoordinateSystemType)       :: coordinateSystem
     TYPE(cmfe_DecompositionType)          :: decomposition
     TYPE(cmfe_EquationsType)              :: equations
@@ -136,8 +137,9 @@ SUBROUTINE SOLVE_MODEL(compressible, useGeneratedMesh, zeroLoad, useSimplex, use
     END IF
 
     ! Get the number of computational nodes and this computational node number
-    CALL cmfe_ComputationalNumberOfNodesGet(numberOfComputationalNodes,Err)
-    CALL cmfe_ComputationalNodeNumberGet(computationalNodeNumber,Err)
+    CALL cmfe_ComputationEnvironment_Initialise(computationEnvironment,err)
+    CALL cmfe_ComputationEnvironment_NumberOfWorldNodesGet(computationEnvironment,numberOfComputationalNodes,err)
+    CALL cmfe_ComputationEnvironment_WorldNodeNumberGet(computationEnvironment,computationalNodeNumber,err)
 
     CALL cmfe_CoordinateSystem_Initialise(coordinateSystem,Err)
     CALL cmfe_CoordinateSystem_CreateStart(coordinateSystemUserNumber,coordinateSystem,Err)

src/python/uniaxial_extension.py

@@ -53,8 +53,9 @@ def solveModel(compressible, useGeneratedMesh, zeroLoad, usePressureBasis):
         numberOfXi = 3
 
     # Get the number of computational nodes and this computational node number
-    numberOfComputationalNodes = iron.ComputationalNumberOfNodesGet()
-    computationalNodeNumber = iron.ComputationalNodeNumberGet()
+    computationEnvironment = iron.ComputationEnvironment()
+    numberOfComputationalNodes = computationEnvironment.NumberOfWorldNodesGet()
+    computationalNodeNumber = computationEnvironment.WorldNodeNumberGet()
 
     # Create a 3D rectangular cartesian coordinate system
     coordinateSystem = iron.CoordinateSystem()