opencmiss_iron.f90

Go to the documentation of this file.

! Eclipse regular expressions to add the DLLEXPORT macro:
! Find: ^( *)(SUBROUTINE *)([^\(]*)(\([^\)]*\))
! Replace: $1$2$3$4\R$1  !DLLEXPORT($3)

MODULE opencmiss_iron

  USE analytic_analysis_routines
  USE base_routines
  USE basis_routines
  USE bioelectric_finite_elasticity_routines
  USE boundary_conditions_routines
  USE cmiss
  USE cmiss_cellml
  USE comp_environment
  USE constants
  USE control_loop_routines
  USE coordinate_routines
  USE data_point_routines
  USE data_projection_routines
  USE distributed_matrix_vector
  USE equations_routines
  USE equations_set_constants
  USE equations_set_routines
  USE field_routines
#ifdef WITH_FIELDML
  USE fieldml_types
  USE fieldml_input_routines
  USE fieldml_output_routines
  USE fieldml_util_routines
#endif
  USE field_io_routines
  USE finite_elasticity_routines
  USE generated_mesh_routines
  USE hamilton_jacobi_equations_routines
  USE history_routines
  USE input_output
  USE interface_routines
  USE interface_conditions_constants
  USE interface_conditions_routines
  USE interface_equations_routines
  USE interface_matrices_constants
  USE interface_matrices_routines
  USE iso_c_binding
  USE iso_varying_string
  USE kinds
  USE mesh_routines
  USE node_routines
  USE problem_constants
  USE problem_routines
  USE region_routines
  USE solver_routines
  USE strings
  USE types

#include "macros.h"
#include "dllexport.h"

  IMPLICIT NONE

  PRIVATE

  !Module parameters

  !Module types

  TYPE cmfe_basistype
    PRIVATE
    TYPE(basis_type), POINTER :: basis
  END TYPE cmfe_basistype

  TYPE cmfe_boundaryconditionstype
    PRIVATE
    TYPE(boundary_conditions_type), POINTER :: boundaryconditions
  END TYPE cmfe_boundaryconditionstype

  TYPE cmfe_cellmltype
    PRIVATE
    TYPE(cellml_type), POINTER :: cellml
  END TYPE cmfe_cellmltype

  TYPE cmfe_cellmlequationstype
    PRIVATE
    TYPE(cellml_equations_type), POINTER :: cellmlequations
  END TYPE cmfe_cellmlequationstype

  TYPE cmfe_controllooptype
    PRIVATE
    TYPE(control_loop_type), POINTER :: controlloop
  END TYPE cmfe_controllooptype

  TYPE cmfe_coordinatesystemtype
    PRIVATE
    TYPE(coordinate_system_type), POINTER :: coordinatesystem
  END TYPE cmfe_coordinatesystemtype

  TYPE cmfe_datapointstype
    PRIVATE
    TYPE(data_points_type), POINTER :: datapoints
  END TYPE cmfe_datapointstype

  TYPE cmfe_dataprojectiontype
    PRIVATE
    TYPE(data_projection_type), POINTER :: dataprojection
  END TYPE cmfe_dataprojectiontype

  TYPE cmfe_decompositiontype
    PRIVATE
    TYPE(decomposition_type), POINTER :: decomposition
  END TYPE cmfe_decompositiontype

  TYPE cmfe_equationstype
    PRIVATE
    TYPE(equations_type), POINTER :: equations
  END TYPE cmfe_equationstype

  TYPE cmfe_equationssettype
    PRIVATE
    TYPE(equations_set_type), POINTER :: equationsset
  END TYPE cmfe_equationssettype

  TYPE cmfe_fieldtype
    PRIVATE
    TYPE(field_type), POINTER :: field
  END TYPE cmfe_fieldtype

  TYPE cmfe_fieldstype
    !PRIVATE
    TYPE(fields_type), POINTER :: fields
  END TYPE cmfe_fieldstype

  TYPE cmfe_generatedmeshtype
    PRIVATE
    TYPE(generated_mesh_type), POINTER :: generatedmesh
  END TYPE cmfe_generatedmeshtype

  TYPE cmfe_historytype
    PRIVATE
    TYPE(history_type), POINTER :: history
  END TYPE cmfe_historytype

  TYPE cmfe_interfacetype
    PRIVATE
    TYPE(interface_type), POINTER :: interface
  END TYPE cmfe_interfacetype

  TYPE cmfe_interfaceconditiontype
    PRIVATE
    TYPE(interface_condition_type), POINTER :: interfacecondition
  END TYPE cmfe_interfaceconditiontype

  TYPE cmfe_interfaceequationstype
    PRIVATE
    TYPE(interface_equations_type), POINTER :: interfaceequations
  END TYPE cmfe_interfaceequationstype

  TYPE cmfe_interfacemeshconnectivitytype
    PRIVATE
    TYPE(interface_mesh_connectivity_type), POINTER :: meshconnectivity
  END TYPE cmfe_interfacemeshconnectivitytype
  
  TYPE cmfe_interfacepointsconnectivitytype
    PRIVATE
    TYPE(interfacepointsconnectivitytype), POINTER :: pointsconnectivity
  END TYPE cmfe_interfacepointsconnectivitytype

  TYPE cmfe_distributedmatrixtype
    PRIVATE
    TYPE(distributed_matrix_type), POINTER :: distributedmatrix
  END TYPE cmfe_distributedmatrixtype

  TYPE cmfe_distributedvectortype
    PRIVATE
    TYPE(distributed_vector_type), POINTER :: distributedvector
  END TYPE cmfe_distributedvectortype

  TYPE cmfe_meshtype
    PRIVATE
    TYPE(mesh_type), POINTER :: mesh
  END TYPE cmfe_meshtype

  TYPE cmfe_meshelementstype
    PRIVATE
    TYPE(meshelementstype), POINTER :: meshelements
  END TYPE cmfe_meshelementstype

  TYPE cmfe_meshembeddingtype
    PRIVATE
    TYPE(mesh_embedding_type), POINTER :: meshembedding
  END TYPE cmfe_meshembeddingtype

  TYPE cmfe_meshnodestype
    PRIVATE
    TYPE(meshnodestype), POINTER :: meshnodes
  END TYPE cmfe_meshnodestype

  TYPE cmfe_nodestype
    PRIVATE
    TYPE(nodes_type), POINTER :: nodes
  END TYPE cmfe_nodestype

  TYPE cmfe_problemtype
    PRIVATE
    TYPE(problem_type), POINTER :: problem
  END TYPE cmfe_problemtype

  TYPE cmfe_quadraturetype
    PRIVATE
    TYPE(quadrature_type), POINTER :: quadrature
  END TYPE cmfe_quadraturetype

  TYPE cmfe_regiontype
    PRIVATE
    TYPE(region_type), POINTER :: region
  END TYPE cmfe_regiontype

  TYPE cmfe_solvertype
    PRIVATE
    TYPE(solver_type), POINTER :: solver
  END TYPE cmfe_solvertype

  TYPE cmfe_solverequationstype
    PRIVATE
    TYPE(solver_equations_type), POINTER :: solverequations
  END TYPE cmfe_solverequationstype

  TYPE cmfe_computationalworkgrouptype
    PRIVATE
    TYPE(computational_work_group_type), POINTER :: computationalworkgroup
  END TYPE cmfe_computationalworkgrouptype

  !Module variables

  TYPE(varying_string) :: error

  !INTERFACE cmfe_Finalise_
  !  MODULE PROCEDURE cmfe_Finalise
  !END INTERFACE cmfe_Finalise_

  INTERFACE cmfe_initialise
    MODULE PROCEDURE cmfe_initialisenumber
    MODULE PROCEDURE cmfe_initialiseobj
  END INTERFACE cmfe_initialise

  INTERFACE cmfe_fields_create
    MODULE PROCEDURE cmfe_fields_createinterface
    MODULE PROCEDURE cmfe_fields_createregion
  END INTERFACE cmfe_fields_create

  !PUBLIC cmfe_Finalise,cmfe_Initialise
  PUBLIC cmfe_finalise,cmfe_initialise

  PUBLIC cmfe_workingrealprecisionget

  PUBLIC cmfe_basistype,cmfe_basistypescopy,cmfe_basis_finalise,cmfe_basis_initialise

  PUBLIC cmfe_boundaryconditionstype,cmfe_boundaryconditions_finalise,cmfe_boundaryconditions_initialise

  PUBLIC cmfe_cellmltype,cmfe_cellml_finalise,cmfe_cellml_initialise

  PUBLIC cmfe_cellmlequationstype,cmfe_cellmlequations_finalise,cmfe_cellmlequations_initialise

  PUBLIC cmfe_computationalworkgrouptype,cmfe_computationalworkgroup_initialise

  PUBLIC cmfe_controllooptype,cmfe_controlloop_finalise,cmfe_controlloop_initialise,cmfe_controlloop_loadoutputset

  PUBLIC cmfe_coordinatesystemtype,cmfe_coordinatesystem_finalise,cmfe_coordinatesystem_initialise

  PUBLIC cmfe_datapointstype,cmfe_datapoints_finalise,cmfe_datapoints_initialise

  PUBLIC cmfe_dataprojectiontype,cmfe_dataprojection_finalise,cmfe_dataprojection_initialise

  PUBLIC cmfe_decompositiontype,cmfe_decomposition_finalise,cmfe_decomposition_initialise

  PUBLIC cmfe_decomposition_calculatefacesset,cmfe_decomposition_calculatelinesset

  PUBLIC cmfe_equationstype,cmfe_equations_finalise,cmfe_equations_initialise

  PUBLIC cmfe_equationssettype,cmfe_equationsset_finalise,cmfe_equationsset_initialise

  PUBLIC cmfe_fieldtype,cmfe_field_finalise,cmfe_field_initialise

  PUBLIC cmfe_fieldstype,cmfe_fields_create,cmfe_fields_finalise,cmfe_fields_initialise

  PUBLIC cmfe_generatedmeshtype,cmfe_generatedmesh_finalise,cmfe_generatedmesh_initialise

  PUBLIC cmfe_historytype,cmfe_history_finalise,cmfe_history_initialise

  PUBLIC cmfe_interfacetype,cmfe_interface_finalise,cmfe_interface_initialise

  PUBLIC cmfe_interfaceconditiontype,cmfe_interfacecondition_finalise,cmfe_interfacecondition_initialise

  PUBLIC cmfe_interfaceequationstype,cmfe_interfaceequations_finalise,cmfe_interfaceequations_initialise

  PUBLIC cmfe_interfacemeshconnectivitytype,cmfe_interfacemeshconnectivity_finalise, &
    & cmfe_interfacemeshconnectivity_initialise
  
  PUBLIC cmfe_interfacepointsconnectivitytype,cmfe_interfacepointsconnectivity_initialise, &
    & cmfe_interfacepointsconnectivity_finalise

  PUBLIC cmfe_distributedmatrixtype,cmfe_distributedvectortype

  PUBLIC cmfe_distributedmatrix_initialise,cmfe_distributedvector_initialise

  PUBLIC cmfe_meshtype,cmfe_mesh_finalise,cmfe_mesh_initialise

  PUBLIC cmfe_meshelementstype,cmfe_meshelements_finalise,cmfe_meshelements_initialise

  PUBLIC cmfe_meshnodestype,cmfe_meshnodes_finalise,cmfe_meshnodes_initialise

  PUBLIC cmfe_nodestype,cmfe_nodes_finalise,cmfe_nodes_initialise

  PUBLIC cmfe_problemtype,cmfe_problem_finalise,cmfe_problem_initialise

  PUBLIC cmfe_quadraturetype,cmfe_quadrature_finalise,cmfe_quadrature_initialise

  PUBLIC cmfe_regiontype,cmfe_region_finalise,cmfe_region_initialise

  PUBLIC cmfe_solvertype,cmfe_solver_finalise,cmfe_solver_initialise

  PUBLIC cmfe_solverequationstype,cmfe_solverequations_finalise,cmfe_solverequations_initialise

!!==================================================================================================================================
!!
!! ANALYTIC_ANALYSIS_ROUTINES
!!
!!==================================================================================================================================

  !Module parameters

  !Module types

  !Module variables

  !Interfaces

  INTERFACE cmfe_analyticanalysis_output
    MODULE PROCEDURE cmfe_analyticanalysis_outputnumber
    MODULE PROCEDURE cmfe_analyticanalysis_outputobj
  END INTERFACE

  INTERFACE cmfe_analyticanalysis_absoluteerrorgetnode
    MODULE PROCEDURE cmfe_analyticanalysis_absoluteerrorgetnodenumber
    MODULE PROCEDURE cmfe_analyticanalysis_absoluteerrorgetnodeobj
  END INTERFACE cmfe_analyticanalysis_absoluteerrorgetnode

  INTERFACE cmfe_analyticanalysis_percentageerrorgetnode
    MODULE PROCEDURE cmfe_analyticanalysis_percentageerrorgetnodenumber
    MODULE PROCEDURE cmfe_analyticanalysis_percentageerrorgetnodeobj
  END INTERFACE cmfe_analyticanalysis_percentageerrorgetnode

  INTERFACE cmfe_analyticanalysis_relativeerrorgetnode
    MODULE PROCEDURE cmfe_analyticanalysis_relativeerrorgetnodenumber
    MODULE PROCEDURE cmfe_analyticanalysis_relativeerrorgetnodeobj
  END INTERFACE cmfe_analyticanalysis_relativeerrorgetnode

  INTERFACE cmfe_analyticanalysis_absoluteerrorgetelement
    MODULE PROCEDURE cmfe_analyticanalysis_absoluteerrorgetelementnumber
    MODULE PROCEDURE cmfe_analyticanalysis_absoluteerrorgetelementobj
  END INTERFACE cmfe_analyticanalysis_absoluteerrorgetelement

  INTERFACE cmfe_analyticanalysis_percentageerrorgetelement
    MODULE PROCEDURE cmfe_analyticanalysis_percentageerrorgetelementnumber
    MODULE PROCEDURE cmfe_analyticanalysis_percentageerrorgetelementobj
  END INTERFACE cmfe_analyticanalysis_percentageerrorgetelement

  INTERFACE cmfe_analyticanalysis_relativeerrorgetelement
    MODULE PROCEDURE cmfe_analyticanalysis_relativeerrorgetelementnumber
    MODULE PROCEDURE cmfe_analyticanalysis_relativeerrorgetelementobj
  END INTERFACE cmfe_analyticanalysis_relativeerrorgetelement

  INTERFACE cmfe_analyticanalysis_absoluteerrorgetconstant
    MODULE PROCEDURE cmfe_analyticanalysis_absoluteerrorgetconstantnumber
    MODULE PROCEDURE cmfe_analyticanalysis_absoluteerrorgetconstantobj
  END INTERFACE cmfe_analyticanalysis_absoluteerrorgetconstant

  INTERFACE cmfe_analyticanalysis_percentageerrorgetconstant
    MODULE PROCEDURE cmfe_analyticanalysis_percentageerrorgetconstantnumber
    MODULE PROCEDURE cmfe_analyticanalysis_percentageerrorgetconstantobj
  END INTERFACE cmfe_analyticanalysis_percentageerrorgetconstant

  INTERFACE cmfe_analyticanalysis_relativeerrorgetconstant
    MODULE PROCEDURE cmfe_analyticanalysis_relativeerrorgetconstantnumber
    MODULE PROCEDURE cmfe_analyticanalysis_relativeerrorgetconstantobj
  END INTERFACE cmfe_analyticanalysis_relativeerrorgetconstant

  INTERFACE cmfe_analyticanalysis_rmserrorgetnode
    MODULE PROCEDURE cmfe_analyticanalysis_rmserrorgetnodenumber
    MODULE PROCEDURE cmfe_analyticanalysis_rmserrorgetnodeobj
  END INTERFACE cmfe_analyticanalysis_rmserrorgetnode

  INTERFACE cmfe_analyticanalysis_rmserrorgetelement
    MODULE PROCEDURE cmfe_analyticanalysis_rmserrorgetelementnumber
    MODULE PROCEDURE cmfe_analyticanalysis_rmserrorgetelementobj
  END INTERFACE cmfe_analyticanalysis_rmserrorgetelement

  INTERFACE cmfe_analyticanalysis_integralnumericalvalueget
    MODULE PROCEDURE cmfe_analyticanalysis_integralnumericalvaluegetnumber
    MODULE PROCEDURE cmfe_analyticanalysis_integralnumericalvaluegetobj
  END INTERFACE cmfe_analyticanalysis_integralnumericalvalueget
  
  INTERFACE cmfe_analyticanalysis_integralanalyticvalueget
    MODULE PROCEDURE cmfe_analyticanalysis_integralanalyticvaluegetnumber
    MODULE PROCEDURE cmfe_analyticanalysis_integralanalyticvaluegetobj
  END INTERFACE cmfe_analyticanalysis_integralanalyticvalueget

  INTERFACE cmfe_analyticanalysis_integralpercentageerrorget
    MODULE PROCEDURE cmfe_analyticanalysis_integralpercentageerrorgetnumber
    MODULE PROCEDURE cmfe_analyticanalysis_integralpercentageerrorgetobj
  END INTERFACE cmfe_analyticanalysis_integralpercentageerrorget

  INTERFACE cmfe_analyticanalysis_integralabsoluteerrorget
    MODULE PROCEDURE cmfe_analyticanalysis_integralabsoluteerrorgetnumber
    MODULE PROCEDURE cmfe_analyticanalysis_integralabsoluteerrorgetobj
  END INTERFACE cmfe_analyticanalysis_integralabsoluteerrorget

  INTERFACE cmfe_analyticanalysis_integralrelativeerrorget
    MODULE PROCEDURE cmfe_analyticanalysis_integralrelativeerrorgetnumber
    MODULE PROCEDURE cmfe_analyticanalysis_integralrelativeerrorgetobj
  END INTERFACE cmfe_analyticanalysis_integralrelativeerrorget

  INTERFACE cmfe_analyticanalysis_integralnidnumericalvalueget
    MODULE PROCEDURE cmfe_analyticanalysis_integralnidnumericalvaluegetnumber
    MODULE PROCEDURE cmfe_analyticanalysis_integralnidnumericalvaluegetobj
  END INTERFACE cmfe_analyticanalysis_integralnidnumericalvalueget

  INTERFACE cmfe_analyticanalysis_integralniderrorget
    MODULE PROCEDURE cmfe_analyticanalysis_integralniderrorgetnumber
    MODULE PROCEDURE cmfe_analyticanalysis_integralniderrorgetobj
  END INTERFACE cmfe_analyticanalysis_integralniderrorget

  PUBLIC cmfe_analyticanalysis_output

  PUBLIC cmfe_analyticanalysis_absoluteerrorgetnode,cmfe_analyticanalysis_percentageerrorgetnode, &
    & cmfe_analyticanalysis_relativeerrorgetnode

  PUBLIC cmfe_analyticanalysis_absoluteerrorgetelement,cmfe_analyticanalysis_percentageerrorgetelement, &
    & cmfe_analyticanalysis_relativeerrorgetelement

  PUBLIC cmfe_analyticanalysis_absoluteerrorgetconstant,cmfe_analyticanalysis_percentageerrorgetconstant, &
    & cmfe_analyticanalysis_relativeerrorgetconstant

  PUBLIC cmfe_analyticanalysis_rmserrorgetnode,cmfe_analyticanalysis_rmserrorgetelement

  PUBLIC cmfe_analyticanalysis_integralnumericalvalueget,cmfe_analyticanalysis_integralanalyticvalueget, &
    & cmfe_analyticanalysis_integralpercentageerrorget,cmfe_analyticanalysis_integralabsoluteerrorget, &
    & cmfe_analyticanalysis_integralrelativeerrorget,cmfe_analyticanalysis_integralnidnumericalvalueget, &
    & cmfe_analyticanalysis_integralniderrorget

!!==================================================================================================================================
!!
!! BASE_ROUTINES
!!
!!==================================================================================================================================

  !Module parameters

  INTEGER(INTG), PARAMETER :: cmfe_all_diag_type = all_diag_type 
  INTEGER(INTG), PARAMETER :: cmfe_in_diag_type = in_diag_type 
  INTEGER(INTG), PARAMETER :: cmfe_from_diag_type = from_diag_type 
  INTEGER(INTG), PARAMETER :: cmfe_all_timing_type = all_timing_type 
  INTEGER(INTG), PARAMETER :: cmfe_in_timing_type = in_timing_type 
  INTEGER(INTG), PARAMETER :: cmfe_from_timing_type = from_timing_type 

  !Module types

  !Module variables

  !Interfaces

  PUBLIC cmfe_all_diag_type,cmfe_in_diag_type,cmfe_from_diag_type

  PUBLIC cmfe_all_timing_type,cmfe_in_timing_type,cmfe_from_timing_type

  PUBLIC cmfe_diagnosticssetoff,cmfe_diagnosticsseton

  PUBLIC cmfe_outputsetoff,cmfe_outputseton

  PUBLIC cmfe_timingsetoff,cmfe_timingseton,cmfe_timingsummaryoutput

!!==================================================================================================================================
!!
!! BASIS_ROUTINES
!!
!!==================================================================================================================================

  !Module parameters

  INTEGER(INTG), PARAMETER :: cmfe_basis_lagrange_hermite_tp_type = basis_lagrange_hermite_tp_type 
  INTEGER(INTG), PARAMETER :: cmfe_basis_simplex_type = basis_simplex_type 
  INTEGER(INTG), PARAMETER :: cmfe_basis_serendipity_type = basis_serendipity_type 
  INTEGER(INTG), PARAMETER :: cmfe_basis_auxilliary_type = basis_auxilliary_type 
  INTEGER(INTG), PARAMETER :: cmfe_basis_b_spline_tp_type = basis_b_spline_tp_type 
  INTEGER(INTG), PARAMETER :: cmfe_basis_fourier_lagrange_hermite_tp_type = basis_fourier_lagrange_hermite_tp_type 
  INTEGER(INTG), PARAMETER :: cmfe_basis_extended_lagrange_tp_type = basis_extended_lagrange_tp_type 
  INTEGER(INTG), PARAMETER :: cmfe_basis_linear_lagrange_interpolation = basis_linear_lagrange_interpolation 
  INTEGER(INTG), PARAMETER :: cmfe_basis_quadratic_lagrange_interpolation = basis_quadratic_lagrange_interpolation 
  INTEGER(INTG), PARAMETER :: cmfe_basis_cubic_lagrange_interpolation = basis_cubic_lagrange_interpolation 
  INTEGER(INTG), PARAMETER :: cmfe_basis_cubic_hermite_interpolation = basis_cubic_hermite_interpolation 
  INTEGER(INTG), PARAMETER :: cmfe_basis_quadratic1_hermite_interpolation = basis_quadratic1_hermite_interpolation 
  INTEGER(INTG), PARAMETER :: cmfe_basis_quadratic2_hermite_interpolation = basis_quadratic2_hermite_interpolation 
  INTEGER(INTG), PARAMETER :: cmfe_basis_linear_simplex_interpolation = basis_linear_simplex_interpolation 
  INTEGER(INTG), PARAMETER :: cmfe_basis_quadratic_simplex_interpolation = basis_quadratic_simplex_interpolation 
  INTEGER(INTG), PARAMETER :: cmfe_basis_cubic_simplex_interpolation = basis_cubic_simplex_interpolation 
  INTEGER(INTG), PARAMETER :: cmfe_basis_default_quadrature_scheme = basis_default_quadrature_scheme 
  INTEGER(INTG), PARAMETER :: cmfe_basis_low_quadrature_scheme = basis_low_quadrature_scheme 
  INTEGER(INTG), PARAMETER :: cmfe_basis_mid_quadrature_scheme = basis_mid_quadrature_scheme 
  INTEGER(INTG), PARAMETER :: cmfe_basis_high_quadrature_scheme = basis_high_quadrature_scheme 
  INTEGER(INTG), PARAMETER :: cmfe_basis_gauss_legendre_quadrature = basis_gauss_legendre_quadrature 
  INTEGER(INTG), PARAMETER :: cmfe_basis_gauss_laguerre_quadrature = basis_gauss_laguerre_quadrature 
  INTEGER(INTG), PARAMETER :: cmfe_basis_guass_hermite_quadrature = basis_guass_hermite_quadrature 
  INTEGER(INTG), PARAMETER :: cmfe_basis_adaptive_gauss_legendre_quadrature = basis_adaptive_gauss_legendre_quadrature 
  INTEGER(INTG), PARAMETER :: cmfe_basis_gauss_simplex_quadrature = basis_gauss_simplex_quadrature 
  INTEGER(INTG), PARAMETER :: cmfe_basis_xi_collapsed = basis_xi_collapsed 
  INTEGER(INTG), PARAMETER :: cmfe_basis_collapsed_at_xi0 = basis_collapsed_at_xi0 
  INTEGER(INTG), PARAMETER :: cmfe_basis_collapsed_at_xi1 = basis_collapsed_at_xi1 
  INTEGER(INTG), PARAMETER :: cmfe_basis_not_collapsed = basis_not_collapsed 

  !Module types

  !Module variables

  !Interfaces

  INTERFACE cmfe_basis_collapsedxiget
    MODULE PROCEDURE cmfe_basis_collapsedxigetnumber
    MODULE PROCEDURE cmfe_basis_collapsedxigetobj
  END INTERFACE cmfe_basis_collapsedxiget

  INTERFACE cmfe_basis_collapsedxiset
    MODULE PROCEDURE cmfe_basis_collapsedxisetnumber
    MODULE PROCEDURE cmfe_basis_collapsedxisetobj
  END INTERFACE cmfe_basis_collapsedxiset

  INTERFACE cmfe_basis_createfinish
    MODULE PROCEDURE cmfe_basis_createfinishnumber
    MODULE PROCEDURE cmfe_basis_createfinishobj
  END INTERFACE cmfe_basis_createfinish

  INTERFACE cmfe_basis_createstart
    MODULE PROCEDURE cmfe_basis_createstartnumber
    MODULE PROCEDURE cmfe_basis_createstartobj
  END INTERFACE cmfe_basis_createstart

  INTERFACE cmfe_basis_destroy
    MODULE PROCEDURE cmfe_basis_destroynumber
    MODULE PROCEDURE cmfe_basis_destroyobj
  END INTERFACE cmfe_basis_destroy

  INTERFACE cmfe_basis_interpolationxiget
    MODULE PROCEDURE cmfe_basis_interpolationxigetnumber
    MODULE PROCEDURE cmfe_basis_interpolationxigetobj
  END INTERFACE cmfe_basis_interpolationxiget

  INTERFACE cmfe_basis_interpolationxiset
    MODULE PROCEDURE cmfe_basis_interpolationxisetnumber
    MODULE PROCEDURE cmfe_basis_interpolationxisetobj
  END INTERFACE cmfe_basis_interpolationxiset

  INTERFACE cmfe_basis_numberoflocalnodesget
    MODULE PROCEDURE cmfe_basis_numberoflocalnodesgetnumber
    MODULE PROCEDURE cmfe_basis_numberoflocalnodesgetobj
  END INTERFACE cmfe_basis_numberoflocalnodesget

  INTERFACE cmfe_basis_numberofxiget
    MODULE PROCEDURE cmfe_basis_numberofxigetnumber
    MODULE PROCEDURE cmfe_basis_numberofxigetobj
  END INTERFACE cmfe_basis_numberofxiget

  INTERFACE cmfe_basis_numberofxiset
    MODULE PROCEDURE cmfe_basis_numberofxisetnumber
    MODULE PROCEDURE cmfe_basis_numberofxisetobj
  END INTERFACE cmfe_basis_numberofxiset

  INTERFACE cmfe_basis_quadraturenumberofgaussxiget
    MODULE PROCEDURE cmfe_basis_quadraturenumberofgaussxigetnumber
    MODULE PROCEDURE cmfe_basis_quadraturenumberofgaussxigetobj
  END INTERFACE cmfe_basis_quadraturenumberofgaussxiget

  INTERFACE cmfe_basis_quadraturenumberofgaussxiset
    MODULE PROCEDURE cmfe_basis_quadraturenumberofgaussxisetnumber
    MODULE PROCEDURE cmfe_basis_quadraturenumberofgaussxisetobj
  END INTERFACE cmfe_basis_quadraturenumberofgaussxiset

  INTERFACE cmfe_basis_quadraturegaussxiget
    MODULE PROCEDURE cmfe_basis_quadraturesinglegaussxigetnumber
    MODULE PROCEDURE cmfe_basis_quadraturesinglegaussxigetobj
    MODULE PROCEDURE cmfe_basis_quadraturemultiplegaussxigetnumber
    MODULE PROCEDURE cmfe_basis_quadraturemultiplegaussxigetobj
  END INTERFACE cmfe_basis_quadraturegaussxiget

  INTERFACE cmfe_basis_quadratureorderget
    MODULE PROCEDURE cmfe_basis_quadratureordergetnumber
    MODULE PROCEDURE cmfe_basis_quadratureordergetobj
  END INTERFACE cmfe_basis_quadratureorderget

  INTERFACE cmfe_basis_quadratureorderset
    MODULE PROCEDURE cmfe_basis_quadratureordersetnumber
    MODULE PROCEDURE cmfe_basis_quadratureordersetobj
  END INTERFACE cmfe_basis_quadratureorderset

  INTERFACE cmfe_basis_quadraturetypeget
    MODULE PROCEDURE cmfe_basis_quadraturetypegetnumber
    MODULE PROCEDURE cmfe_basis_quadraturetypegetobj
  END INTERFACE cmfe_basis_quadraturetypeget

  INTERFACE cmfe_basis_quadraturetypeset
    MODULE PROCEDURE cmfe_basis_quadraturetypesetnumber
    MODULE PROCEDURE cmfe_basis_quadraturetypesetobj
  END INTERFACE cmfe_basis_quadraturetypeset

  INTERFACE cmfe_basis_quadraturelocalfacegaussevaluateset
    MODULE PROCEDURE cmfe_basis_quadraturelocalfacegaussevaluatesetnumber
    MODULE PROCEDURE cmfe_basis_quadraturelocalfacegaussevaluatesetobj
  END INTERFACE cmfe_basis_quadraturelocalfacegaussevaluateset

  INTERFACE cmfe_basis_typeget
    MODULE PROCEDURE cmfe_basis_typegetnumber
    MODULE PROCEDURE cmfe_basis_typegetobj
  END INTERFACE cmfe_basis_typeget

  INTERFACE cmfe_basis_typeset
    MODULE PROCEDURE cmfe_basis_typesetnumber
    MODULE PROCEDURE cmfe_basis_typesetobj
  END INTERFACE cmfe_basis_typeset

  PUBLIC cmfe_basis_lagrange_hermite_tp_type,cmfe_basis_simplex_type,cmfe_basis_serendipity_type,cmfe_basis_auxilliary_type, &
    & cmfe_basis_b_spline_tp_type,cmfe_basis_fourier_lagrange_hermite_tp_type,cmfe_basis_extended_lagrange_tp_type

  PUBLIC cmfe_basis_linear_lagrange_interpolation,cmfe_basis_quadratic_lagrange_interpolation, &
    & cmfe_basis_cubic_lagrange_interpolation, &
    & cmfe_basis_cubic_hermite_interpolation,cmfe_basis_quadratic1_hermite_interpolation, &
    & cmfe_basis_quadratic2_hermite_interpolation, &
    & cmfe_basis_linear_simplex_interpolation,cmfe_basis_quadratic_simplex_interpolation,cmfe_basis_cubic_simplex_interpolation

  PUBLIC cmfe_basis_default_quadrature_scheme,cmfe_basis_low_quadrature_scheme,cmfe_basis_mid_quadrature_scheme, &
    & cmfe_basis_high_quadrature_scheme

  PUBLIC cmfe_basis_gauss_legendre_quadrature,cmfe_basis_gauss_laguerre_quadrature,cmfe_basis_guass_hermite_quadrature, &
    & cmfe_basis_adaptive_gauss_legendre_quadrature,cmfe_basis_gauss_simplex_quadrature

  PUBLIC cmfe_basis_xi_collapsed,cmfe_basis_collapsed_at_xi0,cmfe_basis_collapsed_at_xi1,cmfe_basis_not_collapsed

  PUBLIC cmfe_basis_collapsedxiget,cmfe_basis_collapsedxiset

  PUBLIC cmfe_basis_createfinish,cmfe_basis_createstart,cmfe_basis_destroy

  PUBLIC cmfe_basis_interpolationxiget,cmfe_basis_interpolationxiset

  PUBLIC cmfe_basis_numberoflocalnodesget

  PUBLIC cmfe_basis_numberofxiget,cmfe_basis_numberofxiset

  PUBLIC cmfe_basis_quadraturenumberofgaussxiget,cmfe_basis_quadraturenumberofgaussxiset

  PUBLIC cmfe_basis_quadraturegaussxiget

  PUBLIC cmfe_basis_quadratureorderget,cmfe_basis_quadratureorderset

  PUBLIC cmfe_basis_quadraturetypeget,cmfe_basis_quadraturetypeset,cmfe_basis_quadraturelocalfacegaussevaluateset

  PUBLIC cmfe_basis_typeget,cmfe_basis_typeset

!!==================================================================================================================================
!!
!! BOUNDARY_CONDITIONS_ROUTINES
!!
!!==================================================================================================================================

  !Module parameters


  INTEGER(INTG), PARAMETER :: cmfe_boundary_condition_free = boundary_condition_free 
  INTEGER(INTG), PARAMETER :: cmfe_boundary_condition_fixed = boundary_condition_fixed 
  INTEGER(INTG), PARAMETER :: cmfe_boundary_condition_fixed_wall = boundary_condition_fixed_wall
  INTEGER(INTG), PARAMETER :: cmfe_boundary_condition_fixed_inlet = boundary_condition_fixed_inlet
  INTEGER(INTG), PARAMETER :: cmfe_boundary_condition_fixed_outlet = boundary_condition_fixed_outlet
  INTEGER(INTG), PARAMETER :: cmfe_boundary_condition_moved_wall = boundary_condition_moved_wall
  INTEGER(INTG), PARAMETER :: cmfe_boundary_condition_moved_wall_incremented = boundary_condition_moved_wall_incremented
  INTEGER(INTG), PARAMETER :: cmfe_boundary_condition_free_wall = boundary_condition_free_wall

  INTEGER(INTG), PARAMETER :: cmfe_boundary_condition_neumann_point = boundary_condition_neumann_point 
  INTEGER(INTG), PARAMETER :: cmfe_boundary_condition_neumann_point_incremented = boundary_condition_neumann_point_incremented 
  INTEGER(INTG), PARAMETER :: cmfe_boundary_condition_neumann_integrated = boundary_condition_neumann_integrated 
  INTEGER(INTG), PARAMETER :: cmfe_boundary_condition_dirichlet = boundary_condition_dirichlet
  INTEGER(INTG), PARAMETER :: cmfe_boundary_condition_cauchy = boundary_condition_cauchy
  INTEGER(INTG), PARAMETER :: cmfe_boundary_condition_robin = boundary_condition_robin

  INTEGER(INTG), PARAMETER :: cmfe_boundary_condition_fixed_incremented = boundary_condition_fixed_incremented
  INTEGER(INTG), PARAMETER :: cmfe_boundary_condition_pressure = boundary_condition_pressure
  INTEGER(INTG), PARAMETER :: cmfe_boundary_condition_pressure_incremented = boundary_condition_pressure_incremented

  INTEGER(INTG), PARAMETER :: cmfe_boundary_condition_correction_mass_increase = boundary_condition_correction_mass_increase
  INTEGER(INTG), PARAMETER :: cmfe_boundary_condition_impermeable_wall = boundary_condition_impermeable_wall
  INTEGER(INTG), PARAMETER :: cmfe_boundary_condition_neumann_integrated_only = boundary_condition_neumann_integrated_only 

  INTEGER(INTG), PARAMETER :: cmfe_boundary_condition_fixed_fitted = boundary_condition_fixed_fitted
  INTEGER(INTG), PARAMETER :: cmfe_boundary_condition_fixed_nonreflecting = boundary_condition_fixed_nonreflecting
  INTEGER(INTG), PARAMETER :: cmfe_boundary_condition_fixed_cellml = boundary_condition_fixed_cellml
  INTEGER(INTG), PARAMETER :: cmfe_boundary_condition_sparse_matrices = boundary_condition_sparse_matrices
  INTEGER(INTG), PARAMETER :: cmfe_boundary_condition_full_matrices = boundary_condition_full_matrices

  !Module types

  !Module variables

  !Interfaces

  INTERFACE cmfe_boundaryconditions_destroy
    MODULE PROCEDURE cmfe_boundaryconditions_destroynumber0
    MODULE PROCEDURE cmfe_boundaryconditions_destroynumber1
    MODULE PROCEDURE cmfe_boundaryconditions_destroyobj
  END INTERFACE cmfe_boundaryconditions_destroy

  INTERFACE cmfe_boundaryconditions_addconstant
    MODULE PROCEDURE cmfe_boundaryconditions_addconstantnumber
    MODULE PROCEDURE cmfe_boundaryconditions_addconstantobj
  END INTERFACE cmfe_boundaryconditions_addconstant

  INTERFACE cmfe_boundaryconditions_setconstant
    MODULE PROCEDURE cmfe_boundaryconditions_setconstantnumber
    MODULE PROCEDURE cmfe_boundaryconditions_setconstantobj
  END INTERFACE cmfe_boundaryconditions_setconstant

  INTERFACE cmfe_boundaryconditions_addelement
    MODULE PROCEDURE cmfe_boundaryconditions_addelementnumber
    MODULE PROCEDURE cmfe_boundaryconditions_addelementobj
  END INTERFACE cmfe_boundaryconditions_addelement

  INTERFACE cmfe_boundaryconditions_setelement
    MODULE PROCEDURE cmfe_boundaryconditions_setelementnumber
    MODULE PROCEDURE cmfe_boundaryconditions_setelementobj
  END INTERFACE cmfe_boundaryconditions_setelement

  INTERFACE cmfe_boundaryconditions_addnode
    MODULE PROCEDURE cmfe_boundaryconditions_addnodenumber
    MODULE PROCEDURE cmfe_boundaryconditions_addnodeobj
  END INTERFACE cmfe_boundaryconditions_addnode

  INTERFACE cmfe_boundaryconditions_setnode
    MODULE PROCEDURE cmfe_boundaryconditions_setnodenumber0
    MODULE PROCEDURE cmfe_boundaryconditions_setnodenumber1
    MODULE PROCEDURE cmfe_boundaryconditions_setnodeobj
  END INTERFACE cmfe_boundaryconditions_setnode

  INTERFACE cmfe_boundaryconditions_neumannsparsitytypeset
    MODULE PROCEDURE cmfe_boundaryconditions_neumannsparsitytypesetnumber0
    MODULE PROCEDURE cmfe_boundaryconditions_neumannsparsitytypesetnumber1
    MODULE PROCEDURE cmfe_boundaryconditions_neumannsparsitytypesetobj
  END INTERFACE cmfe_boundaryconditions_neumannsparsitytypeset

  INTERFACE cmfe_boundaryconditions_constrainnodedofsequal
    MODULE PROCEDURE cmfe_boundaryconditions_constrainnodedofsequalnumber
    MODULE PROCEDURE cmfe_boundaryconditions_constrainnodedofsequalobj
  END INTERFACE cmfe_boundaryconditions_constrainnodedofsequal

  PUBLIC cmfe_boundary_condition_free,cmfe_boundary_condition_fixed, &
    & cmfe_boundary_condition_fixed_wall,cmfe_boundary_condition_fixed_inlet,cmfe_boundary_condition_moved_wall, &
    & cmfe_boundary_condition_free_wall,cmfe_boundary_condition_fixed_outlet,cmfe_boundary_condition_moved_wall_incremented, &
    & cmfe_boundary_condition_correction_mass_increase,cmfe_boundary_condition_impermeable_wall, &
    & cmfe_boundary_condition_neumann_integrated_only,cmfe_boundary_condition_fixed_fitted, &
    & cmfe_boundary_condition_fixed_nonreflecting,cmfe_boundary_condition_fixed_cellml

  PUBLIC cmfe_boundary_condition_neumann_point,cmfe_boundary_condition_neumann_integrated,cmfe_boundary_condition_dirichlet
  PUBLIC cmfe_boundary_condition_cauchy,cmfe_boundary_condition_robin,cmfe_boundary_condition_fixed_incremented
  PUBLIC cmfe_boundary_condition_pressure,cmfe_boundary_condition_pressure_incremented
  PUBLIC cmfe_boundary_condition_neumann_point_incremented

  PUBLIC cmfe_boundary_condition_sparse_matrices,cmfe_boundary_condition_full_matrices

  PUBLIC cmfe_boundaryconditions_destroy

  PUBLIC cmfe_boundaryconditions_addconstant,cmfe_boundaryconditions_setconstant

  PUBLIC cmfe_boundaryconditions_addelement,cmfe_boundaryconditions_setelement

  PUBLIC cmfe_boundaryconditions_addnode,cmfe_boundaryconditions_setnode

  PUBLIC cmfe_boundaryconditions_neumannsparsitytypeset

  PUBLIC cmfe_boundaryconditions_constrainnodedofsequal

!!==================================================================================================================================
!!
!! CMISS
!!
!!==================================================================================================================================

  !Module parameters
  INTEGER(INTG), PARAMETER :: cmfe_errors_return_error_code = cmfe_return_error_code 
  INTEGER(INTG), PARAMETER :: cmfe_errors_output_error = cmfe_output_error 
  INTEGER(INTG), PARAMETER :: cmfe_errors_trap_error = cmfe_trap_error

  !Module types

  !Module variables

  !Interfaces

  INTERFACE cmfe_extracterrormessage
    MODULE PROCEDURE cmfe_extracterrormessagec
    MODULE PROCEDURE cmfe_extracterrormessagevs
  END INTERFACE cmfe_extracterrormessage

  INTERFACE cmfe_randomseedsget
    MODULE PROCEDURE cmfe_randomseedsget0
    MODULE PROCEDURE cmfe_randomseedsget1
  END INTERFACE cmfe_randomseedsget

  INTERFACE cmfe_randomseedsset
    MODULE PROCEDURE cmfe_randomseedsset0
    MODULE PROCEDURE cmfe_randomseedsset1
  END INTERFACE cmfe_randomseedsset

  PUBLIC cmfe_errors_return_error_code,cmfe_errors_output_error,cmfe_errors_trap_error

  PUBLIC cmfe_errorhandlingmodeget,cmfe_errorhandlingmodeset

  PUBLIC cmfe_extracterrormessage

  PUBLIC cmfe_randomseedsget,cmfe_randomseedssizeget,cmfe_randomseedsset

!!==================================================================================================================================
!!
!! CMISS_CELLML
!!
!!==================================================================================================================================

  !Module parameters

  INTEGER(INTG), PARAMETER :: cmfe_cellml_models_field = cellml_models_field 
  INTEGER(INTG), PARAMETER :: cmfe_cellml_state_field = cellml_state_field 
  INTEGER(INTG), PARAMETER :: cmfe_cellml_intermediate_field = cellml_intermediate_field 
  INTEGER(INTG), PARAMETER :: cmfe_cellml_parameters_field = cellml_parameters_field 

  !Module types

  !Module variables

  !Interfaces

  INTERFACE cmfe_cellml_variablesetasknown
    MODULE PROCEDURE cmfe_cellml_variablesetasknownnumberc
    MODULE PROCEDURE cmfe_cellml_variablesetasknownobjc
    MODULE PROCEDURE cmfe_cellml_variablesetasknownnumbervs
    MODULE PROCEDURE cmfe_cellml_variablesetasknownobjvs
  END INTERFACE cmfe_cellml_variablesetasknown

  INTERFACE cmfe_cellml_variablesetaswanted
    MODULE PROCEDURE cmfe_cellml_variablesetaswantednumberc
    MODULE PROCEDURE cmfe_cellml_variablesetaswantedobjc
    MODULE PROCEDURE cmfe_cellml_variablesetaswantednumbervs
    MODULE PROCEDURE cmfe_cellml_variablesetaswantedobjvs
  END INTERFACE cmfe_cellml_variablesetaswanted

  INTERFACE cmfe_cellml_createcellmltofieldmap
    MODULE PROCEDURE cmfe_cellml_createcellmltofieldmapnumberc
    MODULE PROCEDURE cmfe_cellml_createcellmltofieldmapobjc
    MODULE PROCEDURE cmfe_cellml_createcellmltofieldmapnumbervs
    MODULE PROCEDURE cmfe_cellml_createcellmltofieldmapobjvs
  END INTERFACE cmfe_cellml_createcellmltofieldmap

  INTERFACE cmfe_cellml_createfieldtocellmlmap
    MODULE PROCEDURE cmfe_cellml_createfieldtocellmlmapnumberc
    MODULE PROCEDURE cmfe_cellml_createfieldtocellmlmapobjc
    MODULE PROCEDURE cmfe_cellml_createfieldtocellmlmapnumbervs
    MODULE PROCEDURE cmfe_cellml_createfieldtocellmlmapobjvs
  END INTERFACE cmfe_cellml_createfieldtocellmlmap

  INTERFACE cmfe_cellml_createfinish
    MODULE PROCEDURE cmfe_cellml_createfinishnumber
    MODULE PROCEDURE cmfe_cellml_createfinishobj
  END INTERFACE cmfe_cellml_createfinish

  INTERFACE cmfe_cellml_createstart
    MODULE PROCEDURE cmfe_cellml_createstartnumber
    MODULE PROCEDURE cmfe_cellml_createstartobj
  END INTERFACE cmfe_cellml_createstart

  INTERFACE cmfe_cellml_destroy
    MODULE PROCEDURE cmfe_cellml_destroynumber
    MODULE PROCEDURE cmfe_cellml_destroyobj
  END INTERFACE cmfe_cellml_destroy

  INTERFACE cmfe_cellml_fieldmapscreatefinish
    MODULE PROCEDURE cmfe_cellml_fieldmapscreatefinishnumber
    MODULE PROCEDURE cmfe_cellml_fieldmapscreatefinishobj
  END INTERFACE cmfe_cellml_fieldmapscreatefinish

  INTERFACE cmfe_cellml_fieldmapscreatestart
    MODULE PROCEDURE cmfe_cellml_fieldmapscreatestartnumber
    MODULE PROCEDURE cmfe_cellml_fieldmapscreatestartobj
  END INTERFACE cmfe_cellml_fieldmapscreatestart

  INTERFACE cmfe_cellml_modelimport
    MODULE PROCEDURE cmfe_cellml_modelimportnumberc
    MODULE PROCEDURE cmfe_cellml_modelimportobjc
    MODULE PROCEDURE cmfe_cellml_modelimportnumbervs
    MODULE PROCEDURE cmfe_cellml_modelimportobjvs
  END INTERFACE cmfe_cellml_modelimport

  INTERFACE cmfe_cellml_modelsfieldcreatefinish
    MODULE PROCEDURE cmfe_cellml_modelsfieldcreatefinishnumber
    MODULE PROCEDURE cmfe_cellml_modelsfieldcreatefinishobj
  END INTERFACE cmfe_cellml_modelsfieldcreatefinish

  INTERFACE cmfe_cellml_modelsfieldcreatestart
    MODULE PROCEDURE cmfe_cellml_modelsfieldcreatestartnumber
    MODULE PROCEDURE cmfe_cellml_modelsfieldcreatestartobj
  END INTERFACE cmfe_cellml_modelsfieldcreatestart

  INTERFACE cmfe_cellml_modelsfieldget
    MODULE PROCEDURE cmfe_cellml_modelsfieldgetnumber
    MODULE PROCEDURE cmfe_cellml_modelsfieldgetobj
  END INTERFACE cmfe_cellml_modelsfieldget

  INTERFACE cmfe_cellml_statefieldcreatefinish
    MODULE PROCEDURE cmfe_cellml_statefieldcreatefinishnumber
    MODULE PROCEDURE cmfe_cellml_statefieldcreatefinishobj
  END INTERFACE cmfe_cellml_statefieldcreatefinish

  INTERFACE cmfe_cellml_statefieldcreatestart
    MODULE PROCEDURE cmfe_cellml_statefieldcreatestartnumber
    MODULE PROCEDURE cmfe_cellml_statefieldcreatestartobj
  END INTERFACE cmfe_cellml_statefieldcreatestart

  INTERFACE cmfe_cellml_statefieldget
    MODULE PROCEDURE cmfe_cellml_statefieldgetnumber
    MODULE PROCEDURE cmfe_cellml_statefieldgetobj
  END INTERFACE cmfe_cellml_statefieldget

  INTERFACE cmfe_cellml_fieldcomponentget
    MODULE PROCEDURE cmfe_cellml_fieldcomponentgetnumberc
    MODULE PROCEDURE cmfe_cellml_fieldcomponentgetobjc
    MODULE PROCEDURE cmfe_cellml_fieldcomponentgetnumbervs
    MODULE PROCEDURE cmfe_cellml_fieldcomponentgetobjvs
  END INTERFACE cmfe_cellml_fieldcomponentget

  INTERFACE cmfe_cellml_intermediatefieldcreatefinish
    MODULE PROCEDURE cmfe_cellml_intermediatefieldcreatefinishnumber
    MODULE PROCEDURE cmfe_cellml_intermediatefieldcreatefinishobj
  END INTERFACE cmfe_cellml_intermediatefieldcreatefinish

  INTERFACE cmfe_cellml_intermediatefieldcreatestart
    MODULE PROCEDURE cmfe_cellml_intermediatefieldcreatestartnumber
    MODULE PROCEDURE cmfe_cellml_intermediatefieldcreatestartobj
  END INTERFACE cmfe_cellml_intermediatefieldcreatestart

  INTERFACE cmfe_cellml_intermediatefieldget
    MODULE PROCEDURE cmfe_cellml_intermediatefieldgetnumber
    MODULE PROCEDURE cmfe_cellml_intermediatefieldgetobj
  END INTERFACE cmfe_cellml_intermediatefieldget

  INTERFACE cmfe_cellml_parametersfieldcreatefinish
    MODULE PROCEDURE cmfe_cellml_parametersfieldcreatefinishnumber
    MODULE PROCEDURE cmfe_cellml_parametersfieldcreatefinishobj
  END INTERFACE cmfe_cellml_parametersfieldcreatefinish

  INTERFACE cmfe_cellml_parametersfieldcreatestart
    MODULE PROCEDURE cmfe_cellml_parametersfieldcreatestartnumber
    MODULE PROCEDURE cmfe_cellml_parametersfieldcreatestartobj
  END INTERFACE cmfe_cellml_parametersfieldcreatestart

  INTERFACE cmfe_cellml_parametersfieldget
    MODULE PROCEDURE cmfe_cellml_parametersfieldgetnumber
    MODULE PROCEDURE cmfe_cellml_parametersfieldgetobj
  END INTERFACE cmfe_cellml_parametersfieldget

  INTERFACE cmfe_cellml_generate
    MODULE PROCEDURE cmfe_cellml_generatenumber
    MODULE PROCEDURE cmfe_cellml_generateobj
  END INTERFACE cmfe_cellml_generate

  PUBLIC cmfe_cellml_models_field,cmfe_cellml_state_field,cmfe_cellml_intermediate_field,cmfe_cellml_parameters_field

  PUBLIC cmfe_cellml_variablesetasknown,cmfe_cellml_variablesetaswanted

  PUBLIC cmfe_cellml_createcellmltofieldmap,cmfe_cellml_createfieldtocellmlmap

  PUBLIC cmfe_cellml_createfinish,cmfe_cellml_createstart

  PUBLIC cmfe_cellml_destroy

  PUBLIC cmfe_cellml_fieldmapscreatestart,cmfe_cellml_fieldmapscreatefinish

  PUBLIC cmfe_cellml_modelimport

  PUBLIC cmfe_cellml_modelsfieldcreatefinish,cmfe_cellml_modelsfieldcreatestart,cmfe_cellml_modelsfieldget

  PUBLIC cmfe_cellml_statefieldcreatefinish,cmfe_cellml_statefieldcreatestart,cmfe_cellml_statefieldget

  PUBLIC cmfe_cellml_fieldcomponentget

  PUBLIC cmfe_cellml_intermediatefieldcreatefinish,cmfe_cellml_intermediatefieldcreatestart

  PUBLIC cmfe_cellml_intermediatefieldget

  PUBLIC cmfe_cellml_parametersfieldcreatefinish,cmfe_cellml_parametersfieldcreatestart,cmfe_cellml_parametersfieldget

  PUBLIC cmfe_cellml_generate

!!==================================================================================================================================
!!
!! COMP_ENVIRONMENT
!!
!!==================================================================================================================================

  !Module parameters

  !Module types

  !Module variables

  !Interfaces

  PUBLIC cmfe_computationalnodenumberget

  PUBLIC cmfe_computationalnumberofnodesget

  PUBLIC cmfe_computationalworkgroup_createstart

  PUBLIC cmfe_computationalworkgroup_createfinish

  PUBLIC cmfe_computationalworkgroup_subgroupadd

  PUBLIC cmfe_decomposition_worldworkgroupset
!!==================================================================================================================================
!!
!! CONSTANTS
!!
!!==================================================================================================================================

  !Module parameters

  INTEGER(INTG), PARAMETER :: cmfe_integer_type = integer_type 
  INTEGER(INTG), PARAMETER :: cmfe_short_integer_type = short_integer_type 
  INTEGER(INTG), PARAMETER :: cmfe_long_integer_type = long_integer_type 
  INTEGER(INTG), PARAMETER :: cmfe_single_real_type = single_real_type 
  INTEGER(INTG), PARAMETER :: cmfe_double_real_type = double_real_type 
  INTEGER(INTG), PARAMETER :: cmfe_quadrauple_real_type = quadruple_real_type 
  INTEGER(INTG), PARAMETER :: cmfe_character_type = character_type 
  INTEGER(INTG), PARAMETER :: cmfe_logical_type = logical_type 
  INTEGER(INTG), PARAMETER :: cmfe_single_complex_type = single_complex_type 
  INTEGER(INTG), PARAMETER :: cmfe_double_complex_type = double_complex_type 
  INTEGER(INTG), PARAMETER :: cmfe_quadruple_complex_type = quadruple_complex_type 
  INTEGER(INTG), PARAMETER :: cmfe_no_global_deriv = no_global_deriv 
  INTEGER(INTG), PARAMETER :: cmfe_global_deriv_s1 = global_deriv_s1 
  INTEGER(INTG), PARAMETER :: cmfe_global_deriv_s2 = global_deriv_s2 
  INTEGER(INTG), PARAMETER :: cmfe_global_deriv_s1_s2 = global_deriv_s1_s2 
  INTEGER(INTG), PARAMETER :: cmfe_global_deriv_s3 = global_deriv_s3 
  INTEGER(INTG), PARAMETER :: cmfe_global_deriv_s1_s3 = global_deriv_s1_s3 
  INTEGER(INTG), PARAMETER :: cmfe_global_deriv_s2_s3 = global_deriv_s2_s3 
  INTEGER(INTG), PARAMETER :: cmfe_global_deriv_s1_s2_s3 = global_deriv_s1_s2_s3 

  !Module types

  !Module variables

  !Interfaces

  PUBLIC cmfe_integer_type,cmfe_short_integer_type,cmfe_long_integer_type,cmfe_single_real_type,cmfe_double_real_type, &
    & cmfe_quadrauple_real_type,cmfe_character_type,cmfe_logical_type,cmfe_single_complex_type,cmfe_double_complex_type, &
    & cmfe_quadruple_complex_type
  
  PUBLIC cmfe_no_global_deriv,cmfe_global_deriv_s1,cmfe_global_deriv_s2,cmfe_global_deriv_s1_s2, &
    & cmfe_global_deriv_s3,cmfe_global_deriv_s1_s3,cmfe_global_deriv_s2_s3,cmfe_global_deriv_s1_s2_s3

!!==================================================================================================================================
!!
!! CONTROL_LOOP_ROUTINES
!!
!!==================================================================================================================================

  !Module parameters

  INTEGER(INTG), PARAMETER :: cmfe_control_loop_node = control_loop_node 
  INTEGER(INTG), PARAMETER :: cmfe_control_loop_no_output = control_loop_no_output 
  INTEGER(INTG), PARAMETER :: cmfe_control_loop_progress_output = control_loop_progress_output 
  INTEGER(INTG), PARAMETER :: cmfe_control_loop_timing_output = control_loop_timing_output 

  !Module types

  !Module variables

  !Interfaces

  INTERFACE cmfe_controlloop_currenttimesget
    MODULE PROCEDURE cmfe_controlloop_currenttimesgetnumber0
    MODULE PROCEDURE cmfe_controlloop_currenttimesgetnumber1
    MODULE PROCEDURE cmfe_controlloop_currenttimesgetobj
  END INTERFACE cmfe_controlloop_currenttimesget

  INTERFACE cmfe_controlloop_destroy
    MODULE PROCEDURE cmfe_controlloop_destroynumber0
    MODULE PROCEDURE cmfe_controlloop_destroynumber1
    MODULE PROCEDURE cmfe_controlloop_destroyobj
  END INTERFACE cmfe_controlloop_destroy

  INTERFACE cmfe_controlloop_controlloopget
    MODULE PROCEDURE cmfe_controlloop_controlloopgetnumber00
    MODULE PROCEDURE cmfe_controlloop_controlloopgetnumber10
    MODULE PROCEDURE cmfe_controlloop_controlloopgetnumber01
    MODULE PROCEDURE cmfe_controlloop_controlloopgetnumber11
    MODULE PROCEDURE cmfe_controlloop_controlloopgetobj0
    MODULE PROCEDURE cmfe_controlloop_controlloopgetobj1
  END INTERFACE cmfe_controlloop_controlloopget

  INTERFACE cmfe_controlloop_iterationsset
    MODULE PROCEDURE cmfe_controlloop_iterationssetnumber0
    MODULE PROCEDURE cmfe_controlloop_iterationssetnumber1
    MODULE PROCEDURE cmfe_controlloop_iterationssetobj
  END INTERFACE cmfe_controlloop_iterationsset

  INTERFACE cmfe_controlloop_labelget
    MODULE PROCEDURE cmfe_controlloop_labelgetcnumber0
    MODULE PROCEDURE cmfe_controlloop_labelgetcnumber1
    MODULE PROCEDURE cmfe_controlloop_labelgetcobj
    MODULE PROCEDURE cmfe_controlloop_labelgetvsnumber0
    MODULE PROCEDURE cmfe_controlloop_labelgetvsnumber1
    MODULE PROCEDURE cmfe_controlloop_labelgetvsobj
  END INTERFACE cmfe_controlloop_labelget

  INTERFACE cmfe_controlloop_labelset
    MODULE PROCEDURE cmfe_controlloop_labelsetcnumber0
    MODULE PROCEDURE cmfe_controlloop_labelsetcnumber1
    MODULE PROCEDURE cmfe_controlloop_labelsetcobj
    MODULE PROCEDURE cmfe_controlloop_labelsetvsnumber0
    MODULE PROCEDURE cmfe_controlloop_labelsetvsnumber1
    MODULE PROCEDURE cmfe_controlloop_labelsetvsobj
  END INTERFACE cmfe_controlloop_labelset

  INTERFACE cmfe_controlloop_maximumiterationsset
    MODULE PROCEDURE cmfe_controlloop_maximumiterationssetnumber0
    MODULE PROCEDURE cmfe_controlloop_maximumiterationssetnumber1
    MODULE PROCEDURE cmfe_controlloop_maximumiterationssetobj
  END INTERFACE cmfe_controlloop_maximumiterationsset

  INTERFACE cmfe_controlloop_absolutetoleranceset
    MODULE PROCEDURE cmfe_controlloop_absolutetolerancesetnumber0
    MODULE PROCEDURE cmfe_controlloop_absolutetolerancesetnumber1
    MODULE PROCEDURE cmfe_controlloop_absolutetolerancesetobj
  END INTERFACE cmfe_controlloop_absolutetoleranceset

  INTERFACE cmfe_controlloop_numberofiterationsget
    MODULE PROCEDURE cmfe_controlloop_numberofiterationsgetnumber0
    MODULE PROCEDURE cmfe_controlloop_numberofiterationsgetnumber1
    MODULE PROCEDURE cmfe_controlloop_numberofiterationsgetobj
  END INTERFACE cmfe_controlloop_numberofiterationsget

  INTERFACE cmfe_controlloop_numberofiterationsset
    MODULE PROCEDURE cmfe_controlloop_numberofiterationssetnumber0
    MODULE PROCEDURE cmfe_controlloop_numberofiterationssetnumber1
    MODULE PROCEDURE cmfe_controlloop_numberofiterationssetobj
  END INTERFACE cmfe_controlloop_numberofiterationsset

  INTERFACE cmfe_controlloop_numberofsubloopsget
    MODULE PROCEDURE cmfe_controlloop_numberofsubloopsgetnumber0
    MODULE PROCEDURE cmfe_controlloop_numberofsubloopsgetnumber1
    MODULE PROCEDURE cmfe_controlloop_numberofsubloopsgetobj
  END INTERFACE cmfe_controlloop_numberofsubloopsget

  INTERFACE cmfe_controlloop_numberofsubloopsset
    MODULE PROCEDURE cmfe_controlloop_numberofsubloopssetnumber0
    MODULE PROCEDURE cmfe_controlloop_numberofsubloopssetnumber1
    MODULE PROCEDURE cmfe_controlloop_numberofsubloopssetobj
  END INTERFACE cmfe_controlloop_numberofsubloopsset

  INTERFACE cmfe_controlloop_timeoutputset
    MODULE PROCEDURE cmfe_controlloop_timeoutputsetnumber0
    MODULE PROCEDURE cmfe_controlloop_timeoutputsetnumber1
    MODULE PROCEDURE cmfe_controlloop_timeoutputsetobj
  END INTERFACE cmfe_controlloop_timeoutputset

  INTERFACE cmfe_controlloop_outputtypeget
    MODULE PROCEDURE cmfe_controlloop_outputtypegetnumber0
    MODULE PROCEDURE cmfe_controlloop_outputtypegetnumber1
    MODULE PROCEDURE cmfe_controlloop_outputtypegetobj
  END INTERFACE cmfe_controlloop_outputtypeget

  INTERFACE cmfe_controlloop_outputtypeset
    MODULE PROCEDURE cmfe_controlloop_outputtypesetnumber0
    MODULE PROCEDURE cmfe_controlloop_outputtypesetnumber1
    MODULE PROCEDURE cmfe_controlloop_outputtypesetobj
  END INTERFACE cmfe_controlloop_outputtypeset

  INTERFACE cmfe_controlloop_timeinputset
    MODULE PROCEDURE cmfe_controlloop_timeinputsetnumber0
    MODULE PROCEDURE cmfe_controlloop_timeinputsetnumber1
    MODULE PROCEDURE cmfe_controlloop_timeinputsetobj
  END INTERFACE cmfe_controlloop_timeinputset

  INTERFACE cmfe_controlloop_timesget
    MODULE PROCEDURE cmfe_controlloop_timesgetnumber0
    MODULE PROCEDURE cmfe_controlloop_timesgetnumber1
    MODULE PROCEDURE cmfe_controlloop_timesgetobj
  END INTERFACE cmfe_controlloop_timesget

  INTERFACE cmfe_controlloop_timesset
    MODULE PROCEDURE cmfe_controlloop_timessetnumber0
    MODULE PROCEDURE cmfe_controlloop_timessetnumber1
    MODULE PROCEDURE cmfe_controlloop_timessetobj
  END INTERFACE cmfe_controlloop_timesset

  INTERFACE cmfe_controlloop_typeset
    MODULE PROCEDURE cmfe_controlloop_typesetnumber0
    MODULE PROCEDURE cmfe_controlloop_typesetnumber1
    MODULE PROCEDURE cmfe_controlloop_typesetobj
  END INTERFACE cmfe_controlloop_typeset

  PUBLIC cmfe_control_loop_node

  PUBLIC cmfe_control_loop_no_output,cmfe_control_loop_progress_output,cmfe_control_loop_timing_output

  PUBLIC cmfe_controlloop_currenttimesget

  PUBLIC cmfe_controlloop_destroy

  PUBLIC cmfe_controlloop_controlloopget

  PUBLIC cmfe_controlloop_iterationsset

  PUBLIC cmfe_controlloop_labelget,cmfe_controlloop_labelset

  PUBLIC cmfe_controlloop_maximumiterationsset

  PUBLIC cmfe_controlloop_absolutetoleranceset

  PUBLIC cmfe_controlloop_numberofiterationsget, cmfe_controlloop_numberofiterationsset
  
  PUBLIC cmfe_controlloop_numberofsubloopsget,cmfe_controlloop_numberofsubloopsset

  PUBLIC cmfe_controlloop_outputtypeget,cmfe_controlloop_outputtypeset

  PUBLIC cmfe_controlloop_timeoutputset,cmfe_controlloop_timeinputset

  PUBLIC cmfe_controlloop_timesget,cmfe_controlloop_timesset

  PUBLIC cmfe_controlloop_typeset


!!==================================================================================================================================
!!
!! COORDINATE_ROUTINES
!!
!!==================================================================================================================================

  !Module parameters

  INTEGER(INTG), PARAMETER :: cmfe_coordinate_rectangular_cartesian_type = coordinate_rectangular_cartesian_type 
  INTEGER(INTG), PARAMETER :: cmfe_coordinate_cylindrical_polar_type = coordinate_cylindrical_polar_type 
  INTEGER(INTG), PARAMETER :: cmfe_coordinate_spherical_polar_type = coordinate_spherical_polar_type 
  INTEGER(INTG), PARAMETER :: cmfe_coordinate_prolate_spheroidal_type = coordinate_prolate_spheroidal_type 
  INTEGER(INTG), PARAMETER :: cmfe_coordinate_oblate_spheroidal_type = coordinate_oblate_spheroidal_type 
  INTEGER(INTG), PARAMETER :: cmfe_coordinate_no_radial_interpolation_type = coordinate_no_radial_interpolation_type 
  INTEGER(INTG), PARAMETER :: cmfe_coordinate_radial_interpolation_type = coordinate_radial_interpolation_type 
  INTEGER(INTG), PARAMETER :: cmfe_coordinate_radial_squared_interpolation_type = coordinate_radial_squared_interpolation_type 
  INTEGER(INTG), PARAMETER :: cmfe_coordinate_radial_cubed_interpolation_type = coordinate_radial_cubed_interpolation_type 

  !Module types

  !Module variables

  !Interfaces

  INTERFACE cmfe_coordinatesystem_createfinish
    MODULE PROCEDURE cmfe_coordinatesystem_createfinishnumber
    MODULE PROCEDURE cmfe_coordinatesystem_createfinishobj
  END INTERFACE cmfe_coordinatesystem_createfinish

  INTERFACE cmfe_coordinatesystem_createstart
    MODULE PROCEDURE cmfe_coordinatesystem_createstartnumber
    MODULE PROCEDURE cmfe_coordinatesystem_createstartobj
  END INTERFACE cmfe_coordinatesystem_createstart

  INTERFACE cmfe_coordinatesystem_destroy
    MODULE PROCEDURE cmfe_coordinatesystem_destroynumber
    MODULE PROCEDURE cmfe_coordinatesystem_destroyobj
  END INTERFACE cmfe_coordinatesystem_destroy

  INTERFACE cmfe_coordinatesystem_dimensionget
    MODULE PROCEDURE cmfe_coordinatesystem_dimensiongetnumber
    MODULE PROCEDURE cmfe_coordinatesystem_dimensiongetobj
  END INTERFACE cmfe_coordinatesystem_dimensionget

  INTERFACE cmfe_coordinatesystem_dimensionset
    MODULE PROCEDURE cmfe_coordinatesystem_dimensionsetnumber
    MODULE PROCEDURE cmfe_coordinatesystem_dimensionsetobj
  END INTERFACE cmfe_coordinatesystem_dimensionset

  INTERFACE cmfe_coordinatesystem_focusget
    MODULE PROCEDURE cmfe_coordinatesystem_focusgetnumber
    MODULE PROCEDURE cmfe_coordinatesystem_focusgetobj
  END INTERFACE cmfe_coordinatesystem_focusget

  INTERFACE cmfe_coordinatesystem_focusset
    MODULE PROCEDURE cmfe_coordinatesystem_focussetnumber
    MODULE PROCEDURE cmfe_coordinatesystem_focussetobj
  END INTERFACE cmfe_coordinatesystem_focusset

  INTERFACE cmfe_coordinatesystem_radialinterpolationget
    MODULE PROCEDURE cmfe_coordinatesystem_radialinterpolationgetnumber
    MODULE PROCEDURE cmfe_coordinatesystem_radialinterpolationgetobj
  END INTERFACE cmfe_coordinatesystem_radialinterpolationget

  INTERFACE cmfe_coordinatesystem_radialinterpolationset
    MODULE PROCEDURE cmfe_coordinatesystem_radialinterpolationsetnumber
    MODULE PROCEDURE cmfe_coordinatesystem_radialinterpolationsetobj
  END INTERFACE cmfe_coordinatesystem_radialinterpolationset

  INTERFACE cmfe_coordinatesystem_typeget
    MODULE PROCEDURE cmfe_coordinatesystem_typegetnumber
    MODULE PROCEDURE cmfe_coordinatesystem_typegetobj
  END INTERFACE cmfe_coordinatesystem_typeget

  INTERFACE cmfe_coordinatesystem_typeset
    MODULE PROCEDURE cmfe_coordinatesystem_typesetnumber
    MODULE PROCEDURE cmfe_coordinatesystem_typesetobj
  END INTERFACE cmfe_coordinatesystem_typeset

  INTERFACE cmfe_coordinatesystem_originget
    MODULE PROCEDURE cmfe_coordinatesystem_origingetnumber
    MODULE PROCEDURE cmfe_coordinatesystem_origingetobj
  END INTERFACE cmfe_coordinatesystem_originget

  INTERFACE cmfe_coordinatesystem_originset
    MODULE PROCEDURE cmfe_coordinatesystem_originsetnumber
    MODULE PROCEDURE cmfe_coordinatesystem_originsetobj
  END INTERFACE cmfe_coordinatesystem_originset

  INTERFACE cmfe_coordinatesystem_orientationget
    MODULE PROCEDURE cmfe_coordinatesystem_orientationgetnumber
    MODULE PROCEDURE cmfe_coordinatesystem_orientationgetobj
  END INTERFACE cmfe_coordinatesystem_orientationget

  INTERFACE cmfe_coordinatesystem_orientationset
    MODULE PROCEDURE cmfe_coordinatesystem_orientationsetnumber
    MODULE PROCEDURE cmfe_coordinatesystem_orientationsetobj
  END INTERFACE cmfe_coordinatesystem_orientationset

  PUBLIC cmfe_coordinate_rectangular_cartesian_type,cmfe_coordinate_cylindrical_polar_type, &
    & cmfe_coordinate_spherical_polar_type, &
    & cmfe_coordinate_prolate_spheroidal_type,cmfe_coordinate_oblate_spheroidal_type

  PUBLIC cmfe_coordinate_no_radial_interpolation_type,cmfe_coordinate_radial_interpolation_type, &
    & cmfe_coordinate_radial_squared_interpolation_type,cmfe_coordinate_radial_cubed_interpolation_type

  PUBLIC cmfe_coordinatesystem_createfinish,cmfe_coordinatesystem_createstart

  PUBLIC cmfe_coordinatesystem_destroy

  PUBLIC cmfe_coordinatesystem_dimensionget,cmfe_coordinatesystem_dimensionset

  PUBLIC cmfe_coordinatesystem_focusget,cmfe_coordinatesystem_focusset

  PUBLIC cmfe_coordinatesystem_radialinterpolationget,cmfe_coordinatesystem_radialinterpolationset

  PUBLIC cmfe_coordinatesystem_typeget,cmfe_coordinatesystem_typeset

  PUBLIC cmfe_coordinatesystem_originget,cmfe_coordinatesystem_originset

  PUBLIC cmfe_coordinatesystem_orientationget,cmfe_coordinatesystem_orientationset

!!==================================================================================================================================
!!
!! DATA_POINT_ROUTINES
!!
!!==================================================================================================================================

  !Module parameters

  !Module types

  !Module variables

  !Interfaces

  INTERFACE cmfe_datapoints_createfinish
    MODULE PROCEDURE cmfe_datapoints_createfinishnumber
    MODULE PROCEDURE cmfe_datapoints_createfinishobj
  END INTERFACE cmfe_datapoints_createfinish

  INTERFACE cmfe_datapoints_createstart
    MODULE PROCEDURE cmfe_datapoints_createstartnumber
    MODULE PROCEDURE cmfe_datapoints_createstartobj
    MODULE PROCEDURE cmfe_datapoints_createstartinterfaceobj
  END INTERFACE cmfe_datapoints_createstart

  INTERFACE cmfe_datapoints_destroy
    MODULE PROCEDURE cmfe_datapoints_destroynumber
    MODULE PROCEDURE cmfe_datapoints_destroyobj
  END INTERFACE cmfe_datapoints_destroy

  INTERFACE cmfe_datapoints_numberofdatapointsget
    MODULE PROCEDURE cmfe_datapoints_numberofdatapointsgetnumber
    MODULE PROCEDURE cmfe_datapoints_numberofdatapointsgetobj
  END INTERFACE cmfe_datapoints_numberofdatapointsget

  INTERFACE cmfe_datapoints_labelget
    MODULE PROCEDURE cmfe_datapoints_labelgetcnumber
    MODULE PROCEDURE cmfe_datapoints_labelgetcobj
    MODULE PROCEDURE cmfe_datapoints_labelgetvsnumber
    MODULE PROCEDURE cmfe_datapoints_labelgetvsobj
  END INTERFACE cmfe_datapoints_labelget

  INTERFACE cmfe_datapoints_labelset
    MODULE PROCEDURE cmfe_datapoints_labelsetcnumber
    MODULE PROCEDURE cmfe_datapoints_labelsetcobj
    MODULE PROCEDURE cmfe_datapoints_labelsetvsnumber
    MODULE PROCEDURE cmfe_datapoints_labelsetvsobj
  END INTERFACE cmfe_datapoints_labelset

  INTERFACE cmfe_datapoints_usernumberget
    MODULE PROCEDURE cmfe_datapoints_usernumbergetnumber
    MODULE PROCEDURE cmfe_datapoints_usernumbergetobj
  END INTERFACE cmfe_datapoints_usernumberget

  INTERFACE cmfe_datapoints_usernumberset
    MODULE PROCEDURE cmfe_datapoints_usernumbersetnumber
    MODULE PROCEDURE cmfe_datapoints_usernumbersetobj
  END INTERFACE cmfe_datapoints_usernumberset

  INTERFACE cmfe_datapoints_valuesget
    MODULE PROCEDURE cmfe_datapoints_valuesgetnumber
    MODULE PROCEDURE cmfe_datapoints_valuesgetobj
  END INTERFACE cmfe_datapoints_valuesget

  INTERFACE cmfe_datapoints_valuesset
    MODULE PROCEDURE cmfe_datapoints_valuessetnumber
    MODULE PROCEDURE cmfe_datapoints_valuessetobj
  END INTERFACE cmfe_datapoints_valuesset

  INTERFACE cmfe_datapoints_weightsget
    MODULE PROCEDURE cmfe_datapoints_weightsgetnumber
    MODULE PROCEDURE cmfe_datapoints_weightsgetobj
  END INTERFACE cmfe_datapoints_weightsget

  INTERFACE cmfe_datapoints_weightsset
    MODULE PROCEDURE cmfe_datapoints_weightssetnumber
    MODULE PROCEDURE cmfe_datapoints_weightssetobj
  END INTERFACE cmfe_datapoints_weightsset

  PUBLIC cmfe_datapoints_createfinish,cmfe_datapoints_createstart

  PUBLIC cmfe_datapoints_destroy

  PUBLIC cmfe_datapoints_numberofdatapointsget

  PUBLIC cmfe_datapoints_labelget,cmfe_datapoints_labelset

  PUBLIC cmfe_datapoints_usernumberget,cmfe_datapoints_usernumberset

  PUBLIC cmfe_datapoints_valuesget,cmfe_datapoints_valuesset

  PUBLIC cmfe_datapoints_weightsget,cmfe_datapoints_weightsset

!!==================================================================================================================================
!!
!! DATA_PROJECTION_ROUTINES
!!
!!==================================================================================================================================

  !Module parameters

  INTEGER(INTG), PARAMETER :: cmfe_data_projection_boundary_lines_projection_type = data_projection_boundary_lines_projection_type
  INTEGER(INTG), PARAMETER :: cmfe_data_projection_boundary_faces_projection_type = data_projection_boundary_faces_projection_type
  INTEGER(INTG), PARAMETER :: cmfe_data_projection_all_elements_projection_type = data_projection_all_elements_projection_type 

  !Module types

  !Module variables

  !Interfaces

  INTERFACE cmfe_dataprojection_absolutetoleranceget
    MODULE PROCEDURE cmfe_dataprojection_absolutetolerancegetnumber
    MODULE PROCEDURE cmfe_dataprojection_absolutetolerancegetobj
  END INTERFACE cmfe_dataprojection_absolutetoleranceget

  INTERFACE cmfe_dataprojection_absolutetoleranceset
    MODULE PROCEDURE cmfe_dataprojection_absolutetolerancesetnumber
    MODULE PROCEDURE cmfe_dataprojection_absolutetolerancesetobj
  END INTERFACE cmfe_dataprojection_absolutetoleranceset

  INTERFACE cmfe_dataprojection_createfinish
    MODULE PROCEDURE cmfe_dataprojection_createfinishnumber
    MODULE PROCEDURE cmfe_dataprojection_createfinishobj
  END INTERFACE cmfe_dataprojection_createfinish

  INTERFACE cmfe_dataprojection_createstart
    MODULE PROCEDURE cmfe_dataprojection_createstartnumber
    MODULE PROCEDURE cmfe_dataprojection_createstartobj
  END INTERFACE cmfe_dataprojection_createstart

  INTERFACE cmfe_dataprojection_destroy
    MODULE PROCEDURE cmfe_dataprojection_destroynumber
    MODULE PROCEDURE cmfe_dataprojection_destroyobj
  END INTERFACE cmfe_dataprojection_destroy
  
  INTERFACE cmfe_dataprojection_datapointspositionevaluate
    MODULE PROCEDURE cmfe_dataprojection_datapointspositionevaluateregionnumber
    MODULE PROCEDURE cmfe_dataprojection_datapointspositionevaluateinterfacenumber
    MODULE PROCEDURE cmfe_dataprojection_datapointspositionevaluateobj
  END INTERFACE cmfe_dataprojection_datapointspositionevaluate

  INTERFACE cmfe_dataprojection_datapointsprojectionevaluate
    MODULE PROCEDURE cmfe_dataprojection_datapointsprojectionevaluatenumber
    MODULE PROCEDURE cmfe_dataprojection_datapointsprojectionevaluateobj
  END INTERFACE cmfe_dataprojection_datapointsprojectionevaluate

  INTERFACE cmfe_dataprojection_maximumiterationupdateget
    MODULE PROCEDURE cmfe_dataprojection_maximumiterationupdategetnumber
    MODULE PROCEDURE cmfe_dataprojection_maximumiterationupdategetobj
  END INTERFACE cmfe_dataprojection_maximumiterationupdateget

  INTERFACE cmfe_dataprojection_maximumiterationupdateset
    MODULE PROCEDURE cmfe_dataprojection_maximumiterationupdatesetnumber
    MODULE PROCEDURE cmfe_dataprojection_maximumiterationupdatesetobj
  END INTERFACE cmfe_dataprojection_maximumiterationupdateset

  INTERFACE cmfe_dataprojection_maximumnumberofiterationsget
    MODULE PROCEDURE cmfe_dataprojection_maximumnumberofiterationsgetnumber
    MODULE PROCEDURE cmfe_dataprojection_maximumnumberofiterationsgetobj
  END INTERFACE cmfe_dataprojection_maximumnumberofiterationsget

  INTERFACE cmfe_dataprojection_maximumnumberofiterationsset
    MODULE PROCEDURE cmfe_dataprojection_maximumnumberofiterationssetnumber
    MODULE PROCEDURE cmfe_dataprojection_maximumnumberofiterationssetobj
  END INTERFACE cmfe_dataprojection_maximumnumberofiterationsset

  INTERFACE cmfe_dataprojection_numberofclosestelementsget
    MODULE PROCEDURE cmfe_dataprojection_numberofclosestelementsgetnumber
    MODULE PROCEDURE cmfe_dataprojection_numberofclosestelementsgetobj
  END INTERFACE cmfe_dataprojection_numberofclosestelementsget

  INTERFACE cmfe_dataprojection_numberofclosestelementsset
    MODULE PROCEDURE cmfe_dataprojection_numberofclosestelementssetnumber
    MODULE PROCEDURE cmfe_dataprojection_numberofclosestelementssetobj
  END INTERFACE cmfe_dataprojection_numberofclosestelementsset
  
  INTERFACE cmfe_dataprojection_projectioncandidatesset
    MODULE PROCEDURE cmfe_dataprojection_projectioncandidatessetregionnumber
    MODULE PROCEDURE cmfe_dataprojection_projectioncandidatessetinterfacenumber
    MODULE PROCEDURE cmfe_dataprojection_projectioncandidatessetobj
  END INTERFACE cmfe_dataprojection_projectioncandidatesset

  INTERFACE cmfe_dataprojection_projectiontypeget
    MODULE PROCEDURE cmfe_dataprojection_projectiontypegetnumber
    MODULE PROCEDURE cmfe_dataprojection_projectiontypegetobj
  END INTERFACE cmfe_dataprojection_projectiontypeget

  INTERFACE cmfe_dataprojection_projectiontypeset
    MODULE PROCEDURE cmfe_dataprojection_projectiontypesetnumber
    MODULE PROCEDURE cmfe_dataprojection_projectiontypesetobj
  END INTERFACE cmfe_dataprojection_projectiontypeset

  INTERFACE cmfe_dataprojection_relativetoleranceget
    MODULE PROCEDURE cmfe_dataprojection_relativetolerancegetnumber
    MODULE PROCEDURE cmfe_dataprojection_relativetolerancegetobj
  END INTERFACE cmfe_dataprojection_relativetoleranceget

  INTERFACE cmfe_dataprojection_relativetoleranceset
    MODULE PROCEDURE cmfe_dataprojection_relativetolerancesetnumber
    MODULE PROCEDURE cmfe_dataprojection_relativetolerancesetobj
  END INTERFACE cmfe_dataprojection_relativetoleranceset

  INTERFACE cmfe_dataprojection_startingxiget
    MODULE PROCEDURE cmfe_dataprojection_startingxigetnumber
    MODULE PROCEDURE cmfe_dataprojection_startingxigetobj
  END INTERFACE cmfe_dataprojection_startingxiget

  INTERFACE cmfe_dataprojection_startingxiset
    MODULE PROCEDURE cmfe_dataprojection_startingxisetnumber
    MODULE PROCEDURE cmfe_dataprojection_startingxisetobj
  END INTERFACE cmfe_dataprojection_startingxiset

  INTERFACE cmfe_dataprojection_elementset
    MODULE PROCEDURE cmfe_dataprojection_elementsetregionnumber
    MODULE PROCEDURE cmfe_dataprojection_elementsetinterfacenumber
    MODULE PROCEDURE cmfe_dataprojection_elementsetobj
  END INTERFACE cmfe_dataprojection_elementset

  INTERFACE cmfe_dataprojection_labelget
    MODULE PROCEDURE cmfe_dataprojection_labelgetcregionnumber
    MODULE PROCEDURE cmfe_dataprojection_labelgetcinterfacenumber
    MODULE PROCEDURE cmfe_dataprojection_labelgetcobj
    MODULE PROCEDURE cmfe_dataprojection_labelgetvsregionnumber
    MODULE PROCEDURE cmfe_dataprojection_labelgetvsinterfacenumber
    MODULE PROCEDURE cmfe_dataprojection_labelgetvsobj
  END INTERFACE cmfe_dataprojection_labelget

  INTERFACE cmfe_dataprojection_labelset
    MODULE PROCEDURE cmfe_dataprojection_labelsetcregionnumber
    MODULE PROCEDURE cmfe_dataprojection_labelsetcinterfacenumber
    MODULE PROCEDURE cmfe_dataprojection_labelsetcobj
    MODULE PROCEDURE cmfe_dataprojection_labelsetvsregionnumber
    MODULE PROCEDURE cmfe_dataprojection_labelsetvsinterfacenumber
    MODULE PROCEDURE cmfe_dataprojection_labelsetvsobj
  END INTERFACE cmfe_dataprojection_labelset

  INTERFACE cmfe_dataprojection_resultdistanceget
    MODULE PROCEDURE cmfe_dataprojection_resultdistancegetnumber
    MODULE PROCEDURE cmfe_dataprojection_resultdistancegetobj
  END INTERFACE cmfe_dataprojection_resultdistanceget

  INTERFACE cmfe_dataprojection_resultelementnumberget
    MODULE PROCEDURE cmfe_dataprojection_resultelementnumbergetnumber
    MODULE PROCEDURE cmfe_dataprojection_resultelementnumbergetobj
  END INTERFACE cmfe_dataprojection_resultelementnumberget

  INTERFACE cmfe_dataprojection_resultelementfacenumberget
    MODULE PROCEDURE cmfe_dataprojection_resultelementfacenumbergetnumber
    MODULE PROCEDURE cmfe_dataprojection_resultelementfacenumbergetobj
  END INTERFACE cmfe_dataprojection_resultelementfacenumberget

  INTERFACE cmfe_dataprojection_resultelementlinenumberget
    MODULE PROCEDURE cmfe_dataprojection_resultelementlinenumbergetnumber
    MODULE PROCEDURE cmfe_dataprojection_resultelementlinenumbergetobj
  END INTERFACE cmfe_dataprojection_resultelementlinenumberget

  INTERFACE cmfe_dataprojection_resultexittagget
    MODULE PROCEDURE cmfe_dataprojection_resultexittaggetnumber
    MODULE PROCEDURE cmfe_dataprojection_resultexittaggetobj
  END INTERFACE cmfe_dataprojection_resultexittagget

  INTERFACE cmfe_dataprojection_resultxiget
    MODULE PROCEDURE cmfe_dataprojection_resultxigetnumber
    MODULE PROCEDURE cmfe_dataprojection_resultxigetobj
  END INTERFACE cmfe_dataprojection_resultxiget

  INTERFACE cmfe_dataprojection_resultxiset
    MODULE PROCEDURE cmfe_dataprojection_resultxisetnumber
    MODULE PROCEDURE cmfe_dataprojection_resultxisetobj
  END INTERFACE cmfe_dataprojection_resultxiset

  INTERFACE cmfe_dataprojection_resultprojectionvectorget
    MODULE PROCEDURE cmfe_dataprojection_resultprojectionvectorgetnumber
    MODULE PROCEDURE cmfe_dataprojection_resultprojectionvectorgetobj
  END INTERFACE cmfe_dataprojection_resultprojectionvectorget

  PUBLIC cmfe_data_projection_boundary_lines_projection_type,cmfe_data_projection_boundary_faces_projection_type

  PUBLIC cmfe_data_projection_all_elements_projection_type

  PUBLIC cmfe_dataprojection_absolutetoleranceget,cmfe_dataprojection_absolutetoleranceset

  PUBLIC cmfe_dataprojection_createfinish,cmfe_dataprojection_createstart

  PUBLIC cmfe_dataprojection_destroy
  
  PUBLIC cmfe_dataprojection_datapointspositionevaluate
  
  PUBLIC cmfe_dataprojection_projectioncandidatesset

  PUBLIC cmfe_dataprojection_datapointsprojectionevaluate

  PUBLIC cmfe_dataprojection_maximumiterationupdateget,cmfe_dataprojection_maximumiterationupdateset

  PUBLIC cmfe_dataprojection_maximumnumberofiterationsget,cmfe_dataprojection_maximumnumberofiterationsset

  PUBLIC cmfe_dataprojection_numberofclosestelementsget,cmfe_dataprojection_numberofclosestelementsset

  PUBLIC cmfe_dataprojection_projectiontypeget,cmfe_dataprojection_projectiontypeset

  PUBLIC cmfe_dataprojection_relativetoleranceget,cmfe_dataprojection_relativetoleranceset

  PUBLIC cmfe_dataprojection_startingxiget,cmfe_dataprojection_startingxiset

  PUBLIC cmfe_dataprojection_elementset

  PUBLIC cmfe_dataprojection_labelget,cmfe_dataprojection_labelset

  PUBLIC cmfe_dataprojection_resultdistanceget,cmfe_dataprojection_resultelementnumberget

  PUBLIC cmfe_dataprojection_resultelementfacenumberget,cmfe_dataprojection_resultelementlinenumberget

  PUBLIC cmfe_dataprojection_resultexittagget

  PUBLIC cmfe_dataprojection_resultxiget,cmfe_dataprojection_resultxiset

  PUBLIC cmfe_dataprojection_resultprojectionvectorget

!!==================================================================================================================================
!!
!! EQUATIONS_ROUTINES
!!
!!==================================================================================================================================

  !Module parameters

  INTEGER(INTG), PARAMETER :: cmfe_equations_no_output = equations_no_output
  INTEGER(INTG), PARAMETER :: cmfe_equations_timing_output = equations_timing_output 
  INTEGER(INTG), PARAMETER :: cmfe_equations_matrix_output = equations_matrix_output 
  INTEGER(INTG), PARAMETER :: cmfe_equations_element_matrix_output = equations_element_matrix_output 
  INTEGER(INTG), PARAMETER :: cmfe_equations_nodal_matrix_output = equations_nodal_matrix_output 
  INTEGER(INTG), PARAMETER :: cmfe_equations_sparse_matrices = equations_sparse_matrices 
  INTEGER(INTG), PARAMETER :: cmfe_equations_full_matrices = equations_full_matrices 
  INTEGER(INTG), PARAMETER :: cmfe_equations_unlumped_matrices = equations_unlumped_matrices 
  INTEGER(INTG), PARAMETER :: cmfe_equations_lumped_matrices = equations_lumped_matrices 
  INTEGER(INTG), PARAMETER :: cmfe_equations_linear = equations_linear 
  INTEGER(INTG), PARAMETER :: cmfe_equations_nonlinear = equations_nonlinear 
  INTEGER(INTG), PARAMETER :: cmfe_equations_nonlinear_bcs = equations_nonlinear_bcs 
  INTEGER(INTG), PARAMETER :: cmfe_equations_static = equations_static 
  INTEGER(INTG), PARAMETER :: cmfe_equations_quasistatic = equations_quasistatic 
  INTEGER(INTG), PARAMETER :: cmfe_equations_first_order_dynamic = equations_first_order_dynamic 
  INTEGER(INTG), PARAMETER :: cmfe_equations_second_order_dynamic = equations_second_order_dynamic 
  INTEGER(INTG), PARAMETER :: cmfe_equations_time_stepping = equations_time_stepping 
  INTEGER(INTG), PARAMETER :: cmfe_equations_jacobian_finite_difference_calculated = equations_jacobian_finite_difference_calculated
  INTEGER(INTG), PARAMETER :: cmfe_equations_jacobian_analytic_calculated = equations_jacobian_analytic_calculated 

  !Module types

  !Module variables

  !Interfaces

  INTERFACE cmfe_equations_destroy
    MODULE PROCEDURE cmfe_equations_destroynumber
    MODULE PROCEDURE cmfe_equations_destroyobj
  END INTERFACE cmfe_equations_destroy

  INTERFACE cmfe_equations_linearitytypeget
    MODULE PROCEDURE cmfe_equations_linearitytypegetnumber
    MODULE PROCEDURE cmfe_equations_linearitytypegetobj
  END INTERFACE cmfe_equations_linearitytypeget

  INTERFACE cmfe_equations_lumpingtypeget
    MODULE PROCEDURE cmfe_equations_lumpingtypegetnumber
    MODULE PROCEDURE cmfe_equations_lumpingtypegetobj
  END INTERFACE cmfe_equations_lumpingtypeget

  INTERFACE cmfe_equations_lumpingtypeset
    MODULE PROCEDURE cmfe_equations_lumpingtypesetnumber
    MODULE PROCEDURE cmfe_equations_lumpingtypesetobj
  END INTERFACE cmfe_equations_lumpingtypeset

  INTERFACE cmfe_equations_outputtypeget
    MODULE PROCEDURE cmfe_equations_outputtypegetnumber
    MODULE PROCEDURE cmfe_equations_outputtypegetobj
  END INTERFACE cmfe_equations_outputtypeget

  INTERFACE cmfe_equations_outputtypeset
    MODULE PROCEDURE cmfe_equations_outputtypesetnumber
    MODULE PROCEDURE cmfe_equations_outputtypesetobj
  END INTERFACE cmfe_equations_outputtypeset

  INTERFACE cmfe_equations_sparsitytypeget
    MODULE PROCEDURE cmfe_equations_sparsitytypegetnumber
    MODULE PROCEDURE cmfe_equations_sparsitytypegetobj
  END INTERFACE cmfe_equations_sparsitytypeget

  INTERFACE cmfe_equations_sparsitytypeset
    MODULE PROCEDURE cmfe_equations_sparsitytypesetnumber
    MODULE PROCEDURE cmfe_equations_sparsitytypesetobj
  END INTERFACE cmfe_equations_sparsitytypeset

  INTERFACE cmfe_equations_timedependencetypeget
    MODULE PROCEDURE cmfe_equations_timedependencetypegetnumber
    MODULE PROCEDURE cmfe_equations_timedependencetypegetobj
  END INTERFACE cmfe_equations_timedependencetypeget

  PUBLIC cmfe_equations_no_output,cmfe_equations_timing_output,cmfe_equations_matrix_output

  PUBLIC cmfe_equations_element_matrix_output,cmfe_equations_nodal_matrix_output

  PUBLIC cmfe_equations_sparse_matrices,cmfe_equations_full_matrices

  PUBLIC cmfe_equations_jacobian_finite_difference_calculated, cmfe_equations_jacobian_analytic_calculated

  PUBLIC cmfe_equations_unlumped_matrices,cmfe_equations_lumped_matrices

  PUBLIC cmfe_equations_linear,cmfe_equations_nonlinear,cmfe_equations_nonlinear_bcs

  PUBLIC cmfe_equations_static,cmfe_equations_quasistatic,cmfe_equations_first_order_dynamic, &
    & cmfe_equations_second_order_dynamic, &
    & cmfe_equations_time_stepping

  PUBLIC cmfe_equations_destroy

  PUBLIC cmfe_equations_linearitytypeget

  PUBLIC cmfe_equations_lumpingtypeget,cmfe_equations_lumpingtypeset

  PUBLIC cmfe_equations_outputtypeget,cmfe_equations_outputtypeset

  PUBLIC cmfe_equations_sparsitytypeget,cmfe_equations_sparsitytypeset

  PUBLIC cmfe_equations_timedependencetypeget

  PUBLIC cmfe_equations_jacobianmatricestypesset

  PUBLIC cmfe_equations_numberoflinearmatricesget

  PUBLIC cmfe_equations_numberofjacobianmatricesget

  PUBLIC cmfe_equations_numberofdynamicmatricesget

  PUBLIC cmfe_equations_linearmatrixget
  
  PUBLIC cmfe_equations_jacobianmatrixget

  PUBLIC cmfe_equations_dynamicmatrixget

  PUBLIC cmfe_equations_dynamicmatrixgetbytype

  PUBLIC cmfe_equations_dynamicmatrixtypeget

  PUBLIC cmfe_equations_rhsvectorget

  PUBLIC cmfe_equations_residualvectorget

  PUBLIC cmfe_equations_residualnumberofvariablesget

  PUBLIC cmfe_equations_residualvariablesget

  PUBLIC cmfe_equations_sourcevectorget

!!==================================================================================================================================
!!
!! EQUATIONS_SET_CONSTANTS
!!
!!==================================================================================================================================

  !Module parameters

  INTEGER(INTG), PARAMETER :: cmfe_equations_set_no_class = equations_set_no_class 
  INTEGER(INTG), PARAMETER :: cmfe_equations_set_elasticity_class = equations_set_elasticity_class 
  INTEGER(INTG), PARAMETER :: cmfe_equations_set_fluid_mechanics_class = equations_set_fluid_mechanics_class 
  INTEGER(INTG), PARAMETER :: cmfe_equations_set_electromagnetics_class = equations_set_electromagnetics_class 
  INTEGER(INTG), PARAMETER :: cmfe_equations_set_classical_field_class = equations_set_classical_field_class 
  INTEGER(INTG), PARAMETER :: cmfe_equations_set_bioelectrics_class = equations_set_bioelectrics_class 
  INTEGER(INTG), PARAMETER :: cmfe_equations_set_modal_class = equations_set_modal_class 
  INTEGER(INTG), PARAMETER :: cmfe_equations_set_fitting_class = equations_set_fitting_class 
  INTEGER(INTG), PARAMETER :: cmfe_equations_set_optimisation_class = equations_set_optimisation_class 
  INTEGER(INTG), PARAMETER :: cmfe_equations_set_multi_physics_class = equations_set_multi_physics_class 
  INTEGER(INTG), PARAMETER :: cmfe_equations_set_no_type = equations_set_no_type 
  INTEGER(INTG), PARAMETER :: cmfe_equations_set_linear_elasticity_type = equations_set_linear_elasticity_type 
  INTEGER(INTG), PARAMETER :: cmfe_equations_set_finite_elasticity_type = equations_set_finite_elasticity_type 
  INTEGER(INTG), PARAMETER :: cmfe_equations_set_stokes_equation_type = equations_set_stokes_equation_type 
  INTEGER(INTG), PARAMETER :: cmfe_equations_set_navier_stokes_equation_type = equations_set_navier_stokes_equation_type 
  INTEGER(INTG), PARAMETER :: cmfe_equations_set_darcy_equation_type = equations_set_darcy_equation_type 
  INTEGER(INTG), PARAMETER :: cmfe_equations_set_darcy_pressure_equation_type = equations_set_darcy_pressure_equation_type 
  INTEGER(INTG), PARAMETER :: cmfe_equations_set_poiseuille_equation_type = equations_set_poiseuille_equation_type 
  INTEGER(INTG), PARAMETER :: cmfe_equations_set_burgers_equation_type = equations_set_burgers_equation_type 
  INTEGER(INTG), PARAMETER :: cmfe_equations_set_characteristic_equation_type = equations_set_characteristic_equation_type 
  INTEGER(INTG), PARAMETER :: cmfe_equations_set_electrostatic_type = equations_set_electrostatic_type 
  INTEGER(INTG), PARAMETER :: cmfe_equations_set_magnetostatic_type = equations_set_magnetostatic_type 
  INTEGER(INTG), PARAMETER :: cmfe_equations_set_maxwells_equations_type = equations_set_maxwells_equations_type 
  INTEGER(INTG), PARAMETER :: cmfe_equations_set_laplace_equation_type = equations_set_laplace_equation_type 
  INTEGER(INTG), PARAMETER :: cmfe_equations_set_poisson_equation_type = equations_set_poisson_equation_type 
  INTEGER(INTG), PARAMETER :: cmfe_equations_set_helmholtz_equation_type = equations_set_helmholtz_equation_type 
  INTEGER(INTG), PARAMETER :: cmfe_equations_set_wave_equation_type = equations_set_wave_equation_type 
  INTEGER(INTG), PARAMETER :: cmfe_equations_set_diffusion_equation_type = equations_set_diffusion_equation_type 
  INTEGER(INTG), PARAMETER :: cmfe_equations_set_advection_equation_type = equations_set_advection_equation_type 
  INTEGER(INTG), PARAMETER :: cmfe_equations_set_advection_diffusion_equation_type = &
    & EQUATIONS_SET_ADVECTION_DIFFUSION_EQUATION_TYPE !<Advection-Diffusion equation equations set type \see OPENCMISS_EquationsSetTypes,OPENCMISS
  integer(intg), PARAMETER :: cmfe_equations_set_reaction_diffusion_equation_type = equations_set_reaction_diffusion_equation_type 
  INTEGER(INTG), PARAMETER :: cmfe_equations_set_biharmonic_equation_type = equations_set_biharmonic_equation_type 
  INTEGER(INTG), PARAMETER :: cmfe_equations_set_monodomain_equation_type = equations_set_monodomain_equation_type 
  INTEGER(INTG), PARAMETER :: cmfe_equations_set_bidomain_equation_type = equations_set_bidomain_equation_type 
  INTEGER(INTG), PARAMETER :: cmfe_equations_set_linear_elastic_modal_type = equations_set_linear_elastic_modal_type 
  INTEGER(INTG), PARAMETER :: cmfe_equations_set_data_fitting_equation_type = equations_set_data_fitting_equation_type 
  INTEGER(INTG), PARAMETER :: cmfe_equations_set_finite_elasticity_darcy_type = equations_set_finite_elasticity_darcy_type 
  INTEGER(INTG), PARAMETER :: cmfe_equations_set_finite_elasticity_stokes_type = equations_set_finite_elasticity_stokes_type 
  INTEGER(INTG), PARAMETER :: cmfe_equations_set_finite_elasticity_navier_stokes_type = &
    & EQUATIONS_SET_FINITE_ELASTICITY_NAVIER_STOKES_TYPE !<Finite Elasticity Navier Stokes equations set type \see OPENCMISS_EquationsSetTypes,OPENCMISS
  integer(intg), PARAMETER :: cmfe_equations_set_diffusion_diffusion_type = equations_set_diffusion_diffusion_type 
  INTEGER(INTG), PARAMETER :: cmfe_equations_set_diffusion_advection_diffusion_type = &
    & EQUATIONS_SET_DIFFUSION_ADVECTION_DIFFUSION_TYPE !<Diffusion Advection Diffusion equations set type \see OPENCMISS_EquationsSetTypes,OPENCMISS
  integer(intg), PARAMETER :: cmfe_equations_set_monodomain_strang_splitting_equation_type = &
    & equations_set_monodomain_strang_splitting_equation_type 

  INTEGER(INTG), PARAMETER :: cmfe_equations_set_no_subtype = equations_set_no_subtype 
  INTEGER(INTG), PARAMETER :: cmfe_equations_set_three_dimensional_subtype = equations_set_three_dimensional_subtype 
  INTEGER(INTG), PARAMETER :: cmfe_equations_set_two_dimensional_plane_stress_subtype = &
    & EQUATIONS_SET_TWO_DIMENSIONAL_PLANE_STRESS_SUBTYPE !<Plane stress linear elasticity equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  integer(intg), PARAMETER :: cmfe_equations_set_two_dimensional_plane_strain_subtype = &
    & equations_set_two_dimensional_plane_strain_subtype 
  INTEGER(INTG), PARAMETER :: cmfe_equations_set_one_dimensional_subtype = equations_set_one_dimensional_subtype 
  INTEGER(INTG), PARAMETER :: cmfe_equations_set_plate_subtype = equations_set_plate_subtype 
  INTEGER(INTG), PARAMETER :: cmfe_equations_set_shell_subtype = equations_set_shell_subtype 
  INTEGER(INTG), PARAMETER :: cmfe_equations_set_mooney_rivlin_subtype = equations_set_mooney_rivlin_subtype 
  INTEGER(INTG), PARAMETER :: cmfe_equations_set_incompressible_mooney_rivlin_subtype = &
  & EQUATIONS_SET_INCOMPRESSIBLE_MOONEY_RIVLIN_SUBTYPE !< Incompressible Mooney-Rivlin constitutive law for finite elasticity equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  integer(intg), PARAMETER :: cmfe_equations_set_nearly_incompressible_mooney_rivlin_subtype = &
  & equations_set_nearly_incompressible_mooney_rivlin_subtype 
  INTEGER(INTG), PARAMETER :: cmfe_equations_set_mooney_rivlin_activecontraction_subtype = & 
    & EQUATIONS_SET_MOONEY_RIVLIN_ACTIVECONTRACTION_SUBTYPE !< Mooney-Rivlin constitutive law with steady-state active contraction for finite elasticity equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  integer(intg), PARAMETER :: cmfe_equations_set_stvenant_kirchoff_activecontraction_subtype = & 
    & equations_set_stvenant_kirchoff_activecontraction_subtype 
  INTEGER(INTG), PARAMETER :: cmfe_equations_set_activecontraction_subtype =&
    & EQUATIONS_SET_ACTIVECONTRACTION_SUBTYPE !< Active contraction/costa-based law with quasistatic time loop for finite elasticity equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  integer(intg), PARAMETER :: cmfe_equations_set_isotropic_exponential_subtype = equations_set_isotropic_exponential_subtype 
  INTEGER(INTG), PARAMETER :: cmfe_equations_set_transverse_isotropic_exponential_subtype = &
    & EQUATIONS_SET_TRANSVERSE_ISOTROPIC_EXPONENTIAL_SUBTYPE !< Transverse isotropic exponential constitutive law for finite elasticity equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  integer(intg), PARAMETER :: cmfe_equations_set_transverse_isotropic_active_subtype = &
    & equations_set_transverse_isotropic_active_subtype 
  INTEGER(INTG), PARAMETER :: cmfe_equations_set_trans_isotropic_active_transition_subtype = &
    & EQUATIONS_SET_TRANS_ISOTROPIC_ACTIVE_TRANSITION_SUBTYPE !< Transverse isotropic, active-contraction material-transition constitutive law for finite elasticity equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  integer(intg), PARAMETER :: cmfe_equations_set_orthotropic_material_costa_subtype = &
    & equations_set_orthotropic_material_costa_subtype 
  INTEGER(INTG), PARAMETER :: cmfe_equations_set_compressible_finite_elasticity_subtype= &
    & EQUATIONS_SET_COMPRESSIBLE_FINITE_ELASTICITY_SUBTYPE !<Compressible version for finite elasticity equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  integer(intg), PARAMETER :: cmfe_equations_set_compressible_activecontraction_subtype= &
    & equations_set_compressible_activecontraction_subtype 
  INTEGER(INTG), PARAMETER :: cmfe_equations_set_transverse_isotropic_guccione_subtype = &
    & EQUATIONS_SET_TRANSVERSE_ISOTROPIC_GUCCIONE_SUBTYPE !< Transverse isotropic Guccione constitutive law for finite elasticity equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  integer(intg), PARAMETER :: cmfe_equations_set_active_strain_subtype = &
    & equations_set_active_strain_subtype 
  INTEGER(INTG), PARAMETER :: cmfe_equations_set_multiscale_active_strain_subtype = &
    & EQUATIONS_SET_MULTISCALE_ACTIVE_STRAIN_SUBTYPE !< Isotropic active strain constitutive law based on multiplicative decomposition of the deformation gradient and the cellular model of Razumova et al. (2000) subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  integer(intg), PARAMETER :: cmfe_equations_set_reference_state_mooney_rivlin_subtype = &
    & equations_set_reference_state_mooney_rivlin_subtype 
  INTEGER(INTG), PARAMETER :: cmfe_equations_set_guccione_activecontraction_subtype = &
    & EQUATIONS_SET_GUCCIONE_ACTIVECONTRACTION_SUBTYPE !< Transverse isotropic Guccione constitutive law with active contraction subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  integer(intg), PARAMETER :: cmfe_equations_set_incompress_finite_elasticity_darcy_subtype= &
    & equations_set_incompressible_finite_elasticity_darcy_subtype 
  INTEGER(INTG), PARAMETER :: cmfe_equations_set_elasticity_darcy_inria_model_subtype= &
    & EQUATIONS_SET_ELASTICITY_DARCY_INRIA_MODEL_SUBTYPE !<INRIA Model for finite elasticity coupled with Darcy equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  integer(intg), PARAMETER :: cmfe_equations_set_elasticity_multi_comp_darcy_inria_subtype= &
    & equations_set_elasticity_multi_compartment_darcy_inria_subtype 
  INTEGER(INTG), PARAMETER :: cmfe_equations_set_incompress_elasticity_driven_darcy_subtype= &
    & EQUATIONS_SET_INCOMPRESSIBLE_ELASTICITY_DRIVEN_DARCY_SUBTYPE !< Incompressible finite elasticity with Darcy flow driven by solid hydrostatic pressure \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  integer(intg), PARAMETER :: cmfe_equations_set_incompressible_elasticity_driven_mr_subtype= &
    & equations_set_incompressible_elasticity_driven_mr_subtype 
  INTEGER(INTG), PARAMETER :: cmfe_equations_set_incompress_elast_multi_comp_darcy_subtype= &
    & EQUATIONS_SET_INCOMPRESSIBLE_ELAST_MULTI_COMP_DARCY_SUBTYPE
  integer(intg), PARAMETER :: cmfe_equations_set_membrane_subtype = equations_set_membrane_subtype 
  INTEGER(INTG), PARAMETER :: cmfe_equations_set_orthotropic_holzapfel_ogden_subtype = &
    & EQUATIONS_SET_ORTHOTROPIC_MATERIAL_HOLZAPFEL_OGDEN_SUBTYPE !< Orthotropic Holzapfel-Ogden constitutive law for finite elasticity equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  integer(intg), PARAMETER :: cmfe_equations_set_holzapfel_ogden_activecontraction_subtype = &
    & equations_set_holzapfel_ogden_activecontraction_subtype &
    & 
  INTEGER(INTG), PARAMETER :: cmfe_equations_set_elasticity_fluid_pres_static_inria_subtype = &
    & EQUATIONS_SET_ELASTICITY_FLUID_PRESSURE_STATIC_INRIA_SUBTYPE !< Static finite elasticity coupled with fluid pressure set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  integer(intg), PARAMETER :: cmfe_equations_set_elasticity_fluid_pres_holmes_mow_subtype= &
    & equations_set_elasticity_fluid_pressure_holmes_mow_subtype 
  INTEGER(INTG), PARAMETER :: cmfe_equations_set_elasti_fluid_pres_holmes_mow_active_subtype= &
    & EQUATIONS_SET_ELASTICITY_FLUID_PRES_HOLMES_MOW_ACTIVE_SUBTYPE !<Holmes and Mow's poroelastic constitutive relation subtype with active contraction \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_TRANSVERSE_ISOTROPIC_POLYNOMIAL_SUBTYPE = &
    & EQUATIONS_SET_TRANSVERSE_ISOTROPIC_POLYNOMIAL_SUBTYPE !<Transverse isotropic constitutive law for finite elasticity equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_ANISOTROPIC_POLYNOMIAL_SUBTYPE = &
    & EQUATIONS_SET_ANISOTROPIC_POLYNOMIAL_SUBTYPE !<Anisotropic polynomial constitutive law for finite elasticity equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_ANISOTROPIC_POLYNOMIAL_ACTIVE_SUBTYPE = &
    & EQUATIONS_SET_ANISOTROPIC_POLYNOMIAL_ACTIVE_SUBTYPE !<Anisotropic polynomial active constitutive law for finite elasticity equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_TRANSVERSE_ISOTROPIC_HUMPHREY_YIN_SUBTYPE= &
    & EQUATIONS_SET_TRANSVERSE_ISOTROPIC_HUMPHREY_YIN_SUBTYPE !<Humphrey and Yin transversely isotropic constitutive relation subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_STATIC_STOKES_SUBTYPE = EQUATIONS_SET_STATIC_STOKES_SUBTYPE !<Static Stokes equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_LAPLACE_STOKES_SUBTYPE = EQUATIONS_SET_LAPLACE_STOKES_SUBTYPE !<Laplace type Stokes equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_TRANSIENT_STOKES_SUBTYPE = EQUATIONS_SET_TRANSIENT_STOKES_SUBTYPE !<Transient Stokes equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_ALE_STOKES_SUBTYPE = EQUATIONS_SET_ALE_STOKES_SUBTYPE !<ALE Stokes equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_PGM_STOKES_SUBTYPE = EQUATIONS_SET_PGM_STOKES_SUBTYPE !<PGM Stokes equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_OPTIMISED_STOKES_SUBTYPE = EQUATIONS_SET_OPTIMISED_STOKES_SUBTYPE !<Optimised Stokes equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_STATIC_NAVIER_STOKES_SUBTYPE = EQUATIONS_SET_STATIC_NAVIER_STOKES_SUBTYPE !<Static Navier-Stokes equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_LAPLACE_NAVIER_STOKES_SUBTYPE = EQUATIONS_SET_LAPLACE_NAVIER_STOKES_SUBTYPE !<Laplace type Navier-Stokes equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_TRANSIENT_NAVIER_STOKES_SUBTYPE = EQUATIONS_SET_TRANSIENT_NAVIER_STOKES_SUBTYPE !<Transient Navier-Stokes equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_TRANSIENT_RBS_NAVIER_STOKES_SUBTYPE = & 
    & EQUATIONS_SET_TRANSIENT_RBS_NAVIER_STOKES_SUBTYPE !<Transient residual-based stabilisation Navier-Stokes equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_STATIC_RBS_NAVIER_STOKES_SUBTYPE =  &
    & EQUATIONS_SET_STATIC_RBS_NAVIER_STOKES_SUBTYPE !<Transient residual-based stabilisation Navier-Stokes equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_MULTISCALE3D_NAVIER_STOKES_SUBTYPE = & 
    & EQUATIONS_SET_MULTISCALE3D_NAVIER_STOKES_SUBTYPE !<Transient stabilised 3D Navier-Stokes equations set with coupled multiscale boundaries subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_CONSTITUTIVE_MU_NAVIER_STOKES_SUBTYPE = & 
    & EQUATIONS_SET_CONSTITUTIVE_MU_NAVIER_STOKES_SUBTYPE !<Transient stabilised 3D Navier-Stokes equations set with coupled constitutive model for non-Newtonian viscosity \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_TRANSIENT1D_NAVIER_STOKES_SUBTYPE = &
    & EQUATIONS_SET_TRANSIENT1D_NAVIER_STOKES_SUBTYPE !<TRANSIENT1D Navier-Stokes equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_TRANSIENT1D_ADV_NAVIER_STOKES_SUBTYPE = &
    & EQUATIONS_SET_TRANSIENT1D_ADV_NAVIER_STOKES_SUBTYPE !<TRANSIENT1D Navier-Stokes equations set subtype with coupled Advection \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_CHARACTERISTIC_SUBTYPE = &
    & EQUATIONS_SET_CHARACTERISTIC_SUBTYPE !<Static Characteristics equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_COUPLED1D0D_NAVIER_STOKES_SUBTYPE = &
    & EQUATIONS_SET_COUPLED1D0D_NAVIER_STOKES_SUBTYPE !<Coupled 1D-0D Navier-Stokes equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_COUPLED1D0D_ADV_NAVIER_STOKES_SUBTYPE = &
    & EQUATIONS_SET_COUPLED1D0D_ADV_NAVIER_STOKES_SUBTYPE !<Coupled 1D-0D Navier-Stokes equations set subtype with coupled Advection \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_STREE1D0D_SUBTYPE = &
    & EQUATIONS_SET_STREE1D0D_SUBTYPE !<Coupled 1D-0D Navier-Stokes equations set subtype with coupled Advection \see
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_STREE1D0D_ADV_SUBTYPE = &
    & EQUATIONS_SET_STREE1D0D_ADV_SUBTYPE !<Coupled 1D-0D Navier-Stokes equations set subtype with coupled Advection \see
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_ALE_NAVIER_STOKES_SUBTYPE = EQUATIONS_SET_ALE_NAVIER_STOKES_SUBTYPE !<ALE Navier-Stokes equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_PGM_NAVIER_STOKES_SUBTYPE = EQUATIONS_SET_PGM_NAVIER_STOKES_SUBTYPE !<PGM Navier-Stokes equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_OPTIMISED_NAVIER_STOKES_SUBTYPE = EQUATIONS_SET_OPTIMISED_NAVIER_STOKES_SUBTYPE !<Optimised Navier-Stokes equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_STANDARD_DARCY_SUBTYPE = EQUATIONS_SET_STANDARD_DARCY_SUBTYPE !<Standard Darcy equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_QUASISTATIC_DARCY_SUBTYPE = EQUATIONS_SET_QUASISTATIC_DARCY_SUBTYPE !<Quasistatic Darcy equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_ALE_DARCY_SUBTYPE = EQUATIONS_SET_ALE_DARCY_SUBTYPE !<ALE Darcy equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_TRANSIENT_DARCY_SUBTYPE = EQUATIONS_SET_TRANSIENT_DARCY_SUBTYPE !<Transient Darcy equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_TRANSIENT_ALE_DARCY_SUBTYPE = EQUATIONS_SET_TRANSIENT_ALE_DARCY_SUBTYPE !<Transient ALE Darcy equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_MULTI_COMPARTMENT_DARCY_SUBTYPE = EQUATIONS_SET_MULTI_COMPARTMENT_DARCY_SUBTYPE !<Multi Compartment Darcy equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_BURGERS_SUBTYPE = EQUATIONS_SET_BURGERS_SUBTYPE !<Burgers equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_GENERALISED_BURGERS_SUBTYPE = EQUATIONS_SET_GENERALISED_BURGERS_SUBTYPE !<Generalised Burgers equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_STATIC_BURGERS_SUBTYPE = EQUATIONS_SET_STATIC_BURGERS_SUBTYPE !<Static Burgers equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_INVISCID_BURGERS_SUBTYPE = EQUATIONS_SET_INVISCID_BURGERS_SUBTYPE !<Inviscid Burgers equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS

  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_STANDARD_LAPLACE_SUBTYPE = EQUATIONS_SET_STANDARD_LAPLACE_SUBTYPE !<Standard Laplace equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_GENERALISED_LAPLACE_SUBTYPE = EQUATIONS_SET_GENERALISED_LAPLACE_SUBTYPE !<Generalised Laplace equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_MOVING_MESH_LAPLACE_SUBTYPE = EQUATIONS_SET_MOVING_MESH_LAPLACE_SUBTYPE !<Moving mesh Laplace equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_STATIC_POISEUILLE_SUBTYPE = EQUATIONS_SET_STATIC_POISEUILLE_SUBTYPE !<Static Poiseuille equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_DYNAMIC_POISEUILLE_SUBTYPE = EQUATIONS_SET_DYNAMIC_POISEUILLE_SUBTYPE !<Dynamic Poiseuille equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_LINEAR_PRESSURE_POISSON_SUBTYPE = EQUATIONS_SET_LINEAR_PRESSURE_POISSON_SUBTYPE !<Vector source Poisson equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_NONLINEAR_PRESSURE_POISSON_SUBTYPE = &
    & EQUATIONS_SET_NONLINEAR_PRESSURE_POISSON_SUBTYPE !<Vector source Poisson equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_ALE_PRESSURE_POISSON_SUBTYPE = EQUATIONS_SET_ALE_PRESSURE_POISSON_SUBTYPE !<Vector source Poisson equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_FITTED_PRESSURE_POISSON_SUBTYPE = EQUATIONS_SET_FITTED_PRESSURE_POISSON_SUBTYPE !<Vector source Poisson equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_CONSTANT_SOURCE_POISSON_SUBTYPE = EQUATIONS_SET_CONSTANT_SOURCE_POISSON_SUBTYPE !<Constant source Poisson equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_EXTRACELLULAR_BIDOMAIN_POISSON_SUBTYPE = &
    & EQUATIONS_SET_EXTRACELLULAR_BIDOMAIN_POISSON_SUBTYPE !<Poisson equations set subtype, that is the extracellular bidomain equation \see OPENCMISS_EquationsSetSubtypes,OPENCMISS  
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_LINEAR_SOURCE_POISSON_SUBTYPE = EQUATIONS_SET_LINEAR_SOURCE_POISSON_SUBTYPE !<Linear source Poisson equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_QUADRATIC_SOURCE_POISSON_SUBTYPE = EQUATIONS_SET_QUADRATIC_SOURCE_POISSON_SUBTYPE !<Quadratic source Poisson equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_EXPONENTIAL_SOURCE_POISSON_SUBTYPE = &
    & EQUATIONS_SET_EXPONENTIAL_SOURCE_POISSON_SUBTYPE !<Exponential source Poisson equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_STANDARD_HELMHOLTZ_SUBTYPE = EQUATIONS_SET_STANDARD_HELMHOLTZ_SUBTYPE !<No source Helmholtz equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_GENERALISED_HELMHOLTZ_SUBTYPE = EQUATIONS_SET_GENERALISED_HELMHOLTZ_SUBTYPE !<No source Helmholtz equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_NO_SOURCE_DIFFUSION_SUBTYPE = EQUATIONS_SET_NO_SOURCE_DIFFUSION_SUBTYPE !<No source diffusion equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_CONSTANT_SOURCE_DIFFUSION_SUBTYPE = &
    & EQUATIONS_SET_CONSTANT_SOURCE_DIFFUSION_SUBTYPE !<Constant source diffusion equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_LINEAR_SOURCE_DIFFUSION_SUBTYPE = EQUATIONS_SET_LINEAR_SOURCE_DIFFUSION_SUBTYPE !<Linear source diffusion equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_QUADRATIC_SOURCE_DIFFUSION_SUBTYPE = &
    & EQUATIONS_SET_QUADRATIC_SOURCE_DIFFUSION_SUBTYPE !<Quadratic source diffusion equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_EXPONENTIAL_SOURCE_DIFFUSION_SUBTYPE = &
    & EQUATIONS_SET_EXPONENTIAL_SOURCE_DIFFUSION_SUBTYPE !<Exponential source diffusion equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_NO_SOURCE_ALE_DIFFUSION_SUBTYPE = EQUATIONS_SET_NO_SOURCE_ALE_DIFFUSION_SUBTYPE !<No source diffusion equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_CONSTANT_SOURCE_ALE_DIFFUSION_SUBTYPE = &
    & EQUATIONS_SET_CONSTANT_SOURCE_ALE_DIFFUSION_SUBTYPE !<Constant source diffusion equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_LINEAR_SOURCE_ALE_DIFFUSION_SUBTYPE = &
    & EQUATIONS_SET_LINEAR_SOURCE_ALE_DIFFUSION_SUBTYPE !<Linear source diffusion equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_QUADRATIC_SOURCE_ALE_DIFFUSION_SUBTYPE = &
    & EQUATIONS_SET_QUADRATIC_SOURCE_ALE_DIFFUSION_SUBTYPE !<Quadratic source diffusion equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_EXPONENTIAL_SOURCE_ALE_DIFFUSION_SUBTYPE = &
    & EQUATIONS_SET_EXPONENTIAL_SOURCE_ALE_DIFFUSION_SUBTYPE !<Exponential source diffusion equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_MULTI_COMP_TRANSPORT_DIFFUSION_SUBTYPE = &
    & EQUATIONS_SET_MULTI_COMP_TRANSPORT_DIFFUSION_SUBTYPE !<Multi-compartment transport diffusion equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS

  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_ADVECTION_SUBTYPE = &
    & EQUATIONS_SET_ADVECTION_SUBTYPE !<advection equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_NO_SOURCE_ADVECTION_DIFFUSION_SUBTYPE = &
    & EQUATIONS_SET_NO_SOURCE_ADVECTION_DIFFUSION_SUBTYPE !<No source advection diffusion equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_CONSTANT_SOURCE_ADVECTION_DIFFUSION_SUBTYPE = &
    & EQUATIONS_SET_CONSTANT_SOURCE_ADVECTION_DIFFUSION_SUBTYPE !<Constant source advection diffusion equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_LINEAR_SOURCE_ADVECTION_DIFFUSION_SUBTYPE = &
    & EQUATIONS_SET_LINEAR_SOURCE_ADVECTION_DIFFUSION_SUBTYPE !<Linear source advection diffusion equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_QUADRATIC_SOURCE_ADVEC_DIFF_SUBTYPE = &
    & EQUATIONS_SET_QUADRATIC_SOURCE_ADVECTION_DIFFUSION_SUBTYPE !<Quadratic source advection diffusion equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_EXPONENTIAL_SOURCE_ADVEC_DIFF_SUBTYPE = &
    & EQUATIONS_SET_EXPONENTIAL_SOURCE_ADVECTION_DIFFUSION_SUBTYPE !<Exponential source advection diffusion equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_CONSTITUTIVE_LAW_IN_CELLML_EVALUATE_SUBTYPE = &
    & EQUATIONS_SET_CONSTITUTIVE_LAW_IN_CELLML_EVALUATE_SUBTYPE !<In CellML evaluated incompressible material law for finite elasticity equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_CONSTIT_AND_GROWTH_LAW_IN_CELLML_SUBTYPE = &
    & EQUATIONS_SET_CONSTITUTIVE_AND_GROWTH_LAW_IN_CELLML_SUBTYPE !<CellML evaluated growth and constituative material law for finite elasticity equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_NO_SOURCE_ALE_ADVECTION_DIFFUSION_SUBTYPE = &
    & EQUATIONS_SET_NO_SOURCE_ALE_ADVECTION_DIFFUSION_SUBTYPE !<No source advection diffusion equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_CONSTANT_SOURCE_ALE_ADVEC_DIFF_SUBTYPE = &
    & EQUATIONS_SET_CONSTANT_SOURCE_ALE_ADVECTION_DIFFUSION_SUBTYPE !<Constant source advection diffusion equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_LINEAR_SOURCE_ALE_ADVEC_DIFF_SUBTYPE = &
    & EQUATIONS_SET_LINEAR_SOURCE_ALE_ADVECTION_DIFFUSION_SUBTYPE !<Linear source advection diffusion equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_QUADRATIC_SOURCE_ALE_ADVEC_DIFF_SUBTYPE = &
    & EQUATIONS_SET_QUADRATIC_SOURCE_ALE_ADVECTION_DIFFUSION_SUBTYPE !<Quadratic source advection diffusion equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_EXP_SOURCE_ALE_ADVECTION_DIFFUSION_SUBTYPE = &
    & EQUATIONS_SET_EXP_SOURCE_ALE_ADVECTION_DIFFUSION_SUBTYPE !<Exponential source advection diffusion equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS

  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_NO_SOURCE_STATIC_ADVEC_DIFF_SUBTYPE = &
    & EQUATIONS_SET_NO_SOURCE_STATIC_ADVEC_DIFF_SUBTYPE !<No source advection diffusion equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_CONSTANT_SOURCE_STATIC_ADVEC_DIFF_SUBTYPE = &
    & EQUATIONS_SET_CONSTANT_SOURCE_STATIC_ADVEC_DIFF_SUBTYPE !<Constant source advection diffusion equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_LINEAR_SOURCE_STATIC_ADVEC_DIFF_SUBTYPE = &
    & EQUATIONS_SET_LINEAR_SOURCE_STATIC_ADVEC_DIFF_SUBTYPE !<Linear source advection diffusion equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS

  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_NO_SOURCE_ADVECTION_DIFF_SUPG_SUBTYPE = &
    & EQUATIONS_SET_NO_SOURCE_ADVECTION_DIFF_SUPG_SUBTYPE !<No source advection diffusion equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_CONSTANT_SOURCE_ADVECTION_DIFF_SUPG_SUBTYPE = &
    & EQUATIONS_SET_CONSTANT_SOURCE_ADVECTION_DIFF_SUPG_SUBTYPE !<Constant source advection diffusion equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_LINEAR_SOURCE_ADVECTION_DIFF_SUPG_SUBTYPE = &
    & EQUATIONS_SET_LINEAR_SOURCE_ADVECTION_DIFF_SUPG_SUBTYPE !<Linear source advection diffusion equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_QUAD_SOURCE_ADVECTION_DIFF_SUPG_SUBTYPE = &
    & EQUATIONS_SET_QUAD_SOURCE_ADVECTION_DIFF_SUPG_SUBTYPE !<Quadratic source advection diffusion equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_EXP_SOURCE_ADVECTION_DIFF_SUPG_SUBTYPE = &
    & EQUATIONS_SET_EXP_SOURCE_ADVECTION_DIFF_SUPG_SUBTYPE !<Exponential source advection diffusion equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS

  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_NO_SOURCE_ALE_ADVECTION_DIFF_SUPG_SUBTYPE = &
    & EQUATIONS_SET_NO_SOURCE_ALE_ADVECTION_DIFF_SUPG_SUBTYPE !<No source advection diffusion equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_CONSTANT_SOURCE_ALE_ADVEC_DIFF_SUPG_SUBTYPE = &
    & EQUATIONS_SET_CONSTANT_SOURCE_ALE_ADVECTION_DIFF_SUPG_SUBTYPE !<Constant source advection diffusion equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_LINEAR_SOURCE_ALE_ADVEC_DIFF_SUPG_SUBTYPE = &
    & EQUATIONS_SET_LINEAR_SOURCE_ALE_ADVECTION_DIFF_SUPG_SUBTYPE !<Linear source advection diffusion equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_QUAD_SOURCE_ALE_ADVECTION_DIFF_SUPG_SUBTYPE = &
    & EQUATIONS_SET_QUAD_SOURCE_ALE_ADVECTION_DIFF_SUPG_SUBTYPE !<Quadratic source advection diffusion equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_EXP_SOURCE_ALE_ADVECTION_DIFF_SUPG_SUBTYPE = &
    & EQUATIONS_SET_EXP_SOURCE_ALE_ADVECTION_DIFF_SUPG_SUBTYPE !<Exponential source advection diffusion equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS

  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_NO_SOURCE_STATIC_ADVEC_DIFF_SUPG_SUBTYPE = &
    & EQUATIONS_SET_NO_SOURCE_STATIC_ADVEC_DIFF_SUPG_SUBTYPE !<No source advection diffusion equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_CONST_SOURCE_STATIC_ADVEC_DIFF_SUPG_SUBTYPE = &
    & EQUATIONS_SET_CONSTANT_SOURCE_STATIC_ADVEC_DIFF_SUPG_SUBTYPE !<Constant source advection diffusion equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_LIN_SOURCE_STATIC_ADVEC_DIFF_SUPG_SUBTYPE = &
    & EQUATIONS_SET_LINEAR_SOURCE_STATIC_ADVEC_DIFF_SUPG_SUBTYPE !<Linear source advection diffusion equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_COUPLED_SOURCE_DIFFUSION_ADVEC_DIFF_SUBTYPE = &
    & EQUATIONS_SET_COUPLED_SOURCE_DIFFUSION_ADVEC_DIFFUSION_SUBTYPE !<Coupled source diffusion & advection-diffusion equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_MULTI_COMP_TRANSPORT_ADVEC_DIFF_SUBTYPE = &
    & EQUATIONS_SET_MULTI_COMP_TRANSPORT_ADVEC_DIFF_SUBTYPE !<Multi-component transport advection-diffusion equations set \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_MULT_COMP_TRANSPORT_ADVEC_DIFF_SUPG_SUBTYPE = &
    & EQUATIONS_SET_MULTI_COMP_TRANSPORT_ADVEC_DIFF_SUPG_SUBTYPE !<Multi-component transport advection-diffusion equations set using SUPG scheme \see OPENCMISS_EquationsSetSubtypes,OPENCMISS

  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_CELLML_REAC_SPLIT_REAC_DIFF_SUBTYPE = &
    & EQUATIONS_SET_CELLML_REAC_SPLIT_REAC_DIFF_SUBTYPE !CellML Reaction Diffusion with order splitting \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_CELLML_REAC_NO_SPLIT_REAC_DIFF_SUBTYPE = &
    & EQUATIONS_SET_CELLML_REAC_NO_SPLIT_REAC_DIFF_SUBTYPE !CellML Reaction Diffusion without order splitting \see OPENCMISS_EquationsSetSubtypes,OPENCMISS

  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_CONSTANT_REAC_DIFF_SUBTYPE = &
    & EQUATIONS_SET_CONSTANT_REAC_DIFF_SUBTYPE !Standard Reaction Diffusion without order splitting, and constant source \see OPENCMISS_EquationsSetSubtypes,OPENCMISS


  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_MONODOMAIN_BUENOOROVIO_SUBTYPE= EQUATIONS_SET_MONODOMAIN_BUENOOROVIO_SUBTYPE !<First monodomain equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_MONODOMAIN_TENTUSSCHER06_SUBTYPE= EQUATIONS_SET_MONODOMAIN_TENTUSSCHER06_SUBTYPE !<First monodomain equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS

  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_FIRST_BIDOMAIN_SUBTYPE = EQUATIONS_SET_FIRST_BIDOMAIN_SUBTYPE !<First bidomain equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_SECOND_BIDOMAIN_SUBTYPE = EQUATIONS_SET_SECOND_BIDOMAIN_SUBTYPE !<Second bidomain equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_STANDARD_DATA_FITTING_SUBTYPE = &
    & EQUATIONS_SET_STANDARD_DATA_FITTING_SUBTYPE !<Standard Galerkin Projection equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_GENERALISED_DATA_FITTING_SUBTYPE = &
    & EQUATIONS_SET_GENERALISED_DATA_FITTING_SUBTYPE !<Generalised Galerkin Projection equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_MAT_PROPERTIES_DATA_FITTING_SUBTYPE = &
    & EQUATIONS_SET_MAT_PROPERTIES_DATA_FITTING_SUBTYPE !<Material Properties Galerkin Projection equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_MAT_PROP_INRIA_MODEL_DATA_FITTING_SUBTYPE = &
    & EQUATIONS_SET_MAT_PROPERTIES_INRIA_MODEL_DATA_FITTING_SUBTYPE !<Material Properties INRIA Model Galerkin Projection equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_VECTOR_DATA_FITTING_SUBTYPE = &
    & EQUATIONS_SET_VECTOR_DATA_FITTING_SUBTYPE !<Standard Galerkin Projection equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_DIVFREE_VECTOR_DATA_FITTING_SUBTYPE = &
    & EQUATIONS_SET_DIVFREE_VECTOR_DATA_FITTING_SUBTYPE !<Standard Galerkin Projection equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_DATA_POINT_VECTOR_STATIC_FITTING_SUBTYPE = &
    & EquationsSet_DataPointVectorStaticFittingSubtype !<Standard static Galerkin Projection using data points subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_DATA_PT_VECTOR_QUASISTATIC_FITTING_SUBTYPE = &
    & EquationsSet_DataPointVectorQuasistaticFittingSubtype !<Standard quasistatic Galerkin Projection using data points subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_VECTOR_DATA_PRE_FITTING_SUBTYPE = &
    & EQUATIONS_SET_VECTOR_DATA_PRE_FITTING_SUBTYPE !<Standard Galerkin Projection equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_DIVFREE_VECTOR_DATA_PRE_FITTING_SUBTYPE = &
    & EQUATIONS_SET_DIVFREE_VECTOR_DATA_PRE_FITTING_SUBTYPE !<Standard Galerkin Projection equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS


  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_STANDARD_ELASTICITY_DARCY_SUBTYPE = &
    & EQUATIONS_SET_STANDARD_ELASTICITY_DARCY_SUBTYPE !<Standard Elasticity Darcy equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_COUPLED_SOURCE_DIFFUSION_DIFFUSION_SUBTYPE = &
    & EQUATIONS_SET_COUPLED_SOURCE_DIFFUSION_DIFFUSION_SUBTYPE !<Coupled source diffusion-diffusion equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_STANDARD_MONODOMAIN_ELASTICITY_SUBTYPE =  &
    & EQUATIONS_SET_STANDARD_MONODOMAIN_ELASTICITY_SUBTYPE !<Standard Monodomain Elasticity equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_1D3D_MONODOMAIN_ELASTICITY_SUBTYPE =  &
    & EQUATIONS_SET_1D3D_MONODOMAIN_ELASTICITY_SUBTYPE !<Coupled 1D Monodomain 3D Elasticity equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_MONODOMAIN_ELASTICITY_W_TITIN_SUBTYPE =  &
    & EQUATIONS_SET_MONODOMAIN_ELASTICITY_W_TITIN_SUBTYPE !<Coupled 1D Monodomain 3D Elasticity equations set subtype with titin \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_MONODOMAIN_ELASTICITY_VELOCITY_SUBTYPE =  &
    & EQUATIONS_SET_MONODOMAIN_ELASTICITY_VELOCITY_SUBTYPE !<Coupled 1D Monodomain 3D Elasticity equations set subtype with force-velocity relation \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_1D3D_MONODOMAIN_ACTIVE_STRAIN_SUBTYPE =  &
    & EQUATIONS_SET_1D3D_MONODOMAIN_ACTIVE_STRAIN_SUBTYPE !<Coupled 1D Monodomain 3D Elasticity equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_FINITE_ELASTICITY_NAVIER_STOKES_ALE_SUBTYPE = &
    & EQUATIONS_SET_FINITE_ELASTICITY_NAVIER_STOKES_ALE_SUBTYPE !<Finite Elasticity Navier Stokes ALE equations set subtype \see OPENCMISS_EquationsSetSubtype,OPENCMISS

  !>@}
  !> \addtogroup OPENCMISS_EquationsSetSolutionMethods OPENCMISS::EquationsSet::SolutionMethods
  !> \brief The solution method parameters
  !> \see OPENCMISS::EquationsSet,OPENCMISS
  !>@{
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_FEM_SOLUTION_METHOD = EQUATIONS_SET_FEM_SOLUTION_METHOD !<Finite Element Method solution method. \see OPENCMISS_EquationsSetSolutionMethods,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_BEM_SOLUTION_METHOD = EQUATIONS_SET_BEM_SOLUTION_METHOD !<Boundary Element Method solution method. \see OPENCMISS_EquationsSetSolutionMethods,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_FD_SOLUTION_METHOD = EQUATIONS_SET_FD_SOLUTION_METHOD !<Finite Difference solution method. \see OPENCMISS_EquationsSetSolutionMethods,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_FV_SOLUTION_METHOD = EQUATIONS_SET_FV_SOLUTION_METHOD !<Finite Volume solution method. \see OPENCMISS_EquationsSetSolutionMethods,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_GFEM_SOLUTION_METHOD = EQUATIONS_SET_GFEM_SOLUTION_METHOD !<Grid-based Finite Element Method solution method. \see OPENCMISS_EquationsSetSolutionMethods,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_GFD_SOLUTION_METHOD = EQUATIONS_SET_GFD_SOLUTION_METHOD !<Grid-based Finite Difference solution method. \see OPENCMISS_EquationsSetSolutionMethods,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_GFV_SOLUTION_METHOD = EQUATIONS_SET_GFV_SOLUTION_METHOD !<Grid-based Finite Volume solution method. \see OPENCMISS_EquationsSetSolutionMethods,OPENCMISS
  !>@}

  !> \addtogroup OPENCMISS_EquationsSetDerivedTypes OPENCMISS::EquationsSet::DerivedTypes
  !> \brief EquationsSet derived type parameters
  !> \see OPENCMISS::EquationsSet,OPENCMISS
  !>@{
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_DERIVED_STRAIN = EQUATIONS_SET_DERIVED_STRAIN !<Strain tensor field output. \see OPENCMISS_EquationsSetDerivedTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_DERIVED_STRESS = EQUATIONS_SET_DERIVED_STRESS !<Stress tensor field output. \see OPENCMISS_EquationsSetDerivedTypes,OPENCMISS
  !>@}

  !> \addtogroup OPENCMISS_EquationsSetTensorEvaluateTypes OPENCMISS::EquationsSet::TensorEvaluateTypes
  !> \brief Type of tensor to evaluate from an EquationsSet
  !> \see OPENCMISS::EquationsSet,OPENCMISS
  !>@{
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_EVALUATE_DEFORMATION_GRADIENT_TENSOR = &
    & EQUATIONS_SET_EVALUATE_DEFORMATION_GRADIENT_TENSOR !<Deformation gradient tensor \see OPENCMISS_EquationsSetTensorEvaluateTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_EVALUATE_R_CAUCHY_GREEN_DEFORMATION_TENSOR = &
    & EQUATIONS_SET_EVALUATE_R_CAUCHY_GREEN_DEFORMATION_TENSOR !<Right Cauchy-Green deformation field \see OPENCMISS_EquationsSetTensorEvaluateTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_EVALUATE_GREEN_LAGRANGE_STRAIN_TENSOR = & 
    & EQUATIONS_SET_EVALUATE_GREEN_LAGRANGE_STRAIN_TENSOR !<Green-Lagrange strain tensor \see OPENCMISS_EquationsSetTensorEvaluateTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_EVALUATE_CAUCHY_STRESS_TENSOR = & 
    & EQUATIONS_SET_EVALUATE_CAUCHY_STRESS_TENSOR !<Cauchy-stress tensor \see OPENCMISS_EquationsSetTensorEvaluateTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_EVALUATE_SECOND_PK_STRESS_TENSOR = & 
    & EQUATIONS_SET_EVALUATE_SECOND_PK_STRESS_TENSOR !<Second Piola Kirchhoff-stress tensor \see OPENCMISS_EquationsSetTensorEvaluateTypes,OPENCMISS
  !>@}

  !> \addtogroup OPENCMISS_EquationsSetDynamicMatrixTypes OPENCMISS::EquationsSet::DynamicMatrixTypes
  !> \brief Type of matrix in a dynamic equations set
  !>@{
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_MATRIX_STIFFNESS=EQUATIONS_MATRIX_STIFFNESS !<A stiffness matrix (multiplies displacement values)
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_MATRIX_DAMPING=EQUATIONS_MATRIX_DAMPING !<A damping matrix (multiplies velocity values)
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_MATRIX_MASS=EQUATIONS_MATRIX_MASS !<A mass matrix (multiplies acceleration values)
  !>@}

  !> \addtogroup OPENCMISS_EquationsSetAnalyticFunctionTypes OPENCMISS::EquationsSet::AnalyticFunctionTypes
  !> \brief The analytic function types.
  !> \see OPENCMISS::EquationsSet,OPENCMISS
  !>@{
  !> \addtogroup OPENCMISS_EquationsSetLaplaceAnalyticFunctionTypes OPENCMISS::EquationsSet::AnalyticFunctionTypes::Laplace
  !> \brief The analytic function types for a Laplace equation
  !> \see OPENCMISS::EquationsSet::AnalyticFunctionTypes,OPENCMISS
  !>@{
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_LAPLACE_EQUATION_TWO_DIM_1 = EQUATIONS_SET_LAPLACE_EQUATION_TWO_DIM_1 !<u=x**2+2*x*y-y**2 \see OPENCMISS_EquationsSetLaplaceAnalyticFunctionTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_LAPLACE_EQUATION_TWO_DIM_2 = EQUATIONS_SET_LAPLACE_EQUATION_TWO_DIM_2 !<u=cos(x)cosh(y) \see OPENCMISS_EquationsSetLaplaceAnalyticFunctionTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_LAPLACE_EQUATION_THREE_DIM_1 = EQUATIONS_SET_LAPLACE_EQUATION_THREE_DIM_1 !<u=x**2-2*y**2+z**2 \see OPENCMISS_EquationsSetLaplaceAnalyticFunctionTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_LAPLACE_EQUATION_THREE_DIM_2 = EQUATIONS_SET_LAPLACE_EQUATION_THREE_DIM_2 !<u=cos(x)*cosh(y)*z \see OPENCMISS_EquationsSetLaplaceAnalyticFunctionTypes,OPENCMISS
  !>@}
  !> \addtogroup OPENCMISS_EquationsSetHelmholtzAnalyticFunctionTypes OPENCMISS::EquationsSet::AnalyticFunctionTypes::Helmholtz
  !> \brief The analytic function types for a Helmholtz equation
  !> \see OPENCMISS::EquationsSet::AnalyticFunctionTypes,OPENCMISS
  !>@{
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_HELMHOLTZ_EQUATION_TWO_DIM_1 = EQUATIONS_SET_HELMHOLTZ_EQUATION_TWO_DIM_1 !<u=cos(sqrt(2)*k*x)*sin(sqrt(2)*k*y) \see OPENCMISS_EquationsSetHelmholtzAnalyticFunctionTypes,OPENCMISS
  !>@}
  !> \addtogroup OPENCMISS_PoiseuilleAnalyticFunctionTypes OPENCMISS::EquationsSet::AnalyticFunctionTypes::Poiseuille
  !> \brief The analytic function types for a Poiseuille equation.
  !> \see OPENCMISS::EquationsSet::AnalyticFunctionTypes,OPENCMISS
  !>@{
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_POISEUILLE_EQUATION_TWO_DIM_1 = EQUATIONS_SET_POISEUILLE_EQUATION_TWO_DIM_1 !<u=ln(4/(x+y+1^2)) \see OPENCMISS_EquationsSetPoiseuilleAnalyticFunctionTypes,OPENCMISS
  !>@}
  !> \addtogroup OPENCMISS_PoissonAnalyticFunctionTypes OPENCMISS::EquationsSet::AnalyticFunctionTypes::Poisson
  !> \brief The analytic function types for a Poisson equation.
  !> \see OPENCMISS::EquationsSet::AnalyticFunctionTypes,OPENCMISS
  !>@{
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_POISSON_EQUATION_TWO_DIM_1 = EQUATIONS_SET_POISSON_EQUATION_TWO_DIM_1 !<u=ln(4/(x+y+1^2)) \see OPENCMISS_EquationsSetPoissonAnalyticFunctionTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_POISSON_EQUATION_TWO_DIM_2 = EQUATIONS_SET_POISSON_EQUATION_TWO_DIM_2 !<u=tbd \see OPENCMISS_EquationsSetPoissonAnalyticFunctionTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_POISSON_EQUATION_TWO_DIM_3 = EQUATIONS_SET_POISSON_EQUATION_TWO_DIM_3 !<u=tbd \see OPENCMISS_EquationsSetPoissonAnalyticFunctionTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_POISSON_EQUATION_THREE_DIM_1 = EQUATIONS_SET_POISSON_EQUATION_THREE_DIM_1 !<u=ln(6/(x+y+z+1^2)) \see OPENCMISS_EquationsSetPoissonAnalyticFunctionTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_POISSON_EQUATION_THREE_DIM_2 = EQUATIONS_SET_POISSON_EQUATION_THREE_DIM_2 !<u=tbd \see OPENCMISS_EquationsSetPoissonAnalyticFunctionTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_POISSON_EQUATION_THREE_DIM_3 = EQUATIONS_SET_POISSON_EQUATION_THREE_DIM_3 !<u=tbd \see OPENCMISS_EquationsSetPoissonAnalyticFunctionTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_PRESSURE_POISSON_THREE_DIM_1 = EQUATIONS_SET_PRESSURE_POISSON_THREE_DIM_1 !<u=tbd \see OPENCMISS_EquationsSetPoissonAnalyticFunctionTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_PRESSURE_POISSON_THREE_DIM_2 = EQUATIONS_SET_PRESSURE_POISSON_THREE_DIM_2 !<u=tbd \see OPENCMISS_EquationsSetPoissonAnalyticFunctionTypes,OPENCMISS
  !>@}
  !> \addtogroup OPENCMISS_DiffusionAnalyticFunctionTypes OPENCMISS::EquationsSet::AnalyticFunctionTypes::Diffusion
  !> \brief The analytic function types for a diffusion equation.
  !> \see OPENCMISS::EquationsSet::AnalyticFunctionTypes,OPENCMISS
  !>@{
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_DIFFUSION_EQUATION_ONE_DIM_1 = EQUATIONS_SET_DIFFUSION_EQUATION_ONE_DIM_1
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_DIFFUSION_EQUATION_TWO_DIM_1 = EQUATIONS_SET_DIFFUSION_EQUATION_TWO_DIM_1 !<u=exp(-kt)*sin(sqrt(k)*(x*cos(phi)+y*sin(phi))) \see OPENCMISS_EquationsSetDiffusionAnalyticFunctionTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_DIFFUSION_EQUATION_THREE_DIM_1 = EQUATIONS_SET_DIFFUSION_EQUATION_THREE_DIM_1 !<
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_LINEAR_SOURCE_DIFFUSION_THREE_DIM_1 = &
    & EQUATIONS_SET_LINEAR_SOURCE_DIFFUSION_EQUATION_THREE_DIM_1
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_QUADRATIC_SOURCE_DIFFUSION_ONE_DIM_1 = &
    & EQUATIONS_SET_QUADRATIC_SOURCE_DIFFUSION_EQUATION_ONE_DIM_1
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_EXPONENTIAL_SOURCE_DIFFUSION_ONE_DIM_1 = &
    & EQUATIONS_SET_EXPONENTIAL_SOURCE_DIFFUSION_EQUATION_ONE_DIM_1

  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_MULTI_COMP_DIFFUSION_TWO_COMP_TWO_DIM = &
    & EQUATIONS_SET_MULTI_COMP_DIFFUSION_TWO_COMP_TWO_DIM !<Prescribed solution, using a source term to correct for error - 2D with 2 compartments
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_MULTI_COMP_DIFFUSION_TWO_COMP_THREE_DIM = &
    & EQUATIONS_SET_MULTI_COMP_DIFFUSION_TWO_COMP_THREE_DIM !<Prescribed solution, using a source term to correct for error - 3D with 2 compartments
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_MULTI_COMP_DIFFUSION_THREE_COMP_THREE_DIM = &
    & EQUATIONS_SET_MULTI_COMP_DIFFUSION_THREE_COMP_THREE_DIM !<Prescribed solution, using a source term to correct for error - 3D with 3 compartments
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_MULTI_COMP_DIFFUSION_FOUR_COMP_THREE_DIM = &
    & EQUATIONS_SET_MULTI_COMP_DIFFUSION_FOUR_COMP_THREE_DIM !<Prescribed solution, using a source term to correct for error - 3D with 3 compartments
  !>@}
  !> \addtogroup OPENCMISS_AdvectionDiffusionAnalyticFunctionTypes OPENCMISS::EquationsSet::AnalyticFunctionTypes::AdvectionDiffusion
  !> \brief The analytic function types for an advection-diffusion equation.
  !> \see OPENCMISS::EquationsSet::AnalyticFunctionTypes,OPENCMISS
  !>@{
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_ADVECTION_DIFFUSION_EQUATION_TWO_DIM_1 = &
    & EQUATIONS_SET_ADVECTION_DIFFUSION_EQUATION_TWO_DIM_1 !<u=exp(-kt)*sin(sqrt(k)*(x*cos(phi)+y*sin(phi))) \see OPENCMISS_EquationsSetDiffusionAnalyticFunctionTypes,OPENCMISS
  !> \addtogroup OPENCMISS_StokesAnalyticFunctionTypes OPENCMISS::EquationsSet::AnalyticFunctionTypes::Stokes
  !> \brief The analytic function types for a Stokes equation.
  !> \see OPENCMISS::EquationsSet::AnalyticFunctionTypes,OPENCMISS
  !>@{
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_STOKES_EQUATION_TWO_DIM_1 = EQUATIONS_SET_STOKES_EQUATION_TWO_DIM_1 !<u=tbd \see OPENCMISS_EquationsSetStokesAnalyticFunctionTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_STOKES_EQUATION_TWO_DIM_2 = EQUATIONS_SET_STOKES_EQUATION_TWO_DIM_2 !<u=tbd \see OPENCMISS_EquationsSetStokesAnalyticFunctionTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_STOKES_EQUATION_TWO_DIM_3 = EQUATIONS_SET_STOKES_EQUATION_TWO_DIM_3 !<u=tbd \see OPENCMISS_EquationsSetStokesAnalyticFunctionTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_STOKES_EQUATION_TWO_DIM_4 = EQUATIONS_SET_STOKES_EQUATION_TWO_DIM_4 !<u=tbd \see OPENCMISS_EquationsSetStokesAnalyticFunctionTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_STOKES_EQUATION_TWO_DIM_5 = EQUATIONS_SET_STOKES_EQUATION_TWO_DIM_5 !<u=tbd \see OPENCMISS_EquationsSetStokesAnalyticFunctionTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_STOKES_EQUATION_THREE_DIM_1 = EQUATIONS_SET_STOKES_EQUATION_THREE_DIM_1 !<u=tbd \see OPENCMISS_EquationsSetStokesAnalyticFunctionTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_STOKES_EQUATION_THREE_DIM_2 = EQUATIONS_SET_STOKES_EQUATION_THREE_DIM_2 !<u=tbd \see OPENCMISS_EquationsSetStokesAnalyticFunctionTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_STOKES_EQUATION_THREE_DIM_3 = EQUATIONS_SET_STOKES_EQUATION_THREE_DIM_3 !<u=tbd \see OPENCMISS_EquationsSetStokesAnalyticFunctionTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_STOKES_EQUATION_THREE_DIM_4 = EQUATIONS_SET_STOKES_EQUATION_THREE_DIM_4 !<u=tbd \see OPENCMISS_EquationsSetStokesAnalyticFunctionTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_STOKES_EQUATION_THREE_DIM_5 = EQUATIONS_SET_STOKES_EQUATION_THREE_DIM_5 !<u=tbd \see OPENCMISS_EquationsSetStokesAnalyticFunctionTypes,OPENCMISS
  !>@}
  !> \addtogroup OPENCMISS_NavierStokesAnalyticFunctionTypes OPENCMISS::EquationsSet::AnalyticFunctionTypes::NavierStokes
  !> \brief The analytic function types for a Navier-Stokes equation.
  !> \see OPENCMISS::EquationsSet::AnalyticFunctionTypes,OPENCMISS
  !>@{
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_NAVIER_STOKES_EQUATION_TWO_DIM_POISEUILLE= &
    & EQUATIONS_SET_NAVIER_STOKES_EQUATION_TWO_DIM_POISEUILLE !< fully developed 2D channel flow (parabolic) \see OPENCMISS_EquationsSetNavierStokesAnalyticFunctionTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_NAVIER_STOKES_EQUATION_TWO_DIM_TAYLOR_GREEN= &
    & EQUATIONS_SET_NAVIER_STOKES_EQUATION_TWO_DIM_TAYLOR_GREEN !< 2D dynamic nonlinear Taylor-Green vortex decay \see OPENCMISS_EquationsSetNavierStokesAnalyticFunctionTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_NAVIER_STOKES_EQUATION_FLOWRATE_AORTA= &
    & EQUATIONS_SET_NAVIER_STOKES_EQUATION_FLOWRATE_AORTA !< A fourier decomposed flow waveform for boundary conditions
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_NAVIER_STOKES_EQUATION_SINUSOID= &
    & EQUATIONS_SET_NAVIER_STOKES_EQUATION_SINUSOID !< A sinusoidal flow waveform
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_NAVIER_STOKES_EQUATION_SPLINT_FROM_FILE= &
    & EQUATIONS_SET_NAVIER_STOKES_EQUATION_SPLINT_FROM_FILE !< Spline integration of dependent values specified in a file
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_NAVIER_STOKES_EQUATION_TWO_DIM_1 = EQUATIONS_SET_NAVIER_STOKES_EQUATION_TWO_DIM_1 !<u=tbd \see OPENCMISS_EquationsSetNavierStokesAnalyticFunctionTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_NAVIER_STOKES_EQUATION_TWO_DIM_2 = EQUATIONS_SET_NAVIER_STOKES_EQUATION_TWO_DIM_2 !<u=tbd \see OPENCMISS_EquationsSetNavierStokesAnalyticFunctionTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_NAVIER_STOKES_EQUATION_TWO_DIM_3 = EQUATIONS_SET_NAVIER_STOKES_EQUATION_TWO_DIM_3 !<u=tbd \see OPENCMISS_EquationsSetNavierStokesAnalyticFunctionTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_NAVIER_STOKES_EQUATION_TWO_DIM_4 = EQUATIONS_SET_NAVIER_STOKES_EQUATION_TWO_DIM_4 !<u=tbd \see OPENCMISS_EquationsSetNavierStokesAnalyticFunctionTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_NAVIER_STOKES_EQUATION_TWO_DIM_5 = EQUATIONS_SET_NAVIER_STOKES_EQUATION_TWO_DIM_5 !<u=tbd \see OPENCMISS_EquationsSetNavierStokesAnalyticFunctionTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_NAVIER_STOKES_EQUATION_THREE_DIM_1 = &
    & EQUATIONS_SET_NAVIER_STOKES_EQUATION_THREE_DIM_1 !<u=tbd \see OPENCMISS_EquationsSetNavierStokesAnalyticFunctionTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_NAVIER_STOKES_EQUATION_THREE_DIM_2 = &
    & EQUATIONS_SET_NAVIER_STOKES_EQUATION_THREE_DIM_2 !<u=tbd \see OPENCMISS_EquationsSetNavierStokesAnalyticFunctionTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_NAVIER_STOKES_EQUATION_THREE_DIM_3 = &
    & EQUATIONS_SET_NAVIER_STOKES_EQUATION_THREE_DIM_3 !<u=tbd \see OPENCMISS_EquationsSetNavierStokesAnalyticFunctionTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_NAVIER_STOKES_EQUATION_THREE_DIM_4 = &
    & EQUATIONS_SET_NAVIER_STOKES_EQUATION_THREE_DIM_4 !<u=tbd \see OPENCMISS_EquationsSetNavierStokesAnalyticFunctionTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_NAVIER_STOKES_EQUATION_THREE_DIM_5 = &
    & EQUATIONS_SET_NAVIER_STOKES_EQUATION_THREE_DIM_5 !<u=tbd \see OPENCMISS_EquationsSetNavierStokesAnalyticFunctionTypes,OPENCMISS
  !>@}
  !> \addtogroup OPENCMISS_DarcyAnalyticFunctionTypes OPENCMISS::EquationsSet::AnalyticFunctionTypes::Darcy
  !> \brief The analytic function types for a Darcy equation.
  !> \see OPENCMISS::EquationsSet::AnalyticFunctionTypes,OPENCMISS
  !>@{
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_DARCY_EQUATION_TWO_DIM_1 = EQUATIONS_SET_DARCY_EQUATION_TWO_DIM_1 !<u=tbd \see OPENCMISS_EquationsSetDarcyAnalyticFunctionTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_DARCY_EQUATION_TWO_DIM_2 = EQUATIONS_SET_DARCY_EQUATION_TWO_DIM_2 !<u=tbd \see OPENCMISS_EquationsSetDarcyAnalyticFunctionTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_DARCY_EQUATION_TWO_DIM_3 = EQUATIONS_SET_DARCY_EQUATION_TWO_DIM_3 !<u=tbd \see OPENCMISS_EquationsSetDarcyAnalyticFunctionTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_DARCY_EQUATION_THREE_DIM_1 = EQUATIONS_SET_DARCY_EQUATION_THREE_DIM_1 !<u=tbd \see OPENCMISS_EquationsSetDarcyAnalyticFunctionTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_DARCY_EQUATION_THREE_DIM_2 = EQUATIONS_SET_DARCY_EQUATION_THREE_DIM_2 !<u=tbd \see OPENCMISS_EquationsSetDarcyAnalyticFunctionTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_DARCY_EQUATION_THREE_DIM_3 = EQUATIONS_SET_DARCY_EQUATION_THREE_DIM_3 !<u=tbd \see OPENCMISS_EquationsSetDarcyAnalyticFunctionTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_INCOMP_ELAST_DARCY_ANALYTIC_DARCY = &
    & EQUATIONS_SET_INCOMP_ELAST_DARCY_ANALYTIC_DARCY !<this is a solution where the finite elasticity solve is skipped to allow easy analytic testing of the mass increase & velocity solve step of incompressible poromechanical model
  !>@}
  !> \addtogroup OPENCMISS_BurgersAnalyticFunctionTypes OPENCMISS::EquationsSet::AnalyticFunctionTypes::Burgers
  !> \brief The analytic function types for a Burgers equation.
  !> \see OPENCMISS::EquationsSet::AnalyticFunctionTypes,OPENCMISS
  !>@{
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_BURGERS_EQUATION_ONE_DIM_1 = EQUATIONS_SET_BURGERS_EQUATION_ONE_DIM_1
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_GENERALISED_BURGERS_EQUATION_ONE_DIM_1 = &
    & EQUATIONS_SET_GENERALISED_BURGERS_EQUATION_ONE_DIM_1
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_GENERALISED_BURGERS_EQUATION_ONE_DIM_2 = &
    & EQUATIONS_SET_GENERALISED_BURGERS_EQUATION_ONE_DIM_2
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_STATIC_BURGERS_EQUATION_ONE_DIM_1 = &
    & EQUATIONS_SET_STATIC_BURGERS_EQUATION_ONE_DIM_1
  !>@}

  !> \addtogroup OPENCMISS_EquationsSetLinearElasticityAnalyticFunctionTypes OPENCMISS::EquationsSet::AnalyticFunctionTypes::LinearElasticity
  !> \brief The analytic function types for a LinearElasticity equation
  !> \see OPENCMISS::EquationsSet::AnalyticFunctionTypes,OPENCMISS
  !>@{
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_LINEAR_ELASTICITY_ONE_DIM_1 = EQUATIONS_SET_LINEAR_ELASTICITY_ONE_DIM_1 !<u=tbd \see OPENCMISS_EquationsSetLinearElasticityAnalyticFunctionTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_LINEAR_ELASTICITY_TWO_DIM_1 = EQUATIONS_SET_LINEAR_ELASTICITY_TWO_DIM_1 !<u=tbd \see OPENCMISS_EquationsSetLinearElasticityAnalyticFunctionTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_LINEAR_ELASTICITY_TWO_DIM_2 = EQUATIONS_SET_LINEAR_ELASTICITY_TWO_DIM_2 !<u=tbd \see OPENCMISS_EquationsSetLinearElasticityAnalyticFunctionTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_LINEAR_ELASTICITY_THREE_DIM_1 = EQUATIONS_SET_LINEAR_ELASTICITY_THREE_DIM_1 !<u=tbd \see OPENCMISS_EquationsSetLinearElasticityAnalyticFunctionTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_LINEAR_ELASTICITY_THREE_DIM_2 = EQUATIONS_SET_LINEAR_ELASTICITY_THREE_DIM_2 !<u=tbd \see OPENCMISS_EquationsSetLinearElasticityAnalyticFunctionTypes,OPENCMISS
  !>@}
  !> \addtogroup OPENCMISS_EquationsSetFiniteElasticityAnalyticFunctionTypes OPENCMISS::EquationsSet::AnalyticFunctionTypes::FiniteElasticity
  !> \brief The analytic function types for a FiniteElasticity equation
  !> \see OPENCMISS::EquationsSet::AnalyticFunctionTypes,OPENCMISS
  !>@{
  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_FINITE_ELASTICITY_CYLINDER = EQUATIONS_SET_FINITE_ELASTICITY_CYLINDER !<u=tbd \see OPENCMISS_EquationsSetLinearElasticityAnalyticFunctionTypes,OPENCMISS
  !>@}
  !>@}
  !>@}

  !> \addtogroup OPENCMISS_AnalyticParamIndices OPENCMISS::FiniteElasticity::AnalyticParamIndices
  !> \brief Indices for EQUATIONS_SET_ANALYTIC_TYPE%ANALYTIC_USER_PARAMS
  !> \see OPENCMISS::FiniteElasticity::AnalyticParamIndices,OPENCMISS
  !>@{
  INTEGER(INTG), PARAMETER :: CMFE_FINITE_ELASTICITY_ANALYTIC_CYLINDER_PARAM_PIN_IDX = &
    & FINITE_ELASTICITY_ANALYTIC_CYLINDER_PARAM_PIN_IDX !<Inner pressure parameter index \see OPENCMISS_AnalyticParamIndices,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_FINITE_ELASTICITY_ANALYTIC_CYLINDER_PARAM_POUT_IDX = &
    & FINITE_ELASTICITY_ANALYTIC_CYLINDER_PARAM_POUT_IDX !<Outer pressure parameter index \see OPENCMISS_AnalyticParamIndices,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_FINITE_ELASTICITY_ANALYTIC_CYLINDER_PARAM_LAMBDA_IDX = &
    & FINITE_ELASTICITY_ANALYTIC_CYLINDER_PARAM_LAMBDA_IDX !<Lambda parameter index \see OPENCMISS_AnalyticParamIndices,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_FINITE_ELASTICITY_ANALYTIC_CYLINDER_PARAM_TSI_IDX = &
    & FINITE_ELASTICITY_ANALYTIC_CYLINDER_PARAM_TSI_IDX !<Tsi parameter index \see OPENCMISS_AnalyticParamIndices,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_FINITE_ELASTICITY_ANALYTIC_CYLINDER_PARAM_RIN_IDX = &
    & FINITE_ELASTICITY_ANALYTIC_CYLINDER_PARAM_RIN_IDX !<Inner radius parameter index \see OPENCMISS_AnalyticParamIndices,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_FINITE_ELASTICITY_ANALYTIC_CYLINDER_PARAM_ROUT_IDX = &
    & FINITE_ELASTICITY_ANALYTIC_CYLINDER_PARAM_ROUT_IDX !<Outer radius parameter index \see OPENCMISS_AnalyticParamIndices,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_FINITE_ELASTICITY_ANALYTIC_CYLINDER_PARAM_C1_IDX = &
    & FINITE_ELASTICITY_ANALYTIC_CYLINDER_PARAM_C1_IDX !<c1 parameter index \see OPENCMISS_AnalyticParamIndices,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_FINITE_ELASTICITY_ANALYTIC_CYLINDER_PARAM_C2_IDX = &
    & FINITE_ELASTICITY_ANALYTIC_CYLINDER_PARAM_C2_IDX !<c2 parameter index \see OPENCMISS_AnalyticParamIndices,OPENCMISS
  !>@}

  !Module types

  !Module variables

  !Interfaces

  PUBLIC CMFE_EQUATIONS_SET_NO_CLASS,CMFE_EQUATIONS_SET_ELASTICITY_CLASS,CMFE_EQUATIONS_SET_FLUID_MECHANICS_CLASS, &
    & CMFE_EQUATIONS_SET_ELECTROMAGNETICS_CLASS,CMFE_EQUATIONS_SET_CLASSICAL_FIELD_CLASS,CMFE_EQUATIONS_SET_BIOELECTRICS_CLASS, &
    & CMFE_EQUATIONS_SET_MODAL_CLASS,CMFE_EQUATIONS_SET_FITTING_CLASS,CMFE_EQUATIONS_SET_OPTIMISATION_CLASS, &
    & CMFE_EQUATIONS_SET_MULTI_PHYSICS_CLASS

  PUBLIC CMFE_EQUATIONS_SET_NO_TYPE,CMFE_EQUATIONS_SET_LINEAR_ELASTICITY_TYPE,CMFE_EQUATIONS_SET_FINITE_ELASTICITY_TYPE, &
    & CMFE_EQUATIONS_SET_STOKES_EQUATION_TYPE,CMFE_EQUATIONS_SET_NAVIER_STOKES_EQUATION_TYPE, &
    & CMFE_EQUATIONS_SET_DARCY_EQUATION_TYPE, &
    & CMFE_EQUATIONS_SET_DARCY_PRESSURE_EQUATION_TYPE,CMFE_EQUATIONS_SET_BURGERS_EQUATION_TYPE, &
    & CMFE_EQUATIONS_SET_STATIC_POISEUILLE_SUBTYPE, &
    & CMFE_EQUATIONS_SET_DYNAMIC_POISEUILLE_SUBTYPE, &
    & CMFE_EQUATIONS_SET_CHARACTERISTIC_EQUATION_TYPE, &
    & CMFE_EQUATIONS_SET_ELECTROSTATIC_TYPE,CMFE_EQUATIONS_SET_MAGNETOSTATIC_TYPE,CMFE_EQUATIONS_SET_MAXWELLS_EQUATIONS_TYPE, &
    & CMFE_EQUATIONS_SET_LAPLACE_EQUATION_TYPE,CMFE_EQUATIONS_SET_POISEUILLE_EQUATION_TYPE, &
    & CMFE_EQUATIONS_SET_POISSON_EQUATION_TYPE, &
    & CMFE_EQUATIONS_SET_HELMHOLTZ_EQUATION_TYPE,CMFE_EQUATIONS_SET_WAVE_EQUATION_TYPE, &
    & CMFE_EQUATIONS_SET_DIFFUSION_EQUATION_TYPE,CMFE_EQUATIONS_SET_ADVECTION_EQUATION_TYPE, &
    & CMFE_EQUATIONS_SET_ADVECTION_DIFFUSION_EQUATION_TYPE,CMFE_EQUATIONS_SET_REACTION_DIFFUSION_EQUATION_TYPE, &
    & CMFE_EQUATIONS_SET_BIHARMONIC_EQUATION_TYPE,CMFE_EQUATIONS_SET_MONODOMAIN_EQUATION_TYPE, &
    & CMFE_EQUATIONS_SET_BIDOMAIN_EQUATION_TYPE, &
    & CMFE_EQUATIONS_SET_LINEAR_ELASTIC_MODAL_TYPE,CMFE_EQUATIONS_SET_DATA_FITTING_EQUATION_TYPE, &
    & CMFE_EQUATIONS_SET_MONODOMAIN_STRANG_SPLITTING_EQUATION_TYPE

  PUBLIC CMFE_EQUATIONS_SET_FINITE_ELASTICITY_DARCY_TYPE, &
    & CMFE_EQUATIONS_SET_FINITE_ELASTICITY_STOKES_TYPE, CMFE_EQUATIONS_SET_FINITE_ELASTICITY_NAVIER_STOKES_TYPE, &
    & CMFE_EQUATIONS_SET_DIFFUSION_DIFFUSION_TYPE, CMFE_EQUATIONS_SET_DIFFUSION_ADVECTION_DIFFUSION_TYPE

  PUBLIC CMFE_EQUATIONS_SET_NO_SUBTYPE,CMFE_EQUATIONS_SET_THREE_DIMENSIONAL_SUBTYPE, &
    & CMFE_EQUATIONS_SET_TWO_DIMENSIONAL_PLANE_STRESS_SUBTYPE, &
    & CMFE_EQUATIONS_SET_TWO_DIMENSIONAL_PLANE_STRAIN_SUBTYPE,CMFE_EQUATIONS_SET_ONE_DIMENSIONAL_SUBTYPE, &
    & CMFE_EQUATIONS_SET_PLATE_SUBTYPE, &
    & CMFE_EQUATIONS_SET_SHELL_SUBTYPE, &
    & CMFE_EQUATIONS_SET_INCOMPRESSIBLE_MOONEY_RIVLIN_SUBTYPE,CMFE_EQUATIONS_SET_NEARLY_INCOMPRESSIBLE_MOONEY_RIVLIN_SUBTYPE, &
    & CMFE_EQUATIONS_SET_MOONEY_RIVLIN_SUBTYPE, &
    & CMFE_EQUATIONS_SET_REFERENCE_STATE_MOONEY_RIVLIN_SUBTYPE, CMFE_EQUATIONS_SET_ISOTROPIC_EXPONENTIAL_SUBTYPE, &
    & CMFE_EQUATIONS_SET_ACTIVECONTRACTION_SUBTYPE,CMFE_EQUATIONS_SET_MOONEY_RIVLIN_ACTIVECONTRACTION_SUBTYPE, &
    & CMFE_EQUATIONS_SET_COMPRESSIBLE_ACTIVECONTRACTION_SUBTYPE,CMFE_EQUATIONS_SET_TRANSVERSE_ISOTROPIC_ACTIVE_SUBTYPE, &
    & CMFE_EQUATIONS_SET_TRANS_ISOTROPIC_ACTIVE_TRANSITION_SUBTYPE, &
    & CMFE_EQUATIONS_SET_TRANSVERSE_ISOTROPIC_POLYNOMIAL_SUBTYPE,CMFE_EQUATIONS_SET_STVENANT_KIRCHOFF_ACTIVECONTRACTION_SUBTYPE, &
    & CMFE_EQUATIONS_SET_ANISOTROPIC_POLYNOMIAL_SUBTYPE,CMFE_EQUATIONS_SET_ANISOTROPIC_POLYNOMIAL_ACTIVE_SUBTYPE, &
    & CMFE_EQUATIONS_SET_TRANSVERSE_ISOTROPIC_EXPONENTIAL_SUBTYPE,CMFE_EQUATIONS_SET_ORTHOTROPIC_MATERIAL_COSTA_SUBTYPE, &
    & CMFE_EQUATIONS_SET_COMPRESSIBLE_FINITE_ELASTICITY_SUBTYPE,CMFE_EQUATIONS_SET_INCOMPRESS_FINITE_ELASTICITY_DARCY_SUBTYPE, &
    & CMFE_EQUATIONS_SET_ELASTICITY_DARCY_INRIA_MODEL_SUBTYPE,CMFE_EQUATIONS_SET_ELASTICITY_MULTI_COMP_DARCY_INRIA_SUBTYPE, &
    & CMFE_EQUATIONS_SET_INCOMPRESS_ELASTICITY_DRIVEN_DARCY_SUBTYPE, &
    & CMFE_EQUATIONS_SET_INCOMPRESSIBLE_ELASTICITY_DRIVEN_MR_SUBTYPE, &
    & CMFE_EQUATIONS_SET_INCOMPRESS_ELAST_MULTI_COMP_DARCY_SUBTYPE,CMFE_EQUATIONS_SET_TRANSVERSE_ISOTROPIC_GUCCIONE_SUBTYPE, &
    & CMFE_EQUATIONS_SET_GUCCIONE_ACTIVECONTRACTION_SUBTYPE, &
    & CMFE_EQUATIONS_SET_ACTIVE_STRAIN_SUBTYPE, &
    & CMFE_EQUATIONS_SET_MULTISCALE_ACTIVE_STRAIN_SUBTYPE, &
    & CMFE_EQUATIONS_SET_MEMBRANE_SUBTYPE, CMFE_EQUATIONS_SET_ORTHOTROPIC_HOLZAPFEL_OGDEN_SUBTYPE, &
    & CMFE_EQUATIONS_SET_HOLZAPFEL_OGDEN_ACTIVECONTRACTION_SUBTYPE,  &
    & CMFE_EQUATIONS_SET_ELASTICITY_FLUID_PRES_STATIC_INRIA_SUBTYPE, &
    & CMFE_EQUATIONS_SET_ELASTICITY_FLUID_PRES_HOLMES_MOW_SUBTYPE, &
    & CMFE_EQUATIONS_SET_ELASTI_FLUID_PRES_HOLMES_MOW_ACTIVE_SUBTYPE, &
    & CMFE_EQUATIONS_SET_TRANSVERSE_ISOTROPIC_HUMPHREY_YIN_SUBTYPE, &
    & CMFE_EQUATIONS_SET_STATIC_STOKES_SUBTYPE, CMFE_EQUATIONS_SET_LAPLACE_STOKES_SUBTYPE, &
    & CMFE_EQUATIONS_SET_TRANSIENT_STOKES_SUBTYPE,CMFE_EQUATIONS_SET_ALE_STOKES_SUBTYPE, &
    & CMFE_EQUATIONS_SET_ALE_NAVIER_STOKES_SUBTYPE, &
    & CMFE_EQUATIONS_SET_OPTIMISED_STOKES_SUBTYPE,CMFE_EQUATIONS_SET_STATIC_NAVIER_STOKES_SUBTYPE, &
    & CMFE_EQUATIONS_SET_LAPLACE_NAVIER_STOKES_SUBTYPE,CMFE_EQUATIONS_SET_TRANSIENT_NAVIER_STOKES_SUBTYPE, &
    & CMFE_EQUATIONS_SET_TRANSIENT1D_NAVIER_STOKES_SUBTYPE, CMFE_EQUATIONS_SET_TRANSIENT_RBS_NAVIER_STOKES_SUBTYPE, &
    & CMFE_EQUATIONS_SET_STATIC_RBS_NAVIER_STOKES_SUBTYPE, &
    & CMFE_EQUATIONS_SET_CHARACTERISTIC_SUBTYPE, &
    & CMFE_EQUATIONS_SET_TRANSIENT1D_ADV_NAVIER_STOKES_SUBTYPE, CMFE_EQUATIONS_SET_COUPLED1D0D_ADV_NAVIER_STOKES_SUBTYPE, &
    & CMFE_EQUATIONS_SET_STREE1D0D_SUBTYPE, CMFE_EQUATIONS_SET_STREE1D0D_ADV_SUBTYPE, &
    & CMFE_EQUATIONS_SET_MULTISCALE3D_NAVIER_STOKES_SUBTYPE, &
    & CMFE_EQUATIONS_SET_CONSTITUTIVE_MU_NAVIER_STOKES_SUBTYPE, &
    & CMFE_EQUATIONS_SET_COUPLED1D0D_NAVIER_STOKES_SUBTYPE, &
    & CMFE_EQUATIONS_SET_OPTIMISED_NAVIER_STOKES_SUBTYPE,CMFE_EQUATIONS_SET_STANDARD_DARCY_SUBTYPE, &
    & CMFE_EQUATIONS_SET_QUASISTATIC_DARCY_SUBTYPE,CMFE_EQUATIONS_SET_ALE_DARCY_SUBTYPE, &
    & CMFE_EQUATIONS_SET_TRANSIENT_DARCY_SUBTYPE, &
    & CMFE_EQUATIONS_SET_TRANSIENT_ALE_DARCY_SUBTYPE,CMFE_EQUATIONS_SET_MULTI_COMPARTMENT_DARCY_SUBTYPE, &
    & CMFE_EQUATIONS_SET_STANDARD_LAPLACE_SUBTYPE,CMFE_EQUATIONS_SET_MOVING_MESH_LAPLACE_SUBTYPE, &
    & CMFE_EQUATIONS_SET_GENERALISED_LAPLACE_SUBTYPE,CMFE_EQUATIONS_SET_CONSTANT_SOURCE_POISSON_SUBTYPE, &
    & CMFE_EQUATIONS_SET_EXTRACELLULAR_BIDOMAIN_POISSON_SUBTYPE, &
    & CMFE_EQUATIONS_SET_LINEAR_PRESSURE_POISSON_SUBTYPE, CMFE_EQUATIONS_SET_NONLINEAR_PRESSURE_POISSON_SUBTYPE, &
    & CMFE_EQUATIONS_SET_ALE_PRESSURE_POISSON_SUBTYPE, CMFE_EQUATIONS_SET_FITTED_PRESSURE_POISSON_SUBTYPE,&
    & CMFE_EQUATIONS_SET_LINEAR_SOURCE_POISSON_SUBTYPE,CMFE_EQUATIONS_SET_QUADRATIC_SOURCE_POISSON_SUBTYPE, &
    & CMFE_EQUATIONS_SET_EXPONENTIAL_SOURCE_POISSON_SUBTYPE,CMFE_EQUATIONS_SET_STANDARD_HELMHOLTZ_SUBTYPE, &
    & CMFE_EQUATIONS_SET_GENERALISED_HELMHOLTZ_SUBTYPE, &
    & CMFE_EQUATIONS_SET_NO_SOURCE_DIFFUSION_SUBTYPE,CMFE_EQUATIONS_SET_CONSTANT_SOURCE_DIFFUSION_SUBTYPE, &
    & CMFE_EQUATIONS_SET_LINEAR_SOURCE_DIFFUSION_SUBTYPE,CMFE_EQUATIONS_SET_QUADRATIC_SOURCE_DIFFUSION_SUBTYPE, &
    & CMFE_EQUATIONS_SET_EXPONENTIAL_SOURCE_DIFFUSION_SUBTYPE,CMFE_EQUATIONS_SET_MULTI_COMP_TRANSPORT_DIFFUSION_SUBTYPE, &
    & CMFE_EQUATIONS_SET_NO_SOURCE_ALE_DIFFUSION_SUBTYPE,CMFE_EQUATIONS_SET_CONSTANT_SOURCE_ALE_DIFFUSION_SUBTYPE, &
    & CMFE_EQUATIONS_SET_LINEAR_SOURCE_ALE_DIFFUSION_SUBTYPE,CMFE_EQUATIONS_SET_QUADRATIC_SOURCE_ALE_DIFFUSION_SUBTYPE, &
    & CMFE_EQUATIONS_SET_EXPONENTIAL_SOURCE_ALE_DIFFUSION_SUBTYPE, &
    & CMFE_EQUATIONS_SET_ADVECTION_SUBTYPE, &
    & CMFE_EQUATIONS_SET_NO_SOURCE_ADVECTION_DIFFUSION_SUBTYPE, &
    & CMFE_EQUATIONS_SET_CONSTANT_SOURCE_ADVECTION_DIFFUSION_SUBTYPE, &
    & CMFE_EQUATIONS_SET_LINEAR_SOURCE_ADVECTION_DIFFUSION_SUBTYPE, &
    & CMFE_EQUATIONS_SET_QUADRATIC_SOURCE_ADVEC_DIFF_SUBTYPE,CMFE_EQUATIONS_SET_EXPONENTIAL_SOURCE_ADVEC_DIFF_SUBTYPE, &
    & CMFE_EQUATIONS_SET_NO_SOURCE_ALE_ADVECTION_DIFFUSION_SUBTYPE, &
    & CMFE_EQUATIONS_SET_CONSTANT_SOURCE_ALE_ADVEC_DIFF_SUBTYPE,CMFE_EQUATIONS_SET_LINEAR_SOURCE_ALE_ADVEC_DIFF_SUBTYPE, &
    & CMFE_EQUATIONS_SET_QUADRATIC_SOURCE_ALE_ADVEC_DIFF_SUBTYPE,CMFE_EQUATIONS_SET_EXP_SOURCE_ALE_ADVECTION_DIFFUSION_SUBTYPE, &
    & CMFE_EQUATIONS_SET_NO_SOURCE_STATIC_ADVEC_DIFF_SUBTYPE, CMFE_EQUATIONS_SET_CONSTANT_SOURCE_STATIC_ADVEC_DIFF_SUBTYPE, &
    & CMFE_EQUATIONS_SET_LINEAR_SOURCE_STATIC_ADVEC_DIFF_SUBTYPE, &
    & CMFE_EQUATIONS_SET_NO_SOURCE_ADVECTION_DIFF_SUPG_SUBTYPE, CMFE_EQUATIONS_SET_CONSTANT_SOURCE_ADVECTION_DIFF_SUPG_SUBTYPE, &
    & CMFE_EQUATIONS_SET_LINEAR_SOURCE_ADVECTION_DIFF_SUPG_SUBTYPE, CMFE_EQUATIONS_SET_QUAD_SOURCE_ADVECTION_DIFF_SUPG_SUBTYPE, &
    & CMFE_EQUATIONS_SET_EXP_SOURCE_ADVECTION_DIFF_SUPG_SUBTYPE, &
    & CMFE_EQUATIONS_SET_NO_SOURCE_ALE_ADVECTION_DIFF_SUPG_SUBTYPE, &
    & CMFE_EQUATIONS_SET_CONSTANT_SOURCE_ALE_ADVEC_DIFF_SUPG_SUBTYPE, &
    & CMFE_EQUATIONS_SET_LINEAR_SOURCE_ALE_ADVEC_DIFF_SUPG_SUBTYPE, &
    & CMFE_EQUATIONS_SET_QUAD_SOURCE_ALE_ADVECTION_DIFF_SUPG_SUBTYPE, &
    & CMFE_EQUATIONS_SET_EXP_SOURCE_ALE_ADVECTION_DIFF_SUPG_SUBTYPE, &
    & CMFE_EQUATIONS_SET_NO_SOURCE_STATIC_ADVEC_DIFF_SUPG_SUBTYPE, &
    & CMFE_EQUATIONS_SET_CONST_SOURCE_STATIC_ADVEC_DIFF_SUPG_SUBTYPE, &
    & CMFE_EQUATIONS_SET_LIN_SOURCE_STATIC_ADVEC_DIFF_SUPG_SUBTYPE, &
    & CMFE_EQUATIONS_SET_MULTI_COMP_TRANSPORT_ADVEC_DIFF_SUBTYPE,CMFE_EQUATIONS_SET_MULT_COMP_TRANSPORT_ADVEC_DIFF_SUPG_SUBTYPE, &
    & CMFE_EQUATIONS_SET_PGM_STOKES_SUBTYPE, &
    & CMFE_EQUATIONS_SET_FIRST_BIDOMAIN_SUBTYPE,CMFE_EQUATIONS_SET_SECOND_BIDOMAIN_SUBTYPE, &
    & CMFE_EQUATIONS_SET_MONODOMAIN_BUENOOROVIO_SUBTYPE,&
    & CMFE_EQUATIONS_SET_MONODOMAIN_TENTUSSCHER06_SUBTYPE  ,&
    & CMFE_EQUATIONS_SET_STANDARD_DATA_FITTING_SUBTYPE,CMFE_EQUATIONS_SET_GENERALISED_DATA_FITTING_SUBTYPE, &
    & CMFE_EQUATIONS_SET_VECTOR_DATA_FITTING_SUBTYPE,CMFE_EQUATIONS_SET_DIVFREE_VECTOR_DATA_FITTING_SUBTYPE, &
    & CMFE_EQUATIONS_SET_VECTOR_DATA_PRE_FITTING_SUBTYPE,CMFE_EQUATIONS_SET_DIVFREE_VECTOR_DATA_PRE_FITTING_SUBTYPE, &
    & CMFE_EQUATIONS_SET_MAT_PROPERTIES_DATA_FITTING_SUBTYPE,CMFE_EQUATIONS_SET_MAT_PROP_INRIA_MODEL_DATA_FITTING_SUBTYPE, &
    & CMFE_EQUATIONS_SET_DATA_POINT_VECTOR_STATIC_FITTING_SUBTYPE, &
    & CMFE_EQUATIONS_SET_DATA_PT_VECTOR_QUASISTATIC_FITTING_SUBTYPE, &
    & CMFE_EQUATIONS_SET_PGM_NAVIER_STOKES_SUBTYPE, &
    & CMFE_EQUATIONS_SET_CONSTITUTIVE_LAW_IN_CELLML_EVALUATE_SUBTYPE, &
    & CMFE_EQUATIONS_SET_COUPLED_SOURCE_DIFFUSION_DIFFUSION_SUBTYPE, &
    & CMFE_EQUATIONS_SET_COUPLED_SOURCE_DIFFUSION_ADVEC_DIFF_SUBTYPE, &
    & CMFE_EQUATIONS_SET_BURGERS_SUBTYPE,CMFE_EQUATIONS_SET_GENERALISED_BURGERS_SUBTYPE, &
    & CMFE_EQUATIONS_SET_STATIC_BURGERS_SUBTYPE, &
    & CMFE_EQUATIONS_SET_INVISCID_BURGERS_SUBTYPE,CMFE_EQUATIONS_SET_STANDARD_MONODOMAIN_ELASTICITY_SUBTYPE, &
    & CMFE_EQUATIONS_SET_1D3D_MONODOMAIN_ELASTICITY_SUBTYPE,CMFE_EQUATIONS_SET_MONODOMAIN_ELASTICITY_W_TITIN_SUBTYPE, &
    & CMFE_EQUATIONS_SET_1D3D_MONODOMAIN_ACTIVE_STRAIN_SUBTYPE, &
    & CMFE_EQUATIONS_SET_CONSTIT_AND_GROWTH_LAW_IN_CELLML_SUBTYPE, &
    & CMFE_EQUATIONS_SET_MONODOMAIN_ELASTICITY_VELOCITY_SUBTYPE, &
    & CMFE_EQUATIONS_SET_FINITE_ELASTICITY_NAVIER_STOKES_ALE_SUBTYPE

  PUBLIC CMFE_EQUATIONS_SET_CELLML_REAC_SPLIT_REAC_DIFF_SUBTYPE, CMFE_EQUATIONS_SET_CELLML_REAC_NO_SPLIT_REAC_DIFF_SUBTYPE, &
    & CMFE_EQUATIONS_SET_CONSTANT_REAC_DIFF_SUBTYPE

  PUBLIC CMFE_EQUATIONS_SET_FEM_SOLUTION_METHOD,CMFE_EQUATIONS_SET_BEM_SOLUTION_METHOD,CMFE_EQUATIONS_SET_FD_SOLUTION_METHOD, &
    & CMFE_EQUATIONS_SET_FV_SOLUTION_METHOD,CMFE_EQUATIONS_SET_GFEM_SOLUTION_METHOD,CMFE_EQUATIONS_SET_GFD_SOLUTION_METHOD, &
    & CMFE_EQUATIONS_SET_GFV_SOLUTION_METHOD

  PUBLIC CMFE_EQUATIONS_SET_DERIVED_STRAIN,CMFE_EQUATIONS_SET_DERIVED_STRESS

  PUBLIC CMFE_EQUATIONS_SET_EVALUATE_DEFORMATION_GRADIENT_TENSOR, &
    & CMFE_EQUATIONS_SET_EVALUATE_R_CAUCHY_GREEN_DEFORMATION_TENSOR, &
    & CMFE_EQUATIONS_SET_EVALUATE_GREEN_LAGRANGE_STRAIN_TENSOR, &
    & CMFE_EQUATIONS_SET_EVALUATE_CAUCHY_STRESS_TENSOR, &
    & CMFE_EQUATIONS_SET_EVALUATE_SECOND_PK_STRESS_TENSOR

  PUBLIC CMFE_EQUATIONS_MATRIX_STIFFNESS,CMFE_EQUATIONS_MATRIX_DAMPING,CMFE_EQUATIONS_MATRIX_MASS

  PUBLIC CMFE_EQUATIONS_SET_LAPLACE_EQUATION_TWO_DIM_1,CMFE_EQUATIONS_SET_LAPLACE_EQUATION_TWO_DIM_2, &
    & CMFE_EQUATIONS_SET_LAPLACE_EQUATION_THREE_DIM_1,CMFE_EQUATIONS_SET_LAPLACE_EQUATION_THREE_DIM_2

  PUBLIC CMFE_EQUATIONS_SET_HELMHOLTZ_EQUATION_TWO_DIM_1

  PUBLIC CMFE_EQUATIONS_SET_LINEAR_ELASTICITY_ONE_DIM_1,CMFE_EQUATIONS_SET_LINEAR_ELASTICITY_TWO_DIM_1, &
    & CMFE_EQUATIONS_SET_LINEAR_ELASTICITY_TWO_DIM_2,CMFE_EQUATIONS_SET_LINEAR_ELASTICITY_THREE_DIM_1, &
    & CMFE_EQUATIONS_SET_LINEAR_ELASTICITY_THREE_DIM_2

  PUBLIC CMFE_EQUATIONS_SET_DIFFUSION_EQUATION_ONE_DIM_1,CMFE_EQUATIONS_SET_DIFFUSION_EQUATION_TWO_DIM_1, &
    & CMFE_EQUATIONS_SET_DIFFUSION_EQUATION_THREE_DIM_1, &
    & CMFE_EQUATIONS_SET_LINEAR_SOURCE_DIFFUSION_THREE_DIM_1,CMFE_EQUATIONS_SET_QUADRATIC_SOURCE_DIFFUSION_ONE_DIM_1, &
    & CMFE_EQUATIONS_SET_EXPONENTIAL_SOURCE_DIFFUSION_ONE_DIM_1,CMFE_EQUATIONS_SET_MULTI_COMP_DIFFUSION_TWO_COMP_TWO_DIM, &
    & CMFE_EQUATIONS_SET_MULTI_COMP_DIFFUSION_TWO_COMP_THREE_DIM,CMFE_EQUATIONS_SET_MULTI_COMP_DIFFUSION_THREE_COMP_THREE_DIM, &
    & CMFE_EQUATIONS_SET_MULTI_COMP_DIFFUSION_FOUR_COMP_THREE_DIM


  PUBLIC CMFE_EQUATIONS_SET_ADVECTION_DIFFUSION_EQUATION_TWO_DIM_1

  PUBLIC CMFE_EQUATIONS_SET_POISEUILLE_EQUATION_TWO_DIM_1

  PUBLIC CMFE_EQUATIONS_SET_BURGERS_EQUATION_ONE_DIM_1,CMFE_EQUATIONS_SET_GENERALISED_BURGERS_EQUATION_ONE_DIM_1, &
    & CMFE_EQUATIONS_SET_GENERALISED_BURGERS_EQUATION_ONE_DIM_2, &
    & CMFE_EQUATIONS_SET_STATIC_BURGERS_EQUATION_ONE_DIM_1

  PUBLIC CMFE_EQUATIONS_SET_POISSON_EQUATION_TWO_DIM_1,CMFE_EQUATIONS_SET_POISSON_EQUATION_TWO_DIM_2, &
    & CMFE_EQUATIONS_SET_POISSON_EQUATION_TWO_DIM_3
  PUBLIC CMFE_EQUATIONS_SET_POISSON_EQUATION_THREE_DIM_1,CMFE_EQUATIONS_SET_POISSON_EQUATION_THREE_DIM_2, &
    & CMFE_EQUATIONS_SET_POISSON_EQUATION_THREE_DIM_3
  PUBLIC CMFE_EQUATIONS_SET_PRESSURE_POISSON_THREE_DIM_1, &
    & CMFE_EQUATIONS_SET_PRESSURE_POISSON_THREE_DIM_2

  PUBLIC CMFE_EQUATIONS_SET_STOKES_EQUATION_TWO_DIM_1,CMFE_EQUATIONS_SET_STOKES_EQUATION_TWO_DIM_2, &
    & CMFE_EQUATIONS_SET_STOKES_EQUATION_TWO_DIM_3
  PUBLIC CMFE_EQUATIONS_SET_STOKES_EQUATION_TWO_DIM_4,CMFE_EQUATIONS_SET_STOKES_EQUATION_TWO_DIM_5
  PUBLIC CMFE_EQUATIONS_SET_STOKES_EQUATION_THREE_DIM_1,CMFE_EQUATIONS_SET_STOKES_EQUATION_THREE_DIM_2, &
    & CMFE_EQUATIONS_SET_STOKES_EQUATION_THREE_DIM_3
  PUBLIC CMFE_EQUATIONS_SET_STOKES_EQUATION_THREE_DIM_4,CMFE_EQUATIONS_SET_STOKES_EQUATION_THREE_DIM_5

  PUBLIC CMFE_EQUATIONS_SET_NAVIER_STOKES_EQUATION_TWO_DIM_POISEUILLE, &
    & CMFE_EQUATIONS_SET_NAVIER_STOKES_EQUATION_TWO_DIM_TAYLOR_GREEN
  PUBLIC CMFE_EQUATIONS_SET_NAVIER_STOKES_EQUATION_FLOWRATE_AORTA, &
    &    CMFE_EQUATIONS_SET_NAVIER_STOKES_EQUATION_SINUSOID, &
    &    CMFE_EQUATIONS_SET_NAVIER_STOKES_EQUATION_SPLINT_FROM_FILE
  PUBLIC CMFE_EQUATIONS_SET_NAVIER_STOKES_EQUATION_TWO_DIM_1,CMFE_EQUATIONS_SET_NAVIER_STOKES_EQUATION_TWO_DIM_2, &
    & CMFE_EQUATIONS_SET_NAVIER_STOKES_EQUATION_TWO_DIM_3
  PUBLIC CMFE_EQUATIONS_SET_NAVIER_STOKES_EQUATION_TWO_DIM_4,CMFE_EQUATIONS_SET_NAVIER_STOKES_EQUATION_TWO_DIM_5
  PUBLIC CMFE_EQUATIONS_SET_NAVIER_STOKES_EQUATION_THREE_DIM_1,CMFE_EQUATIONS_SET_NAVIER_STOKES_EQUATION_THREE_DIM_2, &
    & CMFE_EQUATIONS_SET_NAVIER_STOKES_EQUATION_THREE_DIM_3
  PUBLIC CMFE_EQUATIONS_SET_NAVIER_STOKES_EQUATION_THREE_DIM_4,CMFE_EQUATIONS_SET_NAVIER_STOKES_EQUATION_THREE_DIM_5

  PUBLIC CMFE_EQUATIONS_SET_DARCY_EQUATION_TWO_DIM_1,CMFE_EQUATIONS_SET_DARCY_EQUATION_TWO_DIM_2, &
    & CMFE_EQUATIONS_SET_DARCY_EQUATION_TWO_DIM_3
  PUBLIC CMFE_EQUATIONS_SET_DARCY_EQUATION_THREE_DIM_1,CMFE_EQUATIONS_SET_DARCY_EQUATION_THREE_DIM_2, &
    & CMFE_EQUATIONS_SET_DARCY_EQUATION_THREE_DIM_3
  PUBLIC CMFE_EQUATIONS_SET_INCOMP_ELAST_DARCY_ANALYTIC_DARCY

  PUBLIC CMFE_EQUATIONS_SET_FINITE_ELASTICITY_CYLINDER
  PUBLIC CMFE_FINITE_ELASTICITY_ANALYTIC_CYLINDER_PARAM_PIN_IDX,CMFE_FINITE_ELASTICITY_ANALYTIC_CYLINDER_PARAM_POUT_IDX
  PUBLIC CMFE_FINITE_ELASTICITY_ANALYTIC_CYLINDER_PARAM_LAMBDA_IDX,CMFE_FINITE_ELASTICITY_ANALYTIC_CYLINDER_PARAM_TSI_IDX
  PUBLIC CMFE_FINITE_ELASTICITY_ANALYTIC_CYLINDER_PARAM_RIN_IDX,CMFE_FINITE_ELASTICITY_ANALYTIC_CYLINDER_PARAM_ROUT_IDX
  PUBLIC CMFE_FINITE_ELASTICITY_ANALYTIC_CYLINDER_PARAM_C1_IDX,CMFE_FINITE_ELASTICITY_ANALYTIC_CYLINDER_PARAM_C2_IDX

!!==================================================================================================================================
!!
!! EQUATIONS_SET_ROUTINES
!!
!!==================================================================================================================================

  !Module parameters

  !Module types

  !Module variables

  !Interfaces

  !>Finish the creation of a analytic solution for an equations set. \see OpenCMISS::Iron::cmfe_EquationsSet_AnalyticCreateStart
  INTERFACE cmfe_EquationsSet_AnalyticCreateFinish
    MODULE PROCEDURE cmfe_EquationsSet_AnalyticCreateFinishNumber
    MODULE PROCEDURE cmfe_EquationsSet_AnalyticCreateFinishObj
  END INTERFACE cmfe_EquationsSet_AnalyticCreateFinish

  !>Start the creation of a analytic solution for an equations set. \see OpenCMISS::Iron::cmfe_EquationsSet_AnalyticCreateFinish
  INTERFACE cmfe_EquationsSet_AnalyticCreateStart
    MODULE PROCEDURE cmfe_EquationsSet_AnalyticCreateStartNumber
    MODULE PROCEDURE cmfe_EquationsSet_AnalyticCreateStartObj
  END INTERFACE cmfe_EquationsSet_AnalyticCreateStart

  !>Destroy the analytic solution for an equations set.
  INTERFACE cmfe_EquationsSet_AnalyticDestroy
    MODULE PROCEDURE cmfe_EquationsSet_AnalyticDestroyNumber
    MODULE PROCEDURE cmfe_EquationsSet_AnalyticDestroyObj
  END INTERFACE cmfe_EquationsSet_AnalyticDestroy

  !>Evaluates the current analytic solution for an equations set.
  INTERFACE cmfe_EquationsSet_AnalyticEvaluate
    MODULE PROCEDURE cmfe_EquationsSet_AnalyticEvaluateNumber
    MODULE PROCEDURE cmfe_EquationsSet_AnalyticEvaluateObj
  END INTERFACE cmfe_EquationsSet_AnalyticEvaluate

  !>Returns the analytic time for an equations set.
  INTERFACE cmfe_EquationsSet_AnalyticTimeGet
    MODULE PROCEDURE cmfe_EquationsSet_AnalyticTimeGetNumber
    MODULE PROCEDURE cmfe_EquationsSet_AnalyticTimeGetObj
  END INTERFACE cmfe_EquationsSet_AnalyticTimeGet

  !>Sets/changes the analytic time for an equations set.
  INTERFACE cmfe_EquationsSet_AnalyticTimeSet
    MODULE PROCEDURE cmfe_EquationsSet_AnalyticTimeSetNumber
    MODULE PROCEDURE cmfe_EquationsSet_AnalyticTimeSetObj
  END INTERFACE cmfe_EquationsSet_AnalyticTimeSet

  !>Finish the creation of an equations set. \see OpenCMISS::Iron::cmfe_EquationsSet_CreateStart
  INTERFACE cmfe_EquationsSet_CreateFinish
    MODULE PROCEDURE cmfe_EquationsSet_CreateFinishNumber
    MODULE PROCEDURE cmfe_EquationsSet_CreateFinishObj
  END INTERFACE cmfe_EquationsSet_CreateFinish

  !>Start the creation of an equations set on a region. \see OpenCMISS::Iron::cmfe_EquationsSet_CreateFinish
  INTERFACE cmfe_EquationsSet_CreateStart
    MODULE PROCEDURE cmfe_EquationsSet_CreateStartNumber
    MODULE PROCEDURE cmfe_EquationsSet_CreateStartObj
  END INTERFACE cmfe_EquationsSet_CreateStart

  !>Destroy an equations set.
  INTERFACE cmfe_EquationsSet_Destroy
    MODULE PROCEDURE cmfe_EquationsSet_DestroyNumber
    MODULE PROCEDURE cmfe_EquationsSet_DestroyObj
  END INTERFACE cmfe_EquationsSet_Destroy

  !>Finish the creation of dependent variables for an equations set. \see OpenCMISS::Iron::cmfe_EquationsSet_DependentCreateStart
  INTERFACE cmfe_EquationsSet_DependentCreateFinish
    MODULE PROCEDURE cmfe_EquationsSet_DependentCreateFinishNumber
    MODULE PROCEDURE cmfe_EquationsSet_DependentCreateFinishObj
  END INTERFACE cmfe_EquationsSet_DependentCreateFinish

  !>Start the creation of dependent variables for an equations set. \see OpenCMISS::Iron::cmfe_EquationsSet_DependentCreateFinish
  INTERFACE cmfe_EquationsSet_DependentCreateStart
    MODULE PROCEDURE cmfe_EquationsSet_DependentCreateStartNumber
    MODULE PROCEDURE cmfe_EquationsSet_DependentCreateStartObj
  END INTERFACE cmfe_EquationsSet_DependentCreateStart

  !>Destroy the dependent variables for an equations set.
  INTERFACE cmfe_EquationsSet_DependentDestroy
    MODULE PROCEDURE cmfe_EquationsSet_DependentDestroyNumber
    MODULE PROCEDURE cmfe_EquationsSet_DependentDestroyObj
  END INTERFACE cmfe_EquationsSet_DependentDestroy

  !>Finish the creation of derived variables for an equations set. \see OpenCMISS::Iron::cmfe_EquationsSet_DerivedCreateStart
  INTERFACE cmfe_EquationsSet_DerivedCreateFinish
    MODULE PROCEDURE cmfe_EquationsSet_DerivedCreateFinishNumber
    MODULE PROCEDURE cmfe_EquationsSet_DerivedCreateFinishObj
  END INTERFACE cmfe_EquationsSet_DerivedCreateFinish

  !>Start the creation of derived variables for an equations set. These are used to store any intermediate
  !>calculated values, for example stress and strain fields in an elasticity problem. \see OpenCMISS::Iron::cmfe_EquationsSet_DerivedCreateFinish
  INTERFACE cmfe_EquationsSet_DerivedCreateStart
    MODULE PROCEDURE cmfe_EquationsSet_DerivedCreateStartNumber
    MODULE PROCEDURE cmfe_EquationsSet_DerivedCreateStartObj
  END INTERFACE cmfe_EquationsSet_DerivedCreateStart

  !>Destroy the derived variables for an equations set.
  INTERFACE cmfe_EquationsSet_DerivedDestroy
    MODULE PROCEDURE cmfe_EquationsSet_DerivedDestroyNumber
    MODULE PROCEDURE cmfe_EquationsSet_DerivedDestroyObj
  END INTERFACE cmfe_EquationsSet_DerivedDestroy

  !>Finish the creation of equations for an equations set. \see OpenCMISS::Iron::cmfe_EquationsSet_EquationsCreateStart
  INTERFACE cmfe_EquationsSet_EquationsCreateFinish
    MODULE PROCEDURE cmfe_EquationsSet_EquationsCreateFinishNumber
    MODULE PROCEDURE cmfe_EquationsSet_EquationsCreateFinishObj
  END INTERFACE cmfe_EquationsSet_EquationsCreateFinish

  !>Start the creation of equations for an equations set. \see OpenCMISS::Iron::cmfe_EquationsSet_EquationsCreateFinish
  INTERFACE cmfe_EquationsSet_EquationsCreateStart
    MODULE PROCEDURE cmfe_EquationsSet_EquationsCreateStartNumber
    MODULE PROCEDURE cmfe_EquationsSet_EquationsCreateStartObj
  END INTERFACE cmfe_EquationsSet_EquationsCreateStart

  !>Destroy the equations for an equations set.
  INTERFACE cmfe_EquationsSet_EquationsDestroy
    MODULE PROCEDURE cmfe_EquationsSet_EquationsDestroyNumber
    MODULE PROCEDURE cmfe_EquationsSet_EquationsDestroyObj
  END INTERFACE cmfe_EquationsSet_EquationsDestroy

  !>Finish the creation of independent fields for an equations set. \see OpenCMISS::Iron::cmfe_EquationsSet_IndependentCreateStart
  INTERFACE cmfe_EquationsSet_IndependentCreateFinish
    MODULE PROCEDURE cmfe_EquationsSet_IndependentCreateFinishNumber
    MODULE PROCEDURE cmfe_EquationsSet_IndependentCreateFinishObj
  END INTERFACE cmfe_EquationsSet_IndependentCreateFinish

  !>Start the creation of independent fields for an equations set. \see OpenCMISS::Iron::cmfe_EquationsSet_MaterialsCreateFinish
  INTERFACE cmfe_EquationsSet_IndependentCreateStart
    MODULE PROCEDURE cmfe_EquationsSet_IndependentCreateStartNumber
    MODULE PROCEDURE cmfe_EquationsSet_IndependentCreateStartObj
  END INTERFACE cmfe_EquationsSet_IndependentCreateStart

  !>Destroy the independent fields for an equations set.
  INTERFACE cmfe_EquationsSet_IndependentDestroy
    MODULE PROCEDURE cmfe_EquationsSet_IndependentDestroyNumber
    MODULE PROCEDURE cmfe_EquationsSet_IndependentDestroyObj
  END INTERFACE cmfe_EquationsSet_IndependentDestroy

  !>Finish the creation of materials for an equations set. \see OpenCMISS::Iron::cmfe_EquationsSet_MaterialsCreateStart
  INTERFACE cmfe_EquationsSet_MaterialsCreateFinish
    MODULE PROCEDURE cmfe_EquationsSet_MaterialsCreateFinishNumber
    MODULE PROCEDURE cmfe_EquationsSet_MaterialsCreateFinishObj
  END INTERFACE cmfe_EquationsSet_MaterialsCreateFinish

  !>Start the creation of materials for an equations set. \see OpenCMISS::Iron::cmfe_EquationsSet_MaterialsCreateFinish
  INTERFACE cmfe_EquationsSet_MaterialsCreateStart
    MODULE PROCEDURE cmfe_EquationsSet_MaterialsCreateStartNumber
    MODULE PROCEDURE cmfe_EquationsSet_MaterialsCreateStartObj
  END INTERFACE cmfe_EquationsSet_MaterialsCreateStart

  !>Destroy the materials for an equations set.
  INTERFACE cmfe_EquationsSet_MaterialsDestroy
    MODULE PROCEDURE cmfe_EquationsSet_MaterialsDestroyNumber
    MODULE PROCEDURE cmfe_EquationsSet_MaterialsDestroyObj
  END INTERFACE cmfe_EquationsSet_MaterialsDestroy

  !>Returns the solution method for an equations set.
  INTERFACE cmfe_EquationsSet_SolutionMethodGet
    MODULE PROCEDURE cmfe_EquationsSet_SolutionMethodGetNumber
    MODULE PROCEDURE cmfe_EquationsSet_SolutionMethodGetObj
  END INTERFACE cmfe_EquationsSet_SolutionMethodGet

  !>Sets/changes the solution method for an equations set.
  INTERFACE cmfe_EquationsSet_SolutionMethodSet
    MODULE PROCEDURE cmfe_EquationsSet_SolutionMethodSetNumber
    MODULE PROCEDURE cmfe_EquationsSet_SolutionMethodSetObj
  END INTERFACE cmfe_EquationsSet_SolutionMethodSet

  !>Finish the creation of a source for an equations set. \see OpenCMISS::Iron::cmfe_EquationsSet_SourceCreateStart
  INTERFACE cmfe_EquationsSet_SourceCreateFinish
    MODULE PROCEDURE cmfe_EquationsSet_SourceCreateFinishNumber
    MODULE PROCEDURE cmfe_EquationsSet_SourceCreateFinishObj
  END INTERFACE cmfe_EquationsSet_SourceCreateFinish

  !>Start the creation of a source for an equations set. \see OpenCMISS::Iron::cmfe_EquationsSet_SourceCreateFinish
  INTERFACE cmfe_EquationsSet_SourceCreateStart
    MODULE PROCEDURE cmfe_EquationsSet_SourceCreateStartNumber
    MODULE PROCEDURE cmfe_EquationsSet_SourceCreateStartObj
  END INTERFACE cmfe_EquationsSet_SourceCreateStart

  !>Destroy the source for an equations set.
  INTERFACE cmfe_EquationsSet_SourceDestroy
    MODULE PROCEDURE cmfe_EquationsSet_SourceDestroyNumber
    MODULE PROCEDURE cmfe_EquationsSet_SourceDestroyObj
  END INTERFACE cmfe_EquationsSet_SourceDestroy

  !>Returns the equations set specification array
  INTERFACE cmfe_EquationsSet_SpecificationGet
    MODULE PROCEDURE cmfe_EquationsSet_SpecificationGetNumber
    MODULE PROCEDURE cmfe_EquationsSet_SpecificationGetObj
  END INTERFACE cmfe_EquationsSet_SpecificationGet

  !>Returns the size of the equations set specification array.
  INTERFACE cmfe_EquationsSet_SpecificationSizeGet
    MODULE PROCEDURE cmfe_EquationsSet_SpecificationSizeGetNumber
    MODULE PROCEDURE cmfe_EquationsSet_SpecificationSizeGetObj
  END INTERFACE cmfe_EquationsSet_SpecificationSizeGet

  !>Calculates an output field for the equations set.
  INTERFACE cmfe_EquationsSet_DerivedVariableCalculate
    MODULE PROCEDURE cmfe_EquationsSet_DerivedVariableCalculateNumber
    MODULE PROCEDURE cmfe_EquationsSet_DerivedVariableCalculateObj
  END INTERFACE cmfe_EquationsSet_DerivedVariableCalculate

  !>Set the derived field variable type to be used by a derived variable
  INTERFACE cmfe_EquationsSet_DerivedVariableSet
    MODULE PROCEDURE cmfe_EquationsSet_DerivedVariableSetNumber
    MODULE PROCEDURE cmfe_EquationsSet_DerivedVariableSetObj
  END INTERFACE cmfe_EquationsSet_DerivedVariableSet
  
  !>Evaluate a tensor at a given element xi location.
  INTERFACE cmfe_EquationsSet_TensorInterpolateXi
    MODULE PROCEDURE cmfe_EquationsSet_TensorInterpolateXiNumber
    MODULE PROCEDURE cmfe_EquationsSet_TensorInterpolateXiObj
  END INTERFACE cmfe_EquationsSet_TensorInterpolateXi

  !>Gets the equations set analytic user parameter
  INTERFACE cmfe_EquationsSet_AnalyticUserParamGet
    MODULE PROCEDURE cmfe_EquationsSet_AnalyticUserParamGetNumber
    MODULE PROCEDURE cmfe_EquationsSet_AnalyticUserParamGetObj
  END INTERFACE cmfe_EquationsSet_AnalyticUserParamGet

  !>Sets/changes the equations set analytic user parameter
  INTERFACE cmfe_EquationsSet_AnalyticUserParamSet
    MODULE PROCEDURE cmfe_EquationsSet_AnalyticUserParamSetNumber
    MODULE PROCEDURE cmfe_EquationsSet_AnalyticUserParamSetObj
  END INTERFACE cmfe_EquationsSet_AnalyticUserParamSet

  PUBLIC cmfe_EquationsSet_AnalyticCreateFinish,cmfe_EquationsSet_AnalyticCreateStart

  PUBLIC cmfe_EquationsSet_AnalyticDestroy

  PUBLIC cmfe_EquationsSet_AnalyticEvaluate

  PUBLIC cmfe_EquationsSet_AnalyticTimeGet,cmfe_EquationsSet_AnalyticTimeSet

  PUBLIC cmfe_EquationsSet_CreateFinish,cmfe_EquationsSet_CreateStart

  PUBLIC cmfe_EquationsSet_Destroy

  PUBLIC cmfe_EquationsSet_DependentCreateFinish,cmfe_EquationsSet_DependentCreateStart

  PUBLIC cmfe_EquationsSet_DependentDestroy

  PUBLIC cmfe_EquationsSet_DerivedCreateFinish,cmfe_EquationsSet_DerivedCreateStart

  PUBLIC cmfe_EquationsSet_DerivedDestroy

  PUBLIC cmfe_EquationsSet_DerivedVariableCalculate,cmfe_EquationsSet_DerivedVariableSet

  PUBLIC cmfe_EquationsSet_EquationsCreateFinish,cmfe_EquationsSet_EquationsCreateStart

  PUBLIC cmfe_EquationsSet_EquationsDestroy

  PUBLIC cmfe_EquationsSet_IndependentCreateFinish,cmfe_EquationsSet_IndependentCreateStart

  PUBLIC cmfe_EquationsSet_IndependentDestroy

  PUBLIC cmfe_EquationsSet_MaterialsCreateFinish,cmfe_EquationsSet_MaterialsCreateStart

  PUBLIC cmfe_EquationsSet_MaterialsDestroy

  PUBLIC cmfe_EquationsSet_SolutionMethodGet,cmfe_EquationsSet_SolutionMethodSet

  PUBLIC cmfe_EquationsSet_SourceCreateFinish,cmfe_EquationsSet_SourceCreateStart

  PUBLIC cmfe_EquationsSet_SourceDestroy

  PUBLIC cmfe_EquationsSet_SpecificationGet,cmfe_EquationsSet_SpecificationSizeGet

  PUBLIC cmfe_EquationsSet_TensorInterpolateXi

  PUBLIC cmfe_EquationsSet_AnalyticUserParamSet,cmfe_EquationsSet_AnalyticUserParamGet

!!==================================================================================================================================
!!
!! FIELD_ROUTINES
!!
!!==================================================================================================================================

  !Module parameters

  !> \addtogroup OPENCMISS_FieldConstants OPENCMISS::Field::Constants
  !> \brief Field constants.
  !>@{
  !> \addtogroup OPENCMISS_FieldDependentTypes OPENCMISS::Field::DependentTypes
  !> \brief Depedent field parameter types.
  !> \see OPENCMISS::Field,OPENCMISS
  !>@{
  INTEGER(INTG), PARAMETER :: CMFE_FIELD_INDEPENDENT_TYPE = FIELD_INDEPENDENT_TYPE !<Independent field type \see OPENCMISS_FieldDependentTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_FIELD_DEPENDENT_TYPE = FIELD_DEPENDENT_TYPE !<Dependent field type \see OPENCMISS_FieldDependentTypes,OPENCMISS
  !>@}
  !> \addtogroup OPENCMISS_FieldDimensionTypes OPENCMISS::Field::DimensionTypes
  !> \brief Field dimension parameter types.
  !> \see OPENCMISS::Field,OPENCMISS
  !>@{
  INTEGER(INTG), PARAMETER :: CMFE_FIELD_SCALAR_DIMENSION_TYPE = FIELD_SCALAR_DIMENSION_TYPE !<Scalar field \see OPENCMISS_FieldDimensionTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_FIELD_VECTOR_DIMENSION_TYPE = FIELD_VECTOR_DIMENSION_TYPE !<Vector field \see OPENCMISS_FieldDimensionTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_FIELD_TENSOR_DIMENSION_TYPE = FIELD_TENSOR_DIMENSION_TYPE !<Tensor field \see OPENCMISS_FieldDimensionTypes,OPENCMISS
  !>@}
  !> \addtogroup OPENCMISS_FieldTypes OPENCMISS::Field::Types
  !> \brief Field type parameters.
  !> \see OPENCMISS::Field,OPENCMISS
  !>@{
  INTEGER(INTG), PARAMETER :: CMFE_FIELD_GEOMETRIC_TYPE = FIELD_GEOMETRIC_TYPE !<Geometric field \see OPENCMISS_FieldTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_FIELD_FIBRE_TYPE = FIELD_FIBRE_TYPE !<Fibre field \see OPENCMISS_FieldTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_FIELD_GENERAL_TYPE = FIELD_GENERAL_TYPE !<General field \see OPENCMISS_FieldTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_FIELD_MATERIAL_TYPE = FIELD_MATERIAL_TYPE !<Material field \see OPENCMISS_FieldTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_FIELD_GEOMETRIC_GENERAL_TYPE = FIELD_GEOMETRIC_GENERAL_TYPE !<Geometric general field \see OPENCMISS_FieldTypes,OPENCMISS
  !>@}
  !> \addtogroup OPENCMISS_FieldInterpolationTypes OPENCMISS::Field::InterpolationTypes
  !> \brief Field interpolation parameters.
  !> \see OPENCMISS::Field,OPENCMISS
  !>@{
  INTEGER(INTG), PARAMETER :: CMFE_FIELD_CONSTANT_INTERPOLATION = FIELD_CONSTANT_INTERPOLATION !<Constant interpolation. One parameter for the field \see OPENCMISS_FieldInterpolationTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_FIELD_ELEMENT_BASED_INTERPOLATION = FIELD_ELEMENT_BASED_INTERPOLATION !<Element based interpolation. Parameters are different in each element \see OPENCMISS_FieldInterpolationTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_FIELD_NODE_BASED_INTERPOLATION = FIELD_NODE_BASED_INTERPOLATION !<Node based interpolation. Parameters are nodal based and a basis function is used \see OPENCMISS_FieldInterpolationTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_FIELD_GRID_POINT_BASED_INTERPOLATION = FIELD_GRID_POINT_BASED_INTERPOLATION !<Grid point based interpolation. Parameters are different at each grid point \see OPENCMISS_FieldInterpolationTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_FIELD_GAUSS_POINT_BASED_INTERPOLATION = FIELD_GAUSS_POINT_BASED_INTERPOLATION !<Gauss point based interpolation. Parameters are different at each Gauss point \see OPENCMISS_FieldInterpolationTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_FIELD_DATA_POINT_BASED_INTERPOLATION = FIELD_DATA_POINT_BASED_INTERPOLATION !<Data point based interpolation. Parameters are different at each data point \see OPENCMISS_FieldInterpolationTypes,OPENCMISS
  !>@}
  !> \addtogroup OPENCMISS_FieldVariableTypes OPENCMISS::Field::VariableTypes
  !> \brief Field variable type parameters.
  !> \see OPENCMISS::Field,OPENCMISS
  !>@{
  INTEGER(INTG), PARAMETER :: CMFE_FIELD_NUMBER_OF_VARIABLE_SUBTYPES = FIELD_NUMBER_OF_VARIABLE_SUBTYPES !<The number of subtypes of a variable - i.e., u, du/dn, du/dt, d^2u/dt^2 \see OPENCMISS_FieldVariableTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_FIELD_U_VARIABLE_TYPE = FIELD_U_VARIABLE_TYPE !<Standard variable type i.e., u \see OPENCMISS_FieldVariableTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_FIELD_DELUDELN_VARIABLE_TYPE = FIELD_DELUDELN_VARIABLE_TYPE !<Normal derivative variable type i.e., du/dn \see OPENCMISS_FieldVariableTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_FIELD_DELUDELT_VARIABLE_TYPE = FIELD_DELUDELT_VARIABLE_TYPE !<First time derivative variable type i.e., du/dt \see OPENCMISS_FieldVariableTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_FIELD_DEL2UDELT2_VARIABLE_TYPE = FIELD_DEL2UDELT2_VARIABLE_TYPE !<Second time derivative variable type i.e., d^2u/dt^2 \see OPENCMISS_FieldVariableTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_FIELD_V_VARIABLE_TYPE = FIELD_V_VARIABLE_TYPE !<Second standard variable type i.e., v \see OPENCMISS_FieldVariableTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_FIELD_DELVDELN_VARIABLE_TYPE = FIELD_DELVDELN_VARIABLE_TYPE !<Second normal derivative variable type i.e., dv/dn \see OPENCMISS_FieldVariableTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_FIELD_DELVDELT_VARIABLE_TYPE = FIELD_DELVDELT_VARIABLE_TYPE !<Second first time derivative variable type i.e., dv/dt \see OPENCMISS_FieldVariableTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_FIELD_DEL2VDELT2_VARIABLE_TYPE = FIELD_DEL2VDELT2_VARIABLE_TYPE !<Second second time derivative variable type i.e., d^2v/dt^2 \see OPENCMISS_FieldVariableTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_FIELD_U1_VARIABLE_TYPE = FIELD_U1_VARIABLE_TYPE !<Standard variable type i.e., u \see OPENCMISS_FieldVariableTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_FIELD_DELU1DELN_VARIABLE_TYPE = FIELD_DELU1DELN_VARIABLE_TYPE !<Normal derivative variable type i.e., du/dn \see OPENCMISS_FieldVariableTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_FIELD_DELU1DELT_VARIABLE_TYPE = FIELD_DELU1DELT_VARIABLE_TYPE !<First time derivative variable type i.e., du/dt \see OPENCMISS_FieldVariableTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_FIELD_DEL2U1DELT2_VARIABLE_TYPE = FIELD_DEL2U1DELT2_VARIABLE_TYPE !<Second time derivative variable type i.e., d^2u/dt^2 \see OPENCMISS_FieldVariableTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_FIELD_U2_VARIABLE_TYPE = FIELD_U2_VARIABLE_TYPE !<Standard variable type i.e., u \see OPENCMISS_FieldVariableTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_FIELD_DELU2DELN_VARIABLE_TYPE = FIELD_DELU2DELN_VARIABLE_TYPE !<Normal derivative variable type i.e., du/dn \see OPENCMISS_FieldVariableTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_FIELD_DELU2DELT_VARIABLE_TYPE = FIELD_DELU2DELT_VARIABLE_TYPE !<First time derivative variable type i.e., du/dt \see OPENCMISS_FieldVariableTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_FIELD_DEL2U2DELT2_VARIABLE_TYPE = FIELD_DEL2U2DELT2_VARIABLE_TYPE !<Second time derivative variable type i.e., d^2u/dt^2 \see OPENCMISS_FieldVariableTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_FIELD_U3_VARIABLE_TYPE = FIELD_U3_VARIABLE_TYPE !<Standard variable type i.e., u \see OPENCMISS_FieldVariableTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_FIELD_DELU3DELN_VARIABLE_TYPE = FIELD_DELU3DELN_VARIABLE_TYPE !<Normal derivative variable type i.e., du/dn \see OPENCMISS_FieldVariableTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_FIELD_DELU3DELT_VARIABLE_TYPE = FIELD_DELU3DELT_VARIABLE_TYPE !<First time derivative variable type i.e., du/dt \see OPENCMISS_FieldVariableTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_FIELD_DEL2U3DELT2_VARIABLE_TYPE = FIELD_DEL2U3DELT2_VARIABLE_TYPE !<Second time derivative variable type i.e., d^2u/dt^2 \see OPENCMISS_FieldVariableTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_FIELD_U4_VARIABLE_TYPE = FIELD_U4_VARIABLE_TYPE !<Standard variable type i.e., u \see OPENCMISS_FieldVariableTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_FIELD_DELU4DELN_VARIABLE_TYPE = FIELD_DELU4DELN_VARIABLE_TYPE !<Normal derivative variable type i.e., du/dn \see OPENCMISS_FieldVariableTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_FIELD_DELU4DELT_VARIABLE_TYPE = FIELD_DELU4DELT_VARIABLE_TYPE !<First time derivative variable type i.e., du/dt \see OPENCMISS_FieldVariableTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_FIELD_DEL2U4DELT2_VARIABLE_TYPE = FIELD_DEL2U4DELT2_VARIABLE_TYPE !<Second time derivative variable type i.e., d^2u/dt^2 \see OPENCMISS_FieldVariableTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_FIELD_U5_VARIABLE_TYPE = FIELD_U5_VARIABLE_TYPE !<Standard variable type i.e., u \see OPENCMISS_FieldVariableTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_FIELD_DELU5DELN_VARIABLE_TYPE = FIELD_DELU5DELN_VARIABLE_TYPE !<Normal derivative variable type i.e., du/dn \see OPENCMISS_FieldVariableTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_FIELD_DELU5DELT_VARIABLE_TYPE = FIELD_DELU5DELT_VARIABLE_TYPE !<First time derivative variable type i.e., du/dt \see OPENCMISS_FieldVariableTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_FIELD_DEL2U5DELT2_VARIABLE_TYPE = FIELD_DEL2U5DELT2_VARIABLE_TYPE !<Second time derivative variable type i.e., d^2u/dt^2 \see OPENCMISS_FieldVariableTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_FIELD_U6_VARIABLE_TYPE = FIELD_U6_VARIABLE_TYPE !<Standard variable type i.e., u \see OPENCMISS_FieldVariableTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_FIELD_DELU6DELN_VARIABLE_TYPE = FIELD_DELU6DELN_VARIABLE_TYPE !<Normal derivative variable type i.e., du/dn \see OPENCMISS_FieldVariableTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_FIELD_DELU6DELT_VARIABLE_TYPE = FIELD_DELU6DELT_VARIABLE_TYPE !<First time derivative variable type i.e., du/dt \see OPENCMISS_FieldVariableTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_FIELD_DEL2U6DELT2_VARIABLE_TYPE = FIELD_DEL2U6DELT2_VARIABLE_TYPE !<Second time derivative variable type i.e., d^2u/dt^2 \see OPENCMISS_FieldVariableTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_FIELD_U7_VARIABLE_TYPE = FIELD_U7_VARIABLE_TYPE !<Standard variable type i.e., u \see OPENCMISS_FieldVariableTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_FIELD_DELU7DELN_VARIABLE_TYPE = FIELD_DELU7DELN_VARIABLE_TYPE !<Normal derivative variable type i.e., du/dn \see OPENCMISS_FieldVariableTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_FIELD_DELU7DELT_VARIABLE_TYPE = FIELD_DELU7DELT_VARIABLE_TYPE !<First time derivative variable type i.e., du/dt \see OPENCMISS_FieldVariableTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_FIELD_DEL2U7DELT2_VARIABLE_TYPE = FIELD_DEL2U7DELT2_VARIABLE_TYPE !<Second time derivative variable type i.e., d^2u/dt^2 \see OPENCMISS_FieldVariableTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_FIELD_U8_VARIABLE_TYPE = FIELD_U8_VARIABLE_TYPE !<Standard variable type i.e., u \see OPENCMISS_FieldVariableTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_FIELD_DELU8DELN_VARIABLE_TYPE = FIELD_DELU8DELN_VARIABLE_TYPE !<Normal derivative variable type i.e., du/dn \see OPENCMISS_FieldVariableTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_FIELD_DELU8DELT_VARIABLE_TYPE = FIELD_DELU8DELT_VARIABLE_TYPE !<First time derivative variable type i.e., du/dt \see OPENCMISS_FieldVariableTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_FIELD_DEL2U8DELT2_VARIABLE_TYPE = FIELD_DEL2U8DELT2_VARIABLE_TYPE !<Second time derivative variable type i.e., d^2u/dt^2 \see OPENCMISS_FieldVariableTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_FIELD_U9_VARIABLE_TYPE = FIELD_U9_VARIABLE_TYPE !<Standard variable type i.e., u \see OPENCMISS_FieldVariableTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_FIELD_DELU9DELN_VARIABLE_TYPE = FIELD_DELU9DELN_VARIABLE_TYPE !<Normal derivative variable type i.e., du/dn \see OPENCMISS_FieldVariableTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_FIELD_DELU9DELT_VARIABLE_TYPE = FIELD_DELU9DELT_VARIABLE_TYPE !<First time derivative variable type i.e., du/dt \see OPENCMISS_FieldVariableTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_FIELD_DEL2U9DELT2_VARIABLE_TYPE = FIELD_DEL2U9DELT2_VARIABLE_TYPE !<Second time derivative variable type i.e., d^2u/dt^2 \see OPENCMISS_FieldVariableTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_FIELD_U10_VARIABLE_TYPE = FIELD_U10_VARIABLE_TYPE !<Standard variable type i.e., u \see OPENCMISS_FieldVariableTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_FIELD_DELU10DELN_VARIABLE_TYPE = FIELD_DELU10DELN_VARIABLE_TYPE !<Normal derivative variable type i.e., du/dn \see OPENCMISS_FieldVariableTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_FIELD_DELU10DELT_VARIABLE_TYPE = FIELD_DELU10DELT_VARIABLE_TYPE !<First time derivative variable type i.e., du/dt \see OPENCMISS_FieldVariableTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_FIELD_DEL2U10DELT2_VARIABLE_TYPE = FIELD_DEL2U10DELT2_VARIABLE_TYPE !<Second time derivative variable type i.e., d^2u/dt^2 \see OPENCMISS_FieldVariableTypes,OPENCMISS
  !>@}
  !> \addtogroup OPENCMISS_FieldDataTypes OPENCMISS::Field::DataTypes
  !> \brief Field data types
  !> \see OPENCMISS::Field,OPENCMISS
  !>@{
  INTEGER(INTG), PARAMETER :: CMFE_FIELD_INTG_TYPE = FIELD_INTG_TYPE !<Integer field data type \see OPENCMISS_FieldDataTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_FIELD_SP_TYPE = FIELD_SP_TYPE !<Single precision real field data type \see OPENCMISS_FieldDataTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_FIELD_DP_TYPE = FIELD_DP_TYPE !<Double precision real field data type \see OPENCMISS_FieldDataTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_FIELD_L_TYPE = FIELD_L_TYPE !<Logical field data type \see OPENCMISS_FieldDataTypes,OPENCMISS
  !>@}
  !> \addtogroup OPENCMISS_FieldDOFOrderTypes OPENCMISS::Field::DOFOrderTypes
  !> \brief Field DOF order types
  !> \see OPENCMISS::Field,OPENCMISS
  !>@{
  INTEGER(INTG), PARAMETER :: CMFE_FIELD_SEPARATED_COMPONENT_DOF_ORDER = FIELD_SEPARATED_COMPONENT_DOF_ORDER !<Field variable component dofs are not contiguous \see OPENCMISS_FieldDOFOrderTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_FIELD_CONTIGUOUS_COMPONENT_DOF_ORDER = FIELD_CONTIGUOUS_COMPONENT_DOF_ORDER !<Field variable component dofs are contiguous \see OPENCMISS_FieldDOFOrderTypes,OPENCMISS
  !>@}
  !> \addtogroup OPENCMISS_FieldParameterSetTypes OPENCMISS::Field::ParameterSetTypes
  !> \brief Field parameter set type parameters
  !> \see OPENCMISS::Field,OPENCMISS
  !>@{
  INTEGER(INTG), PARAMETER :: CMFE_FIELD_VALUES_SET_TYPE = FIELD_VALUES_SET_TYPE !<The parameter set corresponding to the field values (at time T+DT for dynamic problems) \see OPENCMISS_FieldParameterSetTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_FIELD_BOUNDARY_CONDITIONS_SET_TYPE = FIELD_BOUNDARY_CONDITIONS_SET_TYPE !<The parameter set corresponding to the field boundary condition values \see OPENCMISS_FieldParameterSetTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_FIELD_INITIAL_VALUES_SET_TYPE = FIELD_INITIAL_VALUES_SET_TYPE !<The parameter set corresponding to the field initial values \see OPENCMISS_FieldParameterSetTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_FIELD_INCREMENTAL_VALUES_SET_TYPE = FIELD_INCREMENTAL_VALUES_SET_TYPE !<The parameter set corresponding to the field incremental values \see OPENCMISS_FieldParameterSetTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_FIELD_ANALYTIC_VALUES_SET_TYPE = FIELD_ANALYTIC_VALUES_SET_TYPE !<The parameter set corresponding to the analytic field values \see OPENCMISS_FieldParameterSetTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_FIELD_PREVIOUS_VALUES_SET_TYPE = FIELD_PREVIOUS_VALUES_SET_TYPE !<The parameter set corresponding to the previous field values (at time T) \see OPENCMISS_FieldParameterSetTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_FIELD_MEAN_PREDICTED_DISPLACEMENT_SET_TYPE = FIELD_MEAN_PREDICTED_DISPLACEMENT_SET_TYPE !<The parameter set corresponding to the mean predicited avalues (at time T+DT) \see OPENCMISS_FieldParameterSetTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_FIELD_VELOCITY_VALUES_SET_TYPE = FIELD_VELOCITY_VALUES_SET_TYPE !<The parameter set corresponding to the velocity values (at time T+DT) \see OPENCMISS_FieldParameterSetTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_FIELD_INITIAL_VELOCITY_SET_TYPE = FIELD_INITIAL_VELOCITY_SET_TYPE !<The parameter set corresponding to the initial velocity values for dynamic problems. This is also the previous velocity values \see OPENCMISS_FieldParameterSetTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_FIELD_PREVIOUS_VELOCITY_SET_TYPE = FIELD_PREVIOUS_VELOCITY_SET_TYPE !<The parameter set corresponding to the previous velocity values (at time T). This is also the initial velocity values for dynamic problems. \see OPENCMISS_FieldParameterSetTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_FIELD_MEAN_PREDICTED_VELOCITY_SET_TYPE = FIELD_MEAN_PREDICTED_VELOCITY_SET_TYPE !<The parameter set corresponding to the mean predicited velocity values (at time T+DT) \see OPENCMISS_FieldParameterSetTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_FIELD_ACCELERATION_VALUES_SET_TYPE = FIELD_ACCELERATION_VALUES_SET_TYPE !<The parameter set corresponding to the acceleration values (at time T+DT) \see OPENCMISS_FieldParameterSetTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_FIELD_INITIAL_ACCELERATION_SET_TYPE = FIELD_INITIAL_ACCELERATION_SET_TYPE !<The parameter set corresponding to the initial acceleration values for dynamic problems. This is also the previous accelearation values \see OPENCMISS_FieldParameterSetTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_FIELD_PREVIOUS_ACCELERATION_SET_TYPE = FIELD_PREVIOUS_ACCELERATION_SET_TYPE !<The parameter set corresponding to the previous acceleration values (at time T).This is also the initial acceleration values for dynamic problems. \see OPENCMISS_FieldParameterSetTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_FIELD_MEAN_PREDICTED_ACCELERATION_SET_TYPE = FIELD_MEAN_PREDICTED_ACCELERATION_SET_TYPE !<The parameter set corresponding to the mean predicited acceleration values (at time T+DT) \see OPENCMISS_FieldParameterSetTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_FIELD_PRESSURE_VALUES_SET_TYPE = FIELD_PRESSURE_VALUES_SET_TYPE !<The parameter set corresponding to the surface pressure values. \see OPENCMISS_FieldParameterSetTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_FIELD_PREVIOUS_PRESSURE_SET_TYPE = FIELD_PREVIOUS_PRESSURE_SET_TYPE !<The parameter set corresponding to the previous surface pressure values (at time T). \see OPENCMISS_FieldParameterSetTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_FIELD_IMPERMEABLE_FLAG_VALUES_SET_TYPE = FIELD_IMPERMEABLE_FLAG_VALUES_SET_TYPE !<The parameter set corresponding to the impermeable flag values. \see OPENCMISS_FieldParameterSetTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_FIELD_INTEGRATED_NEUMANN_SET_TYPE = FIELD_INTEGRATED_NEUMANN_SET_TYPE !<Stores integrated Neumann values calculated from Neumann point values. \see OPENCMISS_FieldParameterSetTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_FIELD_MESH_DISPLACEMENT_SET_TYPE=FIELD_MESH_DISPLACEMENT_SET_TYPE !<The parameter set corresponding to the mesh displacement values for ALE \see OPENCMISS_FieldParameterSetTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_FIELD_MESH_VELOCITY_SET_TYPE=FIELD_MESH_VELOCITY_SET_TYPE !<The parameter set corresponding to the mesh velocity values for ALE \see OPENCMISS_FieldParameterSetTypes,OPENCMISS
  !>@}
  !> \addtogroup OPENCMISS_FieldScalingTypes OPENCMISS::Field::ScalingTypes
  !> \brief Field scaling type parameters
  !> \see OPENCMISS::Field,OPENCMISS
  !>@{
  INTEGER(INTG), PARAMETER :: CMFE_FIELD_NO_SCALING = FIELD_NO_SCALING !<The field is not scaled \see OPENCMISS_FieldScalingTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_FIELD_UNIT_SCALING = FIELD_UNIT_SCALING !<The field has unit scaling \see OPENCMISS_FieldScalingTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_FIELD_ARC_LENGTH_SCALING = FIELD_ARC_LENGTH_SCALING !<The field has arc length scaling \see OPENCMISS_FieldScalingTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_FIELD_ARITHMETIC_MEAN_SCALING = FIELD_ARITHMETIC_MEAN_SCALING !<The field has arithmetic mean of the arc length scaling \see OPENCMISS_FieldScalingTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_FIELD_GEOMETRIC_MEAN_SCALING = FIELD_GEOMETRIC_MEAN_SCALING !<The field has geometric mean of the arc length scaling \see OPENCMISS_FieldScalingTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_FIELD_HARMONIC_MEAN_SCALING = FIELD_HARMONIC_MEAN_SCALING !<The field has geometric mean of the arc length scaling \see OPENCMISS_FieldScalingTypes,OPENCMISS
  !>@}
  !>@}

  !Module types

  !Module variables

  !Interfaces

  !>Returns the interpolation type for a field variable component.
  INTERFACE cmfe_Field_ComponentInterpolationGet
    MODULE PROCEDURE cmfe_Field_ComponentInterpolationGetNumber
    MODULE PROCEDURE cmfe_Field_ComponentInterpolationGetObj
  END INTERFACE cmfe_Field_ComponentInterpolationGet

  !>Sets/changes the interpolation type for a field variable component.
  INTERFACE cmfe_Field_ComponentInterpolationSet
    MODULE PROCEDURE cmfe_Field_ComponentInterpolationSetNumber
    MODULE PROCEDURE cmfe_Field_ComponentInterpolationSetObj
  END INTERFACE cmfe_Field_ComponentInterpolationSet

  !>Returns the label for a field variable component.
  INTERFACE cmfe_Field_ComponentLabelGet
    MODULE PROCEDURE cmfe_Field_ComponentLabelGetCNumber
    MODULE PROCEDURE cmfe_Field_ComponentLabelGetCObj
    MODULE PROCEDURE cmfe_Field_ComponentLabelGetVSNumber
    MODULE PROCEDURE cmfe_Field_ComponentLabelGetVSObj
  END INTERFACE cmfe_Field_ComponentLabelGet

  !>Sets/changes the label for a field variable component.
  INTERFACE cmfe_Field_ComponentLabelSet
    MODULE PROCEDURE cmfe_Field_ComponentLabelSetCNumber
    MODULE PROCEDURE cmfe_Field_ComponentLabelSetCObj
    MODULE PROCEDURE cmfe_Field_ComponentLabelSetVSNumber
    MODULE PROCEDURE cmfe_Field_ComponentLabelSetVSObj
  END INTERFACE cmfe_Field_ComponentLabelSet

  !>Returns the mesh component number for a field variable component.
  INTERFACE cmfe_Field_ComponentMeshComponentGet
    MODULE PROCEDURE cmfe_Field_ComponentMeshComponentGetNumber
    MODULE PROCEDURE cmfe_Field_ComponentMeshComponentGetObj
  END INTERFACE cmfe_Field_ComponentMeshComponentGet

  !>Sets/changes the mesh component number for a field variable component.
  INTERFACE cmfe_Field_ComponentMeshComponentSet
    MODULE PROCEDURE cmfe_Field_ComponentMeshComponentSetNumber
    MODULE PROCEDURE cmfe_Field_ComponentMeshComponentSetObj
  END INTERFACE cmfe_Field_ComponentMeshComponentSet

  !>Initialises the values of a parameter set of a field variable component to a constant value.
  INTERFACE cmfe_Field_ComponentValuesInitialise
    MODULE PROCEDURE cmfe_Field_ComponentValuesInitialiseIntgNumber
    MODULE PROCEDURE cmfe_Field_ComponentValuesInitialiseIntgObj
    MODULE PROCEDURE cmfe_Field_ComponentValuesInitialiseSPNumber
    MODULE PROCEDURE cmfe_Field_ComponentValuesInitialiseSPObj
    MODULE PROCEDURE cmfe_Field_ComponentValuesInitialiseDPNumber
    MODULE PROCEDURE cmfe_Field_ComponentValuesInitialiseDPObj
    MODULE PROCEDURE cmfe_Field_ComponentValuesInitialiseLNumber
    MODULE PROCEDURE cmfe_Field_ComponentValuesInitialiseLObj
  END INTERFACE cmfe_Field_ComponentValuesInitialise

  !>Returns the data type for a field variable.
  INTERFACE cmfe_Field_DataTypeGet
    MODULE PROCEDURE cmfe_Field_DataTypeGetNumber
    MODULE PROCEDURE cmfe_Field_DataTypeGetObj
  END INTERFACE cmfe_Field_DataTypeGet

  !>Sets/changes the data type for a field variable.
  INTERFACE cmfe_Field_DataTypeSet
    MODULE PROCEDURE cmfe_Field_DataTypeSetNumber
    MODULE PROCEDURE cmfe_Field_DataTypeSetObj
  END INTERFACE cmfe_Field_DataTypeSet

  !>Returns the DOF order type for a field variable.
  INTERFACE cmfe_Field_DOFOrderTypeGet
    MODULE PROCEDURE cmfe_Field_DOFOrderTypeGetNumber
    MODULE PROCEDURE cmfe_Field_DOFOrderTypeGetObj
  END INTERFACE cmfe_Field_DOFOrderTypeGet

  !>Sets/changes the DOF order type for a field variable. Note: for contiguous coponent DOF ordering all the components of the field variable must have the same interpolation type.
  INTERFACE cmfe_Field_DOFOrderTypeSet
    MODULE PROCEDURE cmfe_Field_DOFOrderTypeSetNumber
    MODULE PROCEDURE cmfe_Field_DOFOrderTypeSetObj
  END INTERFACE cmfe_Field_DOFOrderTypeSet

  !>Finishes the creation of a field. \see OpenCMISS::Iron::cmfe_Field_CreateStart
  INTERFACE cmfe_Field_CreateFinish
    MODULE PROCEDURE cmfe_Field_CreateFinishNumber
    MODULE PROCEDURE cmfe_Field_CreateFinishObj
  END INTERFACE cmfe_Field_CreateFinish

  !>Starts the creation of a field. \see OpenCMISS::Iron::cmfe_Field_CreateFinish
  INTERFACE cmfe_Field_CreateStart
    MODULE PROCEDURE cmfe_Field_CreateStartNumber
    MODULE PROCEDURE cmfe_Field_CreateStartInterfaceObj
    MODULE PROCEDURE cmfe_Field_CreateStartRegionObj
  END INTERFACE cmfe_Field_CreateStart

  !>Returns the dependent type for a field.
  INTERFACE cmfe_Field_DependentTypeGet
    MODULE PROCEDURE cmfe_Field_DependentTypeGetNumber
    MODULE PROCEDURE cmfe_Field_DependentTypeGetObj
  END INTERFACE cmfe_Field_DependentTypeGet

  !>Sets/changes the dependent type for a field.
  INTERFACE cmfe_Field_DependentTypeSet
    MODULE PROCEDURE cmfe_Field_DependentTypeSetNumber
    MODULE PROCEDURE cmfe_Field_DependentTypeSetObj
  END INTERFACE cmfe_Field_DependentTypeSet

  !>Destroys a field.
  INTERFACE cmfe_Field_Destroy
    MODULE PROCEDURE cmfe_Field_DestroyNumber
    MODULE PROCEDURE cmfe_Field_DestroyObj
  END INTERFACE cmfe_Field_Destroy

  !>Returns the field dimension for a field variable.
  INTERFACE cmfe_Field_DimensionGet
    MODULE PROCEDURE cmfe_Field_DimensionGetNumber
    MODULE PROCEDURE cmfe_Field_DimensionGetObj
  END INTERFACE cmfe_Field_DimensionGet

  !>Sets/changes the field dimension for a field variable.
  INTERFACE cmfe_Field_DimensionSet
    MODULE PROCEDURE cmfe_Field_DimensionSetNumber
    MODULE PROCEDURE cmfe_Field_DimensionSetObj
  END INTERFACE cmfe_Field_DimensionSet

  !>Returns the geometric field for a field.
  INTERFACE cmfe_Field_GeometricFieldGet
    MODULE PROCEDURE cmfe_Field_GeometricFieldGetNumber
    MODULE PROCEDURE cmfe_Field_GeometricFieldGetObj
  END INTERFACE cmfe_Field_GeometricFieldGet

  !>Sets/changes the geometric field for a field.
  INTERFACE cmfe_Field_GeometricFieldSet
    MODULE PROCEDURE cmfe_Field_GeometricFieldSetNumber
    MODULE PROCEDURE cmfe_Field_GeometricFieldSetObj
  END INTERFACE cmfe_Field_GeometricFieldSet

  !>Gets line lengths from a geometric field given an element number and element basis line number.
  INTERFACE cmfe_Field_GeometricParametersElementLineLengthGet
    MODULE PROCEDURE cmfe_Field_GeometricParametersElementLineLengthGetNumber
    MODULE PROCEDURE cmfe_Field_GeometricParametersElementLineLengthGetObj
  END INTERFACE cmfe_Field_GeometricParametersElementLineLengthGet

  !>Gets volumes from a geometric field given an element number.
  INTERFACE cmfe_Field_GeometricParametersElementVolumeGet
    MODULE PROCEDURE cmfe_Field_GeometricParametersElementVolumeGetNumber
    MODULE PROCEDURE cmfe_Field_GeometricParametersElementVolumeGetObj
  END INTERFACE cmfe_Field_GeometricParametersElementVolumeGet

 !>Returns the label for a field.
  INTERFACE cmfe_Field_LabelGet
    MODULE PROCEDURE cmfe_Field_LabelGetCNumber
    MODULE PROCEDURE cmfe_Field_LabelGetCObj
    MODULE PROCEDURE cmfe_Field_LabelGetVSNumber
    MODULE PROCEDURE cmfe_Field_LabelGetVSObj
  END INTERFACE cmfe_Field_LabelGet

  !>Sets/changes the label for a field.
  INTERFACE cmfe_Field_LabelSet
    MODULE PROCEDURE cmfe_Field_LabelSetCNumber
    MODULE PROCEDURE cmfe_Field_LabelSetCObj
    MODULE PROCEDURE cmfe_Field_LabelSetVSNumber
    MODULE PROCEDURE cmfe_Field_LabelSetVSObj
  END INTERFACE cmfe_Field_LabelSet

  INTERFACE cmfe_Field_PositionNormalTangentCalculateNode
    MODULE PROCEDURE cmfe_Field_PositionNormalTangentCalculateNodeNumber
    MODULE PROCEDURE cmfe_Field_PositionNormalTangentCalculateNodeObj
  END INTERFACE

  !>Returns the mesh decomposition for a field.
  INTERFACE cmfe_Field_MeshDecompositionGet
    MODULE PROCEDURE cmfe_Field_MeshDecompositionGetNumber
    MODULE PROCEDURE cmfe_Field_MeshDecompositionGetObj
  END INTERFACE cmfe_Field_MeshDecompositionGet

  !>Sets/changes the mesh decomposition for a field. \todo remove when fields take decomposition argument on creation???
  INTERFACE cmfe_Field_MeshDecompositionSet
    MODULE PROCEDURE cmfe_Field_MeshDecompositionSetNumber
    MODULE PROCEDURE cmfe_Field_MeshDecompositionSetObj
  END INTERFACE cmfe_Field_MeshDecompositionSet

  !>Sets/changes the data projection for a field.
  INTERFACE cmfe_Field_DataProjectionSet
    MODULE PROCEDURE cmfe_Field_DataProjectionSetNumber
    MODULE PROCEDURE cmfe_Field_DataProjectionSetObj
  END INTERFACE cmfe_Field_DataProjectionSet

  !>Returns the number of field components for a field variable.
  INTERFACE cmfe_Field_NumberOfComponentsGet
    MODULE PROCEDURE cmfe_Field_NumberOfComponentsGetNumber
    MODULE PROCEDURE cmfe_Field_NumberOfComponentsGetObj
  END INTERFACE cmfe_Field_NumberOfComponentsGet

  !>Sets/changes the number of field components for a field variable.
  INTERFACE cmfe_Field_NumberOfComponentsSet
    MODULE PROCEDURE cmfe_Field_NumberOfComponentsSetNumber
    MODULE PROCEDURE cmfe_Field_NumberOfComponentsSetObj
  END INTERFACE cmfe_Field_NumberOfComponentsSet

  !>Returns the number of field variables for a field.
  INTERFACE cmfe_Field_NumberOfVariablesGet
    MODULE PROCEDURE cmfe_Field_NumberOfVariablesGetNumber
    MODULE PROCEDURE cmfe_Field_NumberOfVariablesGetObj
  END INTERFACE cmfe_Field_NumberOfVariablesGet

  !>Sets/changes the number of field variables for a field.
  INTERFACE cmfe_Field_NumberOfVariablesSet
    MODULE PROCEDURE cmfe_Field_NumberOfVariablesSetNumber
    MODULE PROCEDURE cmfe_Field_NumberOfVariablesSetObj
  END INTERFACE cmfe_Field_NumberOfVariablesSet

  !>Adds the given value to the given parameter set for the constant of the field variable component.
  INTERFACE cmfe_Field_ParameterSetAddConstant
    MODULE PROCEDURE cmfe_Field_ParameterSetAddConstantIntgNumber
    MODULE PROCEDURE cmfe_Field_ParameterSetAddConstantIntgObj
    MODULE PROCEDURE cmfe_Field_ParameterSetAddConstantSPNumber
    MODULE PROCEDURE cmfe_Field_ParameterSetAddConstantSPObj
    MODULE PROCEDURE cmfe_Field_ParameterSetAddConstantDPNumber
    MODULE PROCEDURE cmfe_Field_ParameterSetAddConstantDPObj
    MODULE PROCEDURE cmfe_Field_ParameterSetAddConstantLNumber
    MODULE PROCEDURE cmfe_Field_ParameterSetAddConstantLObj
  END INTERFACE cmfe_Field_ParameterSetAddConstant

  !>Adds the given value to the given parameter set for a particular user element of the field variable component.
  INTERFACE cmfe_Field_ParameterSetAddElement
    MODULE PROCEDURE cmfe_Field_ParameterSetAddElementIntgNumber
    MODULE PROCEDURE cmfe_Field_ParameterSetAddElementIntgObj
    MODULE PROCEDURE cmfe_Field_ParameterSetAddElementSPNumber
    MODULE PROCEDURE cmfe_Field_ParameterSetAddElementSPObj
    MODULE PROCEDURE cmfe_Field_ParameterSetAddElementDPNumber
    MODULE PROCEDURE cmfe_Field_ParameterSetAddElementDPObj
    MODULE PROCEDURE cmfe_Field_ParameterSetAddElementLNumber
    MODULE PROCEDURE cmfe_Field_ParameterSetAddElementLObj
  END INTERFACE cmfe_Field_ParameterSetAddElement

  !>Adds the given value to the given parameter set for a particular user node of the field variable component.
  INTERFACE cmfe_Field_ParameterSetAddNode
    MODULE PROCEDURE cmfe_Field_ParameterSetAddNodeIntgNumber
    MODULE PROCEDURE cmfe_Field_ParameterSetAddNodeIntgObj
    MODULE PROCEDURE cmfe_Field_ParameterSetAddNodeSPNumber
    MODULE PROCEDURE cmfe_Field_ParameterSetAddNodeSPObj
    MODULE PROCEDURE cmfe_Field_ParameterSetAddNodeDPNumber
    MODULE PROCEDURE cmfe_Field_ParameterSetAddNodeDPObj
    MODULE PROCEDURE cmfe_Field_ParameterSetAddNodeLNumber
    MODULE PROCEDURE cmfe_Field_ParameterSetAddNodeLObj
  END INTERFACE cmfe_Field_ParameterSetAddNode

  !>Creates a new parameter set of type set type for a field variable.
  INTERFACE cmfe_Field_ParameterSetCreate
    MODULE PROCEDURE cmfe_Field_ParameterSetCreateNumber
    MODULE PROCEDURE cmfe_Field_ParameterSetCreateObj
  END INTERFACE cmfe_Field_ParameterSetCreate

  !>Destroy a parameter set of type set type for a field variable.
  INTERFACE cmfe_Field_ParameterSetDestroy
    MODULE PROCEDURE cmfe_Field_ParameterSetDestroyNumber
    MODULE PROCEDURE cmfe_Field_ParameterSetDestroyObj
  END INTERFACE cmfe_Field_ParameterSetDestroy

  !>Returns a pointer to the specified field parameter set local data array. The pointer must be restored with a call to OpenCMISS::Iron::cmfe_Field_ParameterSetDataRestore call. Note: the values can be used for read operations but a field parameter set update or add calls must be used to change any values.
  INTERFACE cmfe_Field_ParameterSetDataGet
    MODULE PROCEDURE cmfe_Field_ParameterSetDataGetIntgNumber
    MODULE PROCEDURE cmfe_Field_ParameterSetDataGetIntgObj
    MODULE PROCEDURE cmfe_Field_ParameterSetDataGetSPNumber
    MODULE PROCEDURE cmfe_Field_ParameterSetDataGetSPObj
    MODULE PROCEDURE cmfe_Field_ParameterSetDataGetDPNumber
    MODULE PROCEDURE cmfe_Field_ParameterSetDataGetDPObj
    MODULE PROCEDURE cmfe_Field_ParameterSetDataGetLNumber
    MODULE PROCEDURE cmfe_Field_ParameterSetDataGetLObj
  END INTERFACE cmfe_Field_ParameterSetDataGet

  !>Restores the specified field variable parameter set local array that was obtained with an OpenCMISS::Iron::cmfe_Field_ParameterSetDataGet call.
  INTERFACE cmfe_Field_ParameterSetDataRestore
    MODULE PROCEDURE cmfe_Field_ParameterSetDataRestoreIntgNumber
    MODULE PROCEDURE cmfe_Field_ParameterSetDataRestoreIntgObj
    MODULE PROCEDURE cmfe_Field_ParameterSetDataRestoreSPNumber
    MODULE PROCEDURE cmfe_Field_ParameterSetDataRestoreSPObj
    MODULE PROCEDURE cmfe_Field_ParameterSetDataRestoreDPNumber
    MODULE PROCEDURE cmfe_Field_ParameterSetDataRestoreDPObj
    MODULE PROCEDURE cmfe_Field_ParameterSetDataRestoreLNumber
    MODULE PROCEDURE cmfe_Field_ParameterSetDataRestoreLObj
  END INTERFACE cmfe_Field_ParameterSetDataRestore

  !>Returns from the given parameter set a value for the specified constant of a field variable component.
  INTERFACE cmfe_Field_ParameterSetGetConstant
    MODULE PROCEDURE cmfe_Field_ParameterSetGetConstantIntgNumber
    MODULE PROCEDURE cmfe_Field_ParameterSetGetConstantIntgObj
    MODULE PROCEDURE cmfe_Field_ParameterSetGetConstantSPNumber
    MODULE PROCEDURE cmfe_Field_ParameterSetGetConstantSPObj
    MODULE PROCEDURE cmfe_Field_ParameterSetGetConstantDPNumber
    MODULE PROCEDURE cmfe_Field_ParameterSetGetConstantDPObj
    MODULE PROCEDURE cmfe_Field_ParameterSetGetConstantLNumber
    MODULE PROCEDURE cmfe_Field_ParameterSetGetConstantLObj
  END INTERFACE cmfe_Field_ParameterSetGetConstant
  
  !>Returns from the given parameter set a value for the specified data pont of a field variable component.
  INTERFACE cmfe_Field_ParameterSetGetDataPoint
    MODULE PROCEDURE cmfe_Field_ParameterSetGetDataPointIntgNumberI !Interface
    MODULE PROCEDURE cmfe_Field_ParameterSetGetDataPointIntgNumberR !Region
    MODULE PROCEDURE cmfe_Field_ParameterSetGetDataPointIntgObj
    MODULE PROCEDURE cmfe_Field_ParameterSetGetDataPointSPNumberI !Interface
    MODULE PROCEDURE cmfe_Field_ParameterSetGetDataPointSPNumberR !Region
    MODULE PROCEDURE cmfe_Field_ParameterSetGetDataPointSPObj
    MODULE PROCEDURE cmfe_Field_ParameterSetGetDataPointDPNumberI !Interface
    MODULE PROCEDURE cmfe_Field_ParameterSetGetDataPointDPNumberR !Region
    MODULE PROCEDURE cmfe_Field_ParameterSetGetDataPointDPObj
    MODULE PROCEDURE cmfe_Field_ParameterSetGetDataPointLNumberI !Interface
    MODULE PROCEDURE cmfe_Field_ParameterSetGetDataPointLNumberR !Region
    MODULE PROCEDURE cmfe_Field_ParameterSetGetDataPointLObj
  END INTERFACE cmfe_Field_ParameterSetGetDataPoint

  !>Returns from the given parameter set a value for the specified element of a field variable component.
  INTERFACE cmfe_Field_ParameterSetGetElement
    MODULE PROCEDURE cmfe_Field_ParameterSetGetElementIntgNumber
    MODULE PROCEDURE cmfe_Field_ParameterSetGetElementIntgObj
    MODULE PROCEDURE cmfe_Field_ParameterSetGetElementSPNumber
    MODULE PROCEDURE cmfe_Field_ParameterSetGetElementSPObj
    MODULE PROCEDURE cmfe_Field_ParameterSetGetElementDPNumber
    MODULE PROCEDURE cmfe_Field_ParameterSetGetElementDPObj
    MODULE PROCEDURE cmfe_Field_ParameterSetGetElementLNumber
    MODULE PROCEDURE cmfe_Field_ParameterSetGetElementLObj
  END INTERFACE cmfe_Field_ParameterSetGetElement

  !>Returns from the given parameter set a value for the specified node and derivative of a field variable component.
  INTERFACE cmfe_Field_ParameterSetGetNode
    MODULE PROCEDURE cmfe_Field_ParameterSetGetNodeIntgNumber
    MODULE PROCEDURE cmfe_Field_ParameterSetGetNodeIntgObj
    MODULE PROCEDURE cmfe_Field_ParameterSetGetNodeSPNumber
    MODULE PROCEDURE cmfe_Field_ParameterSetGetNodeSPObj
    MODULE PROCEDURE cmfe_Field_ParameterSetGetNodeDPNumber
    MODULE PROCEDURE cmfe_Field_ParameterSetGetNodeDPObj
    MODULE PROCEDURE cmfe_Field_ParameterSetGetNodeLNumber
    MODULE PROCEDURE cmfe_Field_ParameterSetGetNodeLObj
  END INTERFACE cmfe_Field_ParameterSetGetNode

  !>Returns from the given parameter set a value for the specified element and Gauss point of a field variable component.
  INTERFACE cmfe_Field_ParameterSetGetGaussPoint ! TODO: other versions
    MODULE PROCEDURE cmfe_Field_ParameterSetGetGaussPointDPObj
  END INTERFACE cmfe_Field_ParameterSetGetGaussPoint

  !>Updates the given parameter set with the given value for the constant of a field variable component.
  INTERFACE cmfe_Field_ParameterSetUpdateConstant
    MODULE PROCEDURE cmfe_Field_ParameterSetUpdateConstantIntgNumber
    MODULE PROCEDURE cmfe_Field_ParameterSetUpdateConstantIntgObj
    MODULE PROCEDURE cmfe_Field_ParameterSetUpdateConstantSPNumber
    MODULE PROCEDURE cmfe_Field_ParameterSetUpdateConstantSPObj
    MODULE PROCEDURE cmfe_Field_ParameterSetUpdateConstantDPNumber
    MODULE PROCEDURE cmfe_Field_ParameterSetUpdateConstantDPObj
    MODULE PROCEDURE cmfe_Field_ParameterSetUpdateConstantLNumber
    MODULE PROCEDURE cmfe_Field_ParameterSetUpdateConstantLObj
  END INTERFACE cmfe_Field_ParameterSetUpdateConstant
  
  !>Update the given parameter set a value for the specified data pont of a field variable component.
  INTERFACE cmfe_Field_ParameterSetUpdateDataPoint
    MODULE PROCEDURE cmfe_Field_ParameterSetUpdateDataPointIntgNumberI !Interface
    MODULE PROCEDURE cmfe_Field_ParameterSetUpdateDataPointIntgNumberR !Region
    MODULE PROCEDURE cmfe_Field_ParameterSetUpdateDataPointIntgObj
    MODULE PROCEDURE cmfe_Field_ParameterSetUpdateDataPointSPNumberI !Interface
    MODULE PROCEDURE cmfe_Field_ParameterSetUpdateDataPointSPNumberR !Region
    MODULE PROCEDURE cmfe_Field_ParameterSetUpdateDataPointSPObj
    MODULE PROCEDURE cmfe_Field_ParameterSetUpdateDataPointDPNumberI !Interface
    MODULE PROCEDURE cmfe_Field_ParameterSetUpdateDataPointDPNumberR !Region
    MODULE PROCEDURE cmfe_Field_ParameterSetUpdateDataPointDPObj
    MODULE PROCEDURE cmfe_Field_ParameterSetUpdateDataPointLNumberI !Interface
    MODULE PROCEDURE cmfe_Field_ParameterSetUpdateDataPointLNumberR !Region
    MODULE PROCEDURE cmfe_Field_ParameterSetUpdateDataPointLObj
  END INTERFACE cmfe_Field_ParameterSetUpdateDataPoint

  !>Updates the given parameter set with the given value for a particular user element of a field variable component.
  INTERFACE cmfe_Field_ParameterSetUpdateElement
    MODULE PROCEDURE cmfe_Field_ParameterSetUpdateElementIntgNumber
    MODULE PROCEDURE cmfe_Field_ParameterSetUpdateElementIntgObj
    MODULE PROCEDURE cmfe_Field_ParameterSetUpdateElementSPNumber
    MODULE PROCEDURE cmfe_Field_ParameterSetUpdateElementSPObj
    MODULE PROCEDURE cmfe_Field_ParameterSetUpdateElementDPNumber
    MODULE PROCEDURE cmfe_Field_ParameterSetUpdateElementDPObj
    MODULE PROCEDURE cmfe_Field_ParameterSetUpdateElementLNumber
    MODULE PROCEDURE cmfe_Field_ParameterSetUpdateElementLObj
  END INTERFACE cmfe_Field_ParameterSetUpdateElement

  !>Finishes the parameter set update for a field variable. \see OpenCMISS::Iron::cmfe_Field_ParameterSetUpdateStart
  INTERFACE cmfe_Field_ParameterSetUpdateFinish
    MODULE PROCEDURE cmfe_Field_ParameterSetUpdateFinishNumber
    MODULE PROCEDURE cmfe_Field_ParameterSetUpdateFinishObj
  END INTERFACE cmfe_Field_ParameterSetUpdateFinish

  !>Updates the given parameter set with the given value for a particular user node of a field variable component.
  INTERFACE cmfe_Field_ParameterSetUpdateNode
    MODULE PROCEDURE cmfe_Field_ParameterSetUpdateNodeIntgNumber
    MODULE PROCEDURE cmfe_Field_ParameterSetUpdateNodeIntgObj
    MODULE PROCEDURE cmfe_Field_ParameterSetUpdateNodeSPNumber
    MODULE PROCEDURE cmfe_Field_ParameterSetUpdateNodeSPObj
    MODULE PROCEDURE cmfe_Field_ParameterSetUpdateNodeDPNumber
    MODULE PROCEDURE cmfe_Field_ParameterSetUpdateNodeDPObj
    MODULE PROCEDURE cmfe_Field_ParameterSetUpdateNodeLNumber
    MODULE PROCEDURE cmfe_Field_ParameterSetUpdateNodeLObj
  END INTERFACE cmfe_Field_ParameterSetUpdateNode

  !\todo: merge the two types of routines for getting scalefactors under the same interface declaration?
  !>Gets a scale factor for a particular node.
  INTERFACE cmfe_Field_ParameterSetNodeScaleFactorGet
    MODULE PROCEDURE cmfe_Field_ParameterSetNodeScaleFactorGetNumber
    MODULE PROCEDURE cmfe_Field_ParameterSetNodeScaleFactorGetObj
  END INTERFACE cmfe_Field_ParameterSetNodeScaleFactorGet

  !>Gets the scale factors for all nodes
  INTERFACE cmfe_Field_ParameterSetNodeScaleFactorsGet
    MODULE PROCEDURE cmfe_Field_ParameterSetNodeScaleFactorsGetNumber
    MODULE PROCEDURE cmfe_Field_ParameterSetNodeScaleFactorsGetObj
  END INTERFACE cmfe_Field_ParameterSetNodeScaleFactorsGet

  !>Sets a scale factor for a particular node.
  INTERFACE cmfe_Field_ParameterSetNodeScaleFactorSet
    MODULE PROCEDURE cmfe_Field_ParameterSetNodeScaleFactorSetNumber
    MODULE PROCEDURE cmfe_Field_ParameterSetNodeScaleFactorSetObj
  END INTERFACE cmfe_Field_ParameterSetNodeScaleFactorSet

  !>Sets the scale factors for all nodes
  INTERFACE cmfe_Field_ParameterSetNodeScaleFactorsSet
    MODULE PROCEDURE cmfe_Field_ParameterSetNodeScaleFactorsSetNumber
    MODULE PROCEDURE cmfe_Field_ParameterSetNodeScaleFactorsSetObj
  END INTERFACE cmfe_Field_ParameterSetNodeScaleFactorsSet

  !>Gets the number of scalefactor dofs
  INTERFACE cmfe_Field_ParameterSetNodeNumberOfScaleFactorDofsGet
    MODULE PROCEDURE cmfe_Field_ParameterSetNodeNumberOfScaleFactorDofsGetNumber
    MODULE PROCEDURE cmfe_Field_ParameterSetNodeNumberOfScaleFactorDofsGetObj
  END INTERFACE cmfe_Field_ParameterSetNodeNumberOfScaleFactorDofsGet

  !>Updates the given parameter set with the given values for all local dofs of the field variable.  
  INTERFACE cmfe_Field_ParameterSetUpdateLocalDofs
    MODULE PROCEDURE cmfe_Field_ParameterSetUpdateLocalDofsDPObj
    !\todo: add Intg/SP/L routines, both indexed by Number and Obj
  END INTERFACE cmfe_Field_ParameterSetUpdateLocalDofs

  !>Updates the given parameter set with the given value for a particular Gauss point of a field variable component.
  INTERFACE cmfe_Field_ParameterSetUpdateGaussPoint
    MODULE PROCEDURE cmfe_Field_ParameterSetUpdateGaussPointIntgNumber
    MODULE PROCEDURE cmfe_Field_ParameterSetUpdateGaussPointIntgObj
    MODULE PROCEDURE cmfe_Field_ParameterSetUpdateGaussPointSPNumber
    MODULE PROCEDURE cmfe_Field_ParameterSetUpdateGaussPointSPObj
    MODULE PROCEDURE cmfe_Field_ParameterSetUpdateGaussPointDPNumber
    MODULE PROCEDURE cmfe_Field_ParameterSetUpdateGaussPointDPObj
    MODULE PROCEDURE cmfe_Field_ParameterSetUpdateGaussPointLNumber
    MODULE PROCEDURE cmfe_Field_ParameterSetUpdateGaussPointLObj
  END INTERFACE cmfe_Field_ParameterSetUpdateGaussPoint

  !>Interpolates the given parameter set at a specified xi/set of xi locations for specified element and derviative.
  INTERFACE cmfe_Field_ParameterSetInterpolateXi
    MODULE PROCEDURE cmfe_Field_ParameterSetInterpolateSingleXiDPNumber
    MODULE PROCEDURE cmfe_Field_ParameterSetInterpolateSingleXiDPObj
    MODULE PROCEDURE cmfe_Field_ParameterSetInterpolateMultipleXiDPNumber
    MODULE PROCEDURE cmfe_Field_ParameterSetInterpolateMultipleXiDPObj
  END INTERFACE cmfe_Field_ParameterSetInterpolateXi

  !>Interpolates the given parameter set at a specified set of Gauss points for specified element and derviative. When interpolating at multiple Gauss points, if no Gauss points are specified then all Gauss points are interpolated.
  INTERFACE cmfe_Field_ParameterSetInterpolateGauss
    MODULE PROCEDURE cmfe_Field_ParameterSetInterpolateSingleGaussDPNumber
    MODULE PROCEDURE cmfe_Field_ParameterSetInterpolateSingleGaussDPObj
    MODULE PROCEDURE cmfe_Field_ParameterSetInterpolateMultipleGaussDPNumber
    MODULE PROCEDURE cmfe_Field_ParameterSetInterpolateMultipleGaussDPObj
  END INTERFACE CMFE_FIELD_PARAMETERSETINTERPOLATEGAUSS

  !>Updates the given parameter set with the given value for a particular data point of a field variable component.
  INTERFACE cmfe_Field_ParameterSetUpdateElementDataPoint
    MODULE PROCEDURE cmfe_Field_ParameterSetUpdateElementDataPointDPObj
  END INTERFACE cmfe_Field_ParameterSetUpdateElementDataPoint

  !>Starts the parameter set update for a field variable. \see OpenCMISS::Iron::cmfe_Field_ParameterSetUpdateFinish
  INTERFACE cmfe_Field_ParameterSetUpdateStart
    MODULE PROCEDURE cmfe_Field_ParameterSetUpdateStartNumber
    MODULE PROCEDURE cmfe_Field_ParameterSetUpdateStartObj
  END INTERFACE cmfe_Field_ParameterSetUpdateStart

  !>Copy the parameters from the parameter set of a component of a field variable to the paramters of a parameter set of
  !>a component of another field variable.
  INTERFACE cmfe_Field_ParametersToFieldParametersComponentCopy
    MODULE PROCEDURE cmfe_Field_ParametersToFieldParametersComponentCopyNumber
    MODULE PROCEDURE cmfe_Field_ParametersToFieldParametersComponentCopyObj
  END INTERFACE cmfe_Field_ParametersToFieldParametersComponentCopy

  !>Returns the scaling type for a field.
  INTERFACE cmfe_Field_ScalingTypeGet
    MODULE PROCEDURE cmfe_Field_ScalingTypeGetNumber
    MODULE PROCEDURE cmfe_Field_ScalingTypeGetObj
  END INTERFACE cmfe_Field_ScalingTypeGet

  !>Sets/changes the scaling type for a field.
  INTERFACE cmfe_Field_ScalingTypeSet
    MODULE PROCEDURE cmfe_Field_ScalingTypeSetNumber
    MODULE PROCEDURE cmfe_Field_ScalingTypeSetObj
  END INTERFACE cmfe_Field_ScalingTypeSet

  !>Returns the type for a field.
  INTERFACE cmfe_Field_TypeGet
    MODULE PROCEDURE cmfe_Field_TypeGetNumber
    MODULE PROCEDURE cmfe_Field_TypeGetObj
  END INTERFACE cmfe_Field_TypeGet

  !>Sets/changes the type for a field.
  INTERFACE cmfe_Field_TypeSet
    MODULE PROCEDURE cmfe_Field_TypeSetNumber
    MODULE PROCEDURE cmfe_Field_TypeSetObj
  END INTERFACE cmfe_Field_TypeSet

  !>Returns the label for a field variable.
  INTERFACE cmfe_Field_VariableLabelGet
    MODULE PROCEDURE cmfe_Field_VariableLabelGetCNumber
    MODULE PROCEDURE cmfe_Field_VariableLabelGetCObj
    MODULE PROCEDURE cmfe_Field_VariableLabelGetVSNumber
    MODULE PROCEDURE cmfe_Field_VariableLabelGetVSObj
  END INTERFACE cmfe_Field_VariableLabelGet

  !>Sets/changes the label for a field variable.
  INTERFACE cmfe_Field_VariableLabelSet
    MODULE PROCEDURE cmfe_Field_VariableLabelSetCNumber
    MODULE PROCEDURE cmfe_Field_VariableLabelSetCObj
    MODULE PROCEDURE cmfe_Field_VariableLabelSetVSNumber
    MODULE PROCEDURE cmfe_Field_VariableLabelSetVSObj
  END INTERFACE cmfe_Field_VariableLabelSet

  !>Returns the field variable types for a field.
  INTERFACE cmfe_Field_VariableTypesGet
    MODULE PROCEDURE cmfe_Field_VariableTypesGetNumber
    MODULE PROCEDURE cmfe_Field_VariableTypesGetObj
  END INTERFACE cmfe_Field_VariableTypesGet

  !>Sets/changes the field variable types for a field.
  INTERFACE cmfe_Field_VariableTypesSet
    MODULE PROCEDURE cmfe_Field_VariableTypesSetNumber
    MODULE PROCEDURE cmfe_Field_VariableTypesSetObj
  END INTERFACE cmfe_Field_VariableTypesSet


  PUBLIC CMFE_FIELD_DEPENDENT_TYPE,CMFE_FIELD_INDEPENDENT_TYPE

  PUBLIC CMFE_FIELD_SCALAR_DIMENSION_TYPE,CMFE_FIELD_VECTOR_DIMENSION_TYPE,CMFE_FIELD_TENSOR_DIMENSION_TYPE

  PUBLIC CMFE_FIELD_GEOMETRIC_TYPE,CMFE_FIELD_FIBRE_TYPE,CMFE_FIELD_GENERAL_TYPE,CMFE_FIELD_MATERIAL_TYPE, &
    & CMFE_FIELD_GEOMETRIC_GENERAL_TYPE

  PUBLIC CMFE_FIELD_CONSTANT_INTERPOLATION,CMFE_FIELD_ELEMENT_BASED_INTERPOLATION,CMFE_FIELD_NODE_BASED_INTERPOLATION, &
    & CMFE_FIELD_GRID_POINT_BASED_INTERPOLATION,CMFE_FIELD_GAUSS_POINT_BASED_INTERPOLATION, &
    & CMFE_FIELD_DATA_POINT_BASED_INTERPOLATION

  PUBLIC CMFE_FIELD_NUMBER_OF_VARIABLE_SUBTYPES

  PUBLIC CMFE_FIELD_U_VARIABLE_TYPE,CMFE_FIELD_DELUDELN_VARIABLE_TYPE,CMFE_FIELD_DELUDELT_VARIABLE_TYPE, &
    & CMFE_FIELD_DEL2UDELT2_VARIABLE_TYPE, &
    & CMFE_FIELD_V_VARIABLE_TYPE,CMFE_FIELD_DELVDELN_VARIABLE_TYPE,CMFE_FIELD_DELVDELT_VARIABLE_TYPE, &
    & CMFE_FIELD_DEL2VDELT2_VARIABLE_TYPE, &
    & CMFE_FIELD_U1_VARIABLE_TYPE,CMFE_FIELD_DELU1DELN_VARIABLE_TYPE,CMFE_FIELD_DELU1DELT_VARIABLE_TYPE, &
    & CMFE_FIELD_DEL2U1DELT2_VARIABLE_TYPE, &
    & CMFE_FIELD_U2_VARIABLE_TYPE,CMFE_FIELD_DELU2DELN_VARIABLE_TYPE,CMFE_FIELD_DELU2DELT_VARIABLE_TYPE, &
    & CMFE_FIELD_DEL2U2DELT2_VARIABLE_TYPE, &
    & CMFE_FIELD_U3_VARIABLE_TYPE,CMFE_FIELD_DELU3DELN_VARIABLE_TYPE,CMFE_FIELD_DELU3DELT_VARIABLE_TYPE, &
    & CMFE_FIELD_DEL2U3DELT2_VARIABLE_TYPE, &
    & CMFE_FIELD_U4_VARIABLE_TYPE,CMFE_FIELD_DELU4DELN_VARIABLE_TYPE,CMFE_FIELD_DELU4DELT_VARIABLE_TYPE, &
    & CMFE_FIELD_DEL2U4DELT2_VARIABLE_TYPE, &
    & CMFE_FIELD_U5_VARIABLE_TYPE,CMFE_FIELD_DELU5DELN_VARIABLE_TYPE,CMFE_FIELD_DELU5DELT_VARIABLE_TYPE, &
    & CMFE_FIELD_DEL2U5DELT2_VARIABLE_TYPE, &
    & CMFE_FIELD_U6_VARIABLE_TYPE,CMFE_FIELD_DELU6DELN_VARIABLE_TYPE,CMFE_FIELD_DELU6DELT_VARIABLE_TYPE, &
    & CMFE_FIELD_DEL2U6DELT2_VARIABLE_TYPE, &
    & CMFE_FIELD_U7_VARIABLE_TYPE,CMFE_FIELD_DELU7DELN_VARIABLE_TYPE,CMFE_FIELD_DELU7DELT_VARIABLE_TYPE, &
    & CMFE_FIELD_DEL2U7DELT2_VARIABLE_TYPE, &
    & CMFE_FIELD_U8_VARIABLE_TYPE,CMFE_FIELD_DELU8DELN_VARIABLE_TYPE,CMFE_FIELD_DELU8DELT_VARIABLE_TYPE, &
    & CMFE_FIELD_DEL2U8DELT2_VARIABLE_TYPE, &
    & CMFE_FIELD_U9_VARIABLE_TYPE,CMFE_FIELD_DELU9DELN_VARIABLE_TYPE,CMFE_FIELD_DELU9DELT_VARIABLE_TYPE, &
    & CMFE_FIELD_DEL2U9DELT2_VARIABLE_TYPE, &
    & CMFE_FIELD_U10_VARIABLE_TYPE,CMFE_FIELD_DELU10DELN_VARIABLE_TYPE,CMFE_FIELD_DELU10DELT_VARIABLE_TYPE, &
    & CMFE_FIELD_DEL2U10DELT2_VARIABLE_TYPE

  PUBLIC CMFE_FIELD_INTG_TYPE,CMFE_FIELD_SP_TYPE,CMFE_FIELD_DP_TYPE,CMFE_FIELD_L_TYPE

  PUBLIC CMFE_FIELD_SEPARATED_COMPONENT_DOF_ORDER,CMFE_FIELD_CONTIGUOUS_COMPONENT_DOF_ORDER

  PUBLIC CMFE_FIELD_VALUES_SET_TYPE,CMFE_FIELD_INITIAL_VALUES_SET_TYPE,CMFE_FIELD_INCREMENTAL_VALUES_SET_TYPE, &
    & CMFE_FIELD_BOUNDARY_CONDITIONS_SET_TYPE, &
    & CMFE_FIELD_ANALYTIC_VALUES_SET_TYPE, &
    & CMFE_FIELD_PREVIOUS_VALUES_SET_TYPE,CMFE_FIELD_MEAN_PREDICTED_DISPLACEMENT_SET_TYPE,CMFE_FIELD_VELOCITY_VALUES_SET_TYPE, &
    & CMFE_FIELD_INITIAL_VELOCITY_SET_TYPE,CMFE_FIELD_PREVIOUS_VELOCITY_SET_TYPE,CMFE_FIELD_MEAN_PREDICTED_VELOCITY_SET_TYPE, &
    & CMFE_FIELD_ACCELERATION_VALUES_SET_TYPE,CMFE_FIELD_INITIAL_ACCELERATION_SET_TYPE, &
    & CMFE_FIELD_PREVIOUS_ACCELERATION_SET_TYPE, &
    & CMFE_FIELD_MEAN_PREDICTED_ACCELERATION_SET_TYPE, CMFE_FIELD_PRESSURE_VALUES_SET_TYPE, &
    & CMFE_FIELD_PREVIOUS_PRESSURE_SET_TYPE, &
    & CMFE_FIELD_IMPERMEABLE_FLAG_VALUES_SET_TYPE,CMFE_FIELD_INTEGRATED_NEUMANN_SET_TYPE, &
    & CMFE_FIELD_MESH_DISPLACEMENT_SET_TYPE,CMFE_FIELD_MESH_VELOCITY_SET_TYPE

  PUBLIC CMFE_FIELD_NO_SCALING,CMFE_FIELD_UNIT_SCALING,CMFE_FIELD_ARC_LENGTH_SCALING,CMFE_FIELD_ARITHMETIC_MEAN_SCALING, &
    & CMFE_FIELD_GEOMETRIC_MEAN_SCALING,CMFE_FIELD_HARMONIC_MEAN_SCALING

  PUBLIC cmfe_Field_ComponentInterpolationGet,cmfe_Field_ComponentInterpolationSet

  PUBLIC cmfe_Field_ComponentLabelGet,cmfe_Field_ComponentLabelSet

  PUBLIC cmfe_Field_ComponentMeshComponentGet,cmfe_Field_ComponentMeshComponentSet

  PUBLIC cmfe_Field_ComponentValuesInitialise

  PUBLIC cmfe_Field_DataTypeGet,cmfe_Field_DataTypeSet

  PUBLIC cmfe_Field_DOFOrderTypeGet,cmfe_Field_DOFOrderTypeSet

  PUBLIC cmfe_Field_CreateFinish,cmfe_Field_CreateStart

  PUBLIC cmfe_Field_DependentTypeGet,cmfe_Field_DependentTypeSet

  PUBLIC cmfe_Field_Destroy

  PUBLIC cmfe_Field_DimensionGet,cmfe_Field_DimensionSet

  PUBLIC cmfe_Field_GeometricFieldGet,cmfe_Field_GeometricFieldSet

  PUBLIC cmfe_Field_GeometricParametersElementLineLengthGet, cmfe_Field_GeometricParametersElementVolumeGet

  PUBLIC cmfe_Field_LabelGet,cmfe_Field_LabelSet

  PUBLIC cmfe_Field_MeshDecompositionGet,cmfe_Field_MeshDecompositionSet

  PUBLIC cmfe_Field_DataProjectionSet

  PUBLIC cmfe_Field_PositionNormalTangentCalculateNode

  PUBLIC cmfe_Field_NumberOfComponentsGet,cmfe_Field_NumberOfComponentsSet

  PUBLIC cmfe_Field_NumberOfVariablesGet,cmfe_Field_NumberOfVariablesSet

  PUBLIC cmfe_Field_ParameterSetAddConstant,cmfe_Field_ParameterSetAddElement,cmfe_Field_ParameterSetAddNode

  PUBLIC cmfe_Field_ParameterSetCreate

  PUBLIC cmfe_Field_ParameterSetDestroy

  PUBLIC cmfe_Field_ParameterSetDataGet,cmfe_Field_ParameterSetDataRestore

  PUBLIC cmfe_Field_ParameterSetGetConstant,cmfe_Field_ParameterSetGetElement,cmfe_Field_ParameterSetGetNode
  
  PUBLIC cmfe_Field_ParameterSetGetDataPoint,cmfe_Field_ParameterSetUpdateDataPoint

  PUBLIC cmfe_Field_ParameterSetUpdateConstant,cmfe_Field_ParameterSetUpdateElement,cmfe_Field_ParameterSetUpdateNode

  PUBLIC cmfe_Field_ParameterSetNodeScaleFactorGet,cmfe_Field_ParameterSetNodeScaleFactorSet

  PUBLIC cmfe_Field_ParameterSetNodeScaleFactorsGet,cmfe_Field_ParameterSetNodeScaleFactorsSet

  PUBLIC cmfe_Field_ParameterSetNodeNumberOfScaleFactorDofsGet

  PUBLIC cmfe_Field_ParameterSetUpdateLocalDofs

  PUBLIC cmfe_Field_ParameterSetUpdateGaussPoint,cmfe_Field_ParameterSetGetGaussPoint

  PUBLIC cmfe_Field_ParameterSetInterpolateXi

  PUBLIC cmfe_Field_ParameterSetInterpolateGauss

  PUBLIC cmfe_Field_ParameterSetUpdateElementDataPoint

  PUBLIC cmfe_Field_ParameterSetUpdateFinish,cmfe_Field_ParameterSetUpdateStart

  PUBLIC cmfe_Field_ParametersToFieldParametersComponentCopy

  PUBLIC cmfe_Field_ScalingTypeGet,cmfe_Field_ScalingTypeSet

  PUBLIC cmfe_Field_TypeGet,cmfe_Field_TypeSet

  PUBLIC cmfe_Field_VariableLabelGet,cmfe_Field_VariableLabelSet

  PUBLIC cmfe_Field_VariableTypesGet,cmfe_Field_VariableTypesSet

!!==================================================================================================================================
!!
!! FIELD_IO_ROUTINES
!!
!!==================================================================================================================================

  !Module parameters

  !Module types

  !Module variables

  !Interfaces

  INTERFACE cmfe_Fields_ElementsExport
    MODULE PROCEDURE cmfe_Fields_ElementsExportCCObj
    MODULE PROCEDURE cmfe_Fields_ElementsExportVSCObj
    MODULE PROCEDURE cmfe_Fields_ElementsExportCVSObj
    MODULE PROCEDURE cmfe_Fields_ElementsExportVSVSObj
  END INTERFACE cmfe_Fields_ElementsExport

  INTERFACE cmfe_Fields_NodesExport
    MODULE PROCEDURE cmfe_Fields_NodesExportCCObj
    MODULE PROCEDURE cmfe_Fields_NodesExportVSCObj
    MODULE PROCEDURE cmfe_Fields_NodesExportCVSObj
    MODULE PROCEDURE cmfe_Fields_NodesExportVSVSObj
  END INTERFACE cmfe_Fields_NodesExport

  PUBLIC cmfe_Fields_ElementsExport,cmfe_Fields_NodesExport

!!==================================================================================================================================
!!
!! GENERATED_MESH_ROUTINES
!!
!!==================================================================================================================================

  !Module parameters

  !> \addtogroup OPENCMISS_GeneratedMeshConstants OPENCMISS::GeneratedMesh::Constants
  !> \brief Generated mesh constants.
  !>@{
  !> \addtogroup OPENCMISS_GeneratedMeshTypes OPENCMISS::GeneratedMesh::Types
  !> \brief Generated mesh types.
  !> \see OPENCMISS::GeneratedMesh,OPENCMISS
  !>@{
  INTEGER(INTG), PARAMETER :: CMFE_GENERATED_MESH_REGULAR_MESH_TYPE = GENERATED_MESH_REGULAR_MESH_TYPE !<A regular generated mesh. \see OPENCMISS_GeneratedMeshTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_GENERATED_MESH_POLAR_MESH_TYPE = GENERATED_MESH_POLAR_MESH_TYPE !<A polar generated mesh. \see OPENCMISS_GeneratedMeshTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_GENERATED_MESH_FRACTAL_TREE_MESH_TYPE = GENERATED_MESH_FRACTAL_TREE_MESH_TYPE !<A fractal tree generated mesh. \see OPENCMISS_GeneratedMeshTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_GENERATED_MESH_CYLINDER_MESH_TYPE = GENERATED_MESH_CYLINDER_MESH_TYPE !<A cylinder generated mesh. \see OPENCMISS_GeneratedMeshTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_GENERATED_MESH_ELLIPSOID_MESH_TYPE = GENERATED_MESH_ELLIPSOID_MESH_TYPE !<An ellipsoid generated mesh. \see OPENCMISS_GeneratedMeshTypes,OPENCMISS
  !>@}
  !>@}

  !> \addtogroup OPENCMISS_GeneratedMeshConstants OPENCMISS::GeneratedMesh::Constants
  !> \brief Generated mesh constants.
  !>@{
  !> \addtogroup OPENCMISS_GeneratedMeshSurfaceTypes OPENCMISS::GeneratedMesh::SurfaceTypes
  !> \brief Generated mesh surface types.
  !> \see OPENCMISS::GeneratedMesh,OPENCMISS
  !>@{
  INTEGER(INTG), PARAMETER :: CMFE_GENERATED_MESH_CYLINDER_INNER_SURFACE = GENERATED_MESH_CYLINDER_INNER_SURFACE !<Cylinder inner surface constant. \see OPENCMISS_GeneratedMeshSurfaceTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_GENERATED_MESH_CYLINDER_OUTER_SURFACE = GENERATED_MESH_CYLINDER_OUTER_SURFACE !<Cylinder outer surface. \see OPENCMISS_GeneratedMeshSurfaceTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_GENERATED_MESH_CYLINDER_TOP_SURFACE = GENERATED_MESH_CYLINDER_TOP_SURFACE !<Cylinder top surface constant. \see OPENCMISS_GeneratedMeshSurfaceTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_GENERATED_MESH_CYLINDER_BOTTOM_SURFACE = GENERATED_MESH_CYLINDER_BOTTOM_SURFACE !<Cylinder bottom surface constant. \see OPENCMISS_GeneratedMeshSurfaceTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_GENERATED_MESH_ELLIPSOID_INNER_SURFACE = GENERATED_MESH_ELLIPSOID_INNER_SURFACE !<Ellipsoid inner surface constant. \see OPENCMISS_GeneratedMeshSurfaceTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_GENERATED_MESH_ELLIPSOID_OUTER_SURFACE = GENERATED_MESH_ELLIPSOID_OUTER_SURFACE !<Ellipsoid outer surface constant. \see OPENCMISS_GeneratedMeshSurfaceTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_GENERATED_MESH_ELLIPSOID_TOP_SURFACE = GENERATED_MESH_ELLIPSOID_TOP_SURFACE !<Ellipsoid top surface constant. \see OPENCMISS_GeneratedMeshSurfaceTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_GENERATED_MESH_REGULAR_LEFT_SURFACE = GENERATED_MESH_REGULAR_LEFT_SURFACE !<Regular left surface constant. \see OPENCMISS_GeneratedMeshSurfaceTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_GENERATED_MESH_REGULAR_RIGHT_SURFACE = GENERATED_MESH_REGULAR_RIGHT_SURFACE !<Regular right surface constant. \see OPENCMISS_GeneratedMeshSurfaceTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_GENERATED_MESH_REGULAR_TOP_SURFACE = GENERATED_MESH_REGULAR_TOP_SURFACE !<Regular top surface constant. \see OPENCMISS_GeneratedMeshSurfaceTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_GENERATED_MESH_REGULAR_BOTTOM_SURFACE = GENERATED_MESH_REGULAR_BOTTOM_SURFACE !<Regular bottom surface constant. \see OPENCMISS_GeneratedMeshSurfaceTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_GENERATED_MESH_REGULAR_FRONT_SURFACE = GENERATED_MESH_REGULAR_FRONT_SURFACE !<Regular front surface constant. \see OPENCMISS_GeneratedMeshSurfaceTypes,OPENCMISS
  INTEGER(INTG), PARAMETER :: CMFE_GENERATED_MESH_REGULAR_BACK_SURFACE = GENERATED_MESH_REGULAR_BACK_SURFACE !<Regular back surface constant. \see OPENCMISS_GeneratedMeshSurfaceTypes,OPENCMISS
  !>@}
  !>@}

  !Module types

  !Module variables

  !Interfaces

  !>Returns the basis for a generated mesh.
  INTERFACE cmfe_GeneratedMesh_BasisGet
    MODULE PROCEDURE cmfe_GeneratedMesh_BasisGetNumber
    MODULE PROCEDURE cmfe_GeneratedMesh_BasisGetObj
  END INTERFACE cmfe_GeneratedMesh_BasisGet

  !>Sets/changes the basis for a generated mesh.
  INTERFACE cmfe_GeneratedMesh_BasisSet
    MODULE PROCEDURE cmfe_GeneratedMesh_BasisSetNumber0
    MODULE PROCEDURE cmfe_GeneratedMesh_BasisSetNumber1
    MODULE PROCEDURE cmfe_GeneratedMesh_BasisSetObj0
    MODULE PROCEDURE cmfe_GeneratedMesh_BasisSetObj1
  END INTERFACE cmfe_GeneratedMesh_BasisSet

  !>Sets/changes the base vectors for a generated mesh.
  INTERFACE cmfe_GeneratedMesh_BaseVectorsSet
    MODULE PROCEDURE cmfe_GeneratedMesh_BaseVectorsSetNumber
    MODULE PROCEDURE cmfe_GeneratedMesh_BaseVectorsSetObj
  END INTERFACE cmfe_GeneratedMesh_BaseVectorsSet

  !>Finishes the creation of a generated mesh. \see OpenCMISS::Iron::cmfe_GeneratedMesh_CreateStart
  INTERFACE cmfe_GeneratedMesh_CreateFinish
    MODULE PROCEDURE cmfe_GeneratedMesh_CreateFinishNumber
    MODULE PROCEDURE cmfe_GeneratedMesh_CreateFinishObj
  END INTERFACE cmfe_GeneratedMesh_CreateFinish

  !>Starts the creation of a generated mesh. \see OpenCMISS::Iron::cmfe_GeneratedMesh_CreateFinish
  INTERFACE cmfe_GeneratedMesh_CreateStart
    MODULE PROCEDURE cmfe_GeneratedMesh_CreateStartNumber
    MODULE PROCEDURE cmfe_GeneratedMesh_CreateStartInterfaceObj
    MODULE PROCEDURE cmfe_GeneratedMesh_CreateStartRegionObj
  END INTERFACE cmfe_GeneratedMesh_CreateStart

  !>Destroys a generated mesh.
  INTERFACE cmfe_GeneratedMesh_Destroy
    MODULE PROCEDURE cmfe_GeneratedMesh_DestroyNumber
    MODULE PROCEDURE cmfe_GeneratedMesh_DestroyObj
  END INTERFACE cmfe_GeneratedMesh_Destroy

  !>Returns the extent of a generated mesh.
  INTERFACE cmfe_GeneratedMesh_ExtentGet
    MODULE PROCEDURE cmfe_GeneratedMesh_ExtentGetNumber
    MODULE PROCEDURE cmfe_GeneratedMesh_ExtentGetObj
  END INTERFACE cmfe_GeneratedMesh_ExtentGet

  !>Sets/changes the extent of a generated mesh.
  INTERFACE cmfe_GeneratedMesh_ExtentSet
    MODULE PROCEDURE cmfe_GeneratedMesh_ExtentSetNumber
    MODULE PROCEDURE cmfe_GeneratedMesh_ExtentSetObj
  END INTERFACE cmfe_GeneratedMesh_ExtentSet

  !>Returns the number of elements in a generated mesh.
  INTERFACE cmfe_GeneratedMesh_NumberOfElementsGet
    MODULE PROCEDURE cmfe_GeneratedMesh_NumberOfElementsGetNumber
    MODULE PROCEDURE cmfe_GeneratedMesh_NumberOfElementsGetObj
  END INTERFACE cmfe_GeneratedMesh_NumberOfElementsGet

  !>Sets/changes the number of elements in a generated mesh.
  INTERFACE cmfe_GeneratedMesh_NumberOfElementsSet
    MODULE PROCEDURE cmfe_GeneratedMesh_NumberOfElementsSetNumber
    MODULE PROCEDURE cmfe_GeneratedMesh_NumberOfElementsSetObj
  END INTERFACE cmfe_GeneratedMesh_NumberOfElementsSet

  !>Returns the origin of a generated mesh.
  INTERFACE cmfe_GeneratedMesh_OriginGet
    MODULE PROCEDURE cmfe_GeneratedMesh_OriginGetNumber
    MODULE PROCEDURE cmfe_GeneratedMesh_OriginGetObj
  END INTERFACE cmfe_GeneratedMesh_OriginGet

  !>Sets/changes the origin of a generated mesh.
  INTERFACE cmfe_GeneratedMesh_OriginSet
    MODULE PROCEDURE cmfe_GeneratedMesh_OriginSetNumber
    MODULE PROCEDURE cmfe_GeneratedMesh_OriginSetObj
  END INTERFACE cmfe_GeneratedMesh_OriginSet

  !>Returns the type of a generated mesh.
  INTERFACE cmfe_GeneratedMesh_TypeGet
    MODULE PROCEDURE cmfe_GeneratedMesh_TypeGetNumber
    MODULE PROCEDURE cmfe_GeneratedMesh_TypeGetObj
  END INTERFACE cmfe_GeneratedMesh_TypeGet

  !>Sets/changes the type of a generated mesh.
  INTERFACE cmfe_GeneratedMesh_TypeSet
    MODULE PROCEDURE cmfe_GeneratedMesh_TypeSetNumber
    MODULE PROCEDURE cmfe_GeneratedMesh_TypeSetObj
  END INTERFACE cmfe_GeneratedMesh_TypeSet

  !>Calculates and sets the geometric field parameters for a generated mesh
  INTERFACE cmfe_GeneratedMesh_GeometricParametersCalculate
    MODULE PROCEDURE cmfe_GeneratedMesh_GeometricParametersCalculateNumber
    MODULE PROCEDURE cmfe_GeneratedMesh_GeometricParametersCalculateObj
  END INTERFACE cmfe_GeneratedMesh_GeometricParametersCalculate

  !>Returns a list of nodes belonging to a surface of given type
  INTERFACE cmfe_GeneratedMesh_SurfaceGet
    MODULE PROCEDURE cmfe_GeneratedMesh_SurfaceGetNumber0
    MODULE PROCEDURE cmfe_GeneratedMesh_SurfaceGetNumber1
    MODULE PROCEDURE cmfe_GeneratedMesh_SurfaceGetObj0
    MODULE PROCEDURE cmfe_GeneratedMesh_SurfaceGetObj1
  END INTERFACE


  !>Creates an embedding of one mesh in another
  INTERFACE cmfe_MeshEmbedding_Create
    MODULE PROCEDURE cmfe_MeshEmbedding_CreateNumber
    MODULE PROCEDURE cmfe_MeshEmbedding_CreateObj
  END INTERFACE

  !>Sets the embedded nodes for one parent element
  INTERFACE cmfe_MeshEmbedding_SetChildNodePosition
    MODULE PROCEDURE cmfe_MeshEmbedding_SetChildNodePositionObj
  END INTERFACE


  !>Pushes data from the parent field to the child field
  INTERFACE cmfe_MeshEmbedding_PushData
    MODULE PROCEDURE cmfe_MeshEmbedding_PushDataObj
  END INTERFACE

  INTERFACE cmfe_MeshEmbedding_SetGaussPointData
   MODULE PROCEDURE cmfe_MeshEmbedding_SetGaussPointDataObj
  END INTERFACE

  INTERFACE cmfe_MeshEmbedding_PullGaussPointData
   MODULE PROCEDURE cmfe_MeshEmbedding_PullGaussPointDataObj
  END INTERFACE

   INTERFACE cmfe_MeshEmbedding_GetGaussPointCoord
    MODULE PROCEDURE cmfe_Field_ParameterSetGetGaussPointCoordObj
   END INTERFACE

  PUBLIC cmfe_MeshEmbedding_Create,cmfe_MeshEmbedding_SetChildNodePosition, cmfe_MeshEmbeddingType

  PUBLIC cmfe_MeshEmbedding_Initialise,cmfe_MeshEmbedding_SetGaussPointData

  PUBLIC cmfe_MeshEmbedding_PushData,cmfe_MeshEmbedding_PullGaussPointData

  PUBLIC cmfe_MeshEmbedding_GetGaussPointCoord

  PUBLIC CMFE_GENERATED_MESH_REGULAR_MESH_TYPE,CMFE_GENERATED_MESH_POLAR_MESH_TYPE,CMFE_GENERATED_MESH_FRACTAL_TREE_MESH_TYPE

  PUBLIC CMFE_GENERATED_MESH_CYLINDER_MESH_TYPE, CMFE_GENERATED_MESH_ELLIPSOID_MESH_TYPE

  PUBLIC CMFE_GENERATED_MESH_CYLINDER_INNER_SURFACE,CMFE_GENERATED_MESH_CYLINDER_OUTER_SURFACE

  PUBLIC CMFE_GENERATED_MESH_CYLINDER_TOP_SURFACE, CMFE_GENERATED_MESH_CYLINDER_BOTTOM_SURFACE

  PUBLIC CMFE_GENERATED_MESH_ELLIPSOID_INNER_SURFACE, CMFE_GENERATED_MESH_ELLIPSOID_OUTER_SURFACE

  PUBLIC CMFE_GENERATED_MESH_ELLIPSOID_TOP_SURFACE

  PUBLIC CMFE_GENERATED_MESH_REGULAR_LEFT_SURFACE, CMFE_GENERATED_MESH_REGULAR_RIGHT_SURFACE, &
    & CMFE_GENERATED_MESH_REGULAR_TOP_SURFACE

  PUBLIC CMFE_GENERATED_MESH_REGULAR_BOTTOM_SURFACE, CMFE_GENERATED_MESH_REGULAR_FRONT_SURFACE, &
    & CMFE_GENERATED_MESH_REGULAR_BACK_SURFACE

  PUBLIC cmfe_GeneratedMesh_BasisGet,cmfe_GeneratedMesh_BasisSet

  PUBLIC cmfe_GeneratedMesh_BaseVectorsSet

  PUBLIC cmfe_GeneratedMesh_CreateFinish,cmfe_GeneratedMesh_CreateStart

  PUBLIC cmfe_GeneratedMesh_Destroy

  PUBLIC cmfe_GeneratedMesh_ExtentGet,cmfe_GeneratedMesh_ExtentSet

  PUBLIC cmfe_GeneratedMesh_NumberOfElementsGet,cmfe_GeneratedMesh_NumberOfElementsSet

  PUBLIC cmfe_GeneratedMesh_OriginGet,cmfe_GeneratedMesh_OriginSet

  PUBLIC cmfe_GeneratedMesh_TypeGet,cmfe_GeneratedMesh_TypeSet

  PUBLIC cmfe_GeneratedMesh_GeometricParametersCalculate

  PUBLIC cmfe_GeneratedMesh_SurfaceGet


!!==================================================================================================================================
!!
!! INTERFACE_ROUTINES
!!
!!==================================================================================================================================

  !Module parameters

  !Module types

  !Module variables

  !Interfaces

  !>Adds a mesh to an interface.
  INTERFACE cmfe_Interface_MeshAdd
    MODULE PROCEDURE cmfe_Interface_MeshAddNumber
    MODULE PROCEDURE cmfe_Interface_MeshAddObj
  END INTERFACE cmfe_Interface_MeshAdd

  !>Finishes the creation of an interface. \see OpenCMISS::Iron::cmfe_Interface_CreateStart
  INTERFACE cmfe_Interface_CreateFinish
    MODULE PROCEDURE cmfe_Interface_CreateFinishNumber
    MODULE PROCEDURE cmfe_Interface_CreateFinishObj
  END INTERFACE cmfe_Interface_CreateFinish

  !>Starts the creation of an interface. \see OpenCMISS::Iron::cmfe_Interface_CreateFinish