OpenCMISS-Iron Internal API Documentation
opencmiss_iron.f90
Go to the documentation of this file.
1 
51 
52 ! Eclipse regular expressions to add the DLLEXPORT macro:
53 ! Find: ^( *)(SUBROUTINE *)([^\(]*)(\([^\)]*\))
54 ! Replace: $1$2$3$4\R$1 !DLLEXPORT($3)
55 
57 
59  USE base_routines
60  USE basis_routines
63  USE cmiss
64  USE cmiss_cellml
66  USE constants
69  USE data_point_routines
75  USE field_routines
76 #ifdef WITH_FIELDML
77  USE fieldml_types
81 #endif
84  USE generated_mesh_routines
87  USE input_output
88  USE interface_routines
90  USE interface_conditions_routines
93  USE interface_matrices_routines
94  USE iso_c_binding
96  USE kinds
97  USE mesh_routines
98  USE node_routines
100  USE problem_routines
101  USE region_routines
102  USE solver_routines
103  USE strings
104  USE types
105 
106 #include "macros.h"
107 #include "dllexport.h"
108 
109  IMPLICIT NONE
110 
111  PRIVATE
112 
113  !Module parameters
114 
115  !Module types
116 
119  PRIVATE
120  TYPE(basis_type), POINTER :: basis
121  END TYPE cmfe_basistype
122 
125  PRIVATE
126  TYPE(boundary_conditions_type), POINTER :: boundaryconditions
128 
131  PRIVATE
132  TYPE(cellml_type), POINTER :: cellml
133  END TYPE cmfe_cellmltype
134 
137  PRIVATE
138  TYPE(cellml_equations_type), POINTER :: cellmlequations
139  END TYPE cmfe_cellmlequationstype
140 
143  PRIVATE
144  TYPE(control_loop_type), POINTER :: controlloop
145  END TYPE cmfe_controllooptype
146 
149  PRIVATE
150  TYPE(coordinate_system_type), POINTER :: coordinatesystem
152 
155  PRIVATE
156  TYPE(data_points_type), POINTER :: datapoints
157  END TYPE cmfe_datapointstype
158 
161  PRIVATE
162  TYPE(data_projection_type), POINTER :: dataprojection
163  END TYPE cmfe_dataprojectiontype
164 
167  PRIVATE
168  TYPE(decomposition_type), POINTER :: decomposition
169  END TYPE cmfe_decompositiontype
170 
173  PRIVATE
174  TYPE(equations_type), POINTER :: equations
175  END TYPE cmfe_equationstype
176 
179  PRIVATE
180  TYPE(equations_set_type), POINTER :: equationsset
181  END TYPE cmfe_equationssettype
182 
185  PRIVATE
186  TYPE(field_type), POINTER :: field
187  END TYPE cmfe_fieldtype
188 
191  !PRIVATE
192  TYPE(fields_type), POINTER :: fields
193  END TYPE cmfe_fieldstype
194 
197  PRIVATE
198  TYPE(generated_mesh_type), POINTER :: generatedmesh
199  END TYPE cmfe_generatedmeshtype
200 
203  PRIVATE
204  TYPE(history_type), POINTER :: history
205  END TYPE cmfe_historytype
206 
209  PRIVATE
210  TYPE(interface_type), POINTER :: interface
211  END TYPE cmfe_interfacetype
212 
215  PRIVATE
216  TYPE(interface_condition_type), POINTER :: interfacecondition
218 
221  PRIVATE
222  TYPE(interface_equations_type), POINTER :: interfaceequations
224 
227  PRIVATE
228  TYPE(interface_mesh_connectivity_type), POINTER :: meshconnectivity
230 
233  PRIVATE
234  TYPE(interfacepointsconnectivitytype), POINTER :: pointsconnectivity
236 
240  PRIVATE
241  TYPE(distributed_matrix_type), POINTER :: distributedmatrix
243 
246  PRIVATE
247  TYPE(distributed_vector_type), POINTER :: distributedvector
249 
252  PRIVATE
253  TYPE(mesh_type), POINTER :: mesh
254  END TYPE cmfe_meshtype
255 
258  PRIVATE
259  TYPE(meshelementstype), POINTER :: meshelements
260  END TYPE cmfe_meshelementstype
261 
264  PRIVATE
265  TYPE(mesh_embedding_type), POINTER :: meshembedding
266  END TYPE cmfe_meshembeddingtype
267 
270  PRIVATE
271  TYPE(meshnodestype), POINTER :: meshnodes
272  END TYPE cmfe_meshnodestype
273 
276  PRIVATE
277  TYPE(nodes_type), POINTER :: nodes
278  END TYPE cmfe_nodestype
279 
282  PRIVATE
283  TYPE(problem_type), POINTER :: problem
284  END TYPE cmfe_problemtype
285 
288  PRIVATE
289  TYPE(quadrature_type), POINTER :: quadrature
290  END TYPE cmfe_quadraturetype
291 
294  PRIVATE
295  TYPE(region_type), POINTER :: region
296  END TYPE cmfe_regiontype
297 
300  PRIVATE
301  TYPE(solver_type), POINTER :: solver
302  END TYPE cmfe_solvertype
303 
306  PRIVATE
307  TYPE(solver_equations_type), POINTER :: solverequations
308  END TYPE cmfe_solverequationstype
309 
312  PRIVATE
313  TYPE(computational_work_group_type), POINTER :: computationalworkgroup
315 
316  !Module variables
317 
319 
320  !INTERFACE cmfe_Finalise_
321  ! MODULE PROCEDURE cmfe_Finalise
322  !END INTERFACE cmfe_Finalise_
323 
324  INTERFACE cmfe_initialise
325  MODULE PROCEDURE cmfe_initialisenumber
326  MODULE PROCEDURE cmfe_initialiseobj
327  END INTERFACE cmfe_initialise
328 
330  MODULE PROCEDURE cmfe_fields_createinterface
331  MODULE PROCEDURE cmfe_fields_createregion
332  END INTERFACE cmfe_fields_create
333 
334  !PUBLIC cmfe_Finalise,cmfe_Initialise
336 
338 
340 
342 
344 
346 
348 
350 
352 
354 
356 
358 
360 
362 
364 
366 
368 
370 
372 
374 
376 
378 
381 
384 
386 
388 
390 
392 
394 
396 
398 
400 
402 
404 
406 
407 !!==================================================================================================================================
408 !!
409 !! ANALYTIC_ANALYSIS_ROUTINES
410 !!
411 !!==================================================================================================================================
412 
413  !Module parameters
414 
415  !Module types
416 
417  !Module variables
418 
419  !Interfaces
420 
423  MODULE PROCEDURE cmfe_analyticanalysis_outputnumber
424  MODULE PROCEDURE cmfe_analyticanalysis_outputobj
425  END INTERFACE
426 
432 
438 
444 
450 
456 
462 
468 
474 
480 
486 
492 
498 
504 
510 
516 
522 
528 
534 
536 
539 
542 
545 
547 
552 
553 !!==================================================================================================================================
554 !!
555 !! BASE_ROUTINES
556 !!
557 !!==================================================================================================================================
558 
559  !Module parameters
560 
568  INTEGER(INTG), PARAMETER :: cmfe_all_diag_type = all_diag_type
569  INTEGER(INTG), PARAMETER :: cmfe_in_diag_type = in_diag_type
570  INTEGER(INTG), PARAMETER :: cmfe_from_diag_type = from_diag_type
576  INTEGER(INTG), PARAMETER :: cmfe_all_timing_type = all_timing_type
577  INTEGER(INTG), PARAMETER :: cmfe_in_timing_type = in_timing_type
578  INTEGER(INTG), PARAMETER :: cmfe_from_timing_type = from_timing_type
581 
582  !Module types
583 
584  !Module variables
585 
586  !Interfaces
587 
589 
591 
593 
595 
597 
598 !!==================================================================================================================================
599 !!
600 !! BASIS_ROUTINES
601 !!
602 !!==================================================================================================================================
603 
604  !Module parameters
605 
614  INTEGER(INTG), PARAMETER :: cmfe_basis_simplex_type = basis_simplex_type
616  INTEGER(INTG), PARAMETER :: cmfe_basis_auxilliary_type = basis_auxilliary_type
658  INTEGER(INTG), PARAMETER :: cmfe_basis_xi_collapsed = basis_xi_collapsed
661  INTEGER(INTG), PARAMETER :: cmfe_basis_not_collapsed = basis_not_collapsed
664 
665  !Module types
666 
667  !Module variables
668 
669  !Interfaces
670 
673  MODULE PROCEDURE cmfe_basis_collapsedxigetnumber
674  MODULE PROCEDURE cmfe_basis_collapsedxigetobj
675  END INTERFACE cmfe_basis_collapsedxiget
676 
679  MODULE PROCEDURE cmfe_basis_collapsedxisetnumber
680  MODULE PROCEDURE cmfe_basis_collapsedxisetobj
681  END INTERFACE cmfe_basis_collapsedxiset
682 
685  MODULE PROCEDURE cmfe_basis_createfinishnumber
686  MODULE PROCEDURE cmfe_basis_createfinishobj
687  END INTERFACE cmfe_basis_createfinish
688 
691  MODULE PROCEDURE cmfe_basis_createstartnumber
692  MODULE PROCEDURE cmfe_basis_createstartobj
693  END INTERFACE cmfe_basis_createstart
694 
697  MODULE PROCEDURE cmfe_basis_destroynumber
698  MODULE PROCEDURE cmfe_basis_destroyobj
699  END INTERFACE cmfe_basis_destroy
700 
703  MODULE PROCEDURE cmfe_basis_interpolationxigetnumber
704  MODULE PROCEDURE cmfe_basis_interpolationxigetobj
705  END INTERFACE cmfe_basis_interpolationxiget
706 
709  MODULE PROCEDURE cmfe_basis_interpolationxisetnumber
710  MODULE PROCEDURE cmfe_basis_interpolationxisetobj
711  END INTERFACE cmfe_basis_interpolationxiset
712 
716  MODULE PROCEDURE cmfe_basis_numberoflocalnodesgetobj
718 
721  MODULE PROCEDURE cmfe_basis_numberofxigetnumber
722  MODULE PROCEDURE cmfe_basis_numberofxigetobj
723  END INTERFACE cmfe_basis_numberofxiget
724 
727  MODULE PROCEDURE cmfe_basis_numberofxisetnumber
728  MODULE PROCEDURE cmfe_basis_numberofxisetobj
729  END INTERFACE cmfe_basis_numberofxiset
730 
736 
742 
749  END INTERFACE cmfe_basis_quadraturegaussxiget
750 
753  MODULE PROCEDURE cmfe_basis_quadratureordergetnumber
754  MODULE PROCEDURE cmfe_basis_quadratureordergetobj
755  END INTERFACE cmfe_basis_quadratureorderget
756 
759  MODULE PROCEDURE cmfe_basis_quadratureordersetnumber
760  MODULE PROCEDURE cmfe_basis_quadratureordersetobj
761  END INTERFACE cmfe_basis_quadratureorderset
762 
765  MODULE PROCEDURE cmfe_basis_quadraturetypegetnumber
766  MODULE PROCEDURE cmfe_basis_quadraturetypegetobj
767  END INTERFACE cmfe_basis_quadraturetypeget
768 
771  MODULE PROCEDURE cmfe_basis_quadraturetypesetnumber
772  MODULE PROCEDURE cmfe_basis_quadraturetypesetobj
773  END INTERFACE cmfe_basis_quadraturetypeset
774 
780 
783  MODULE PROCEDURE cmfe_basis_typegetnumber
784  MODULE PROCEDURE cmfe_basis_typegetobj
785  END INTERFACE cmfe_basis_typeget
786 
789  MODULE PROCEDURE cmfe_basis_typesetnumber
790  MODULE PROCEDURE cmfe_basis_typesetobj
791  END INTERFACE cmfe_basis_typeset
792 
795 
801 
804 
807 
809 
811 
813 
815 
817 
819 
821 
823 
825 
827 
829 
830 !!==================================================================================================================================
831 !!
832 !! BOUNDARY_CONDITIONS_ROUTINES
833 !!
834 !!==================================================================================================================================
835 
836  !Module parameters
837 
838 
854 
861 
865 
869 
882 
883  !Module types
884 
885  !Module variables
886 
887  !Interfaces
888 
893  MODULE PROCEDURE cmfe_boundaryconditions_destroyobj
894  END INTERFACE cmfe_boundaryconditions_destroy
895 
901 
907 
913 
919 
923  MODULE PROCEDURE cmfe_boundaryconditions_addnodeobj
924  END INTERFACE cmfe_boundaryconditions_addnode
925 
930  MODULE PROCEDURE cmfe_boundaryconditions_setnodeobj
931  END INTERFACE cmfe_boundaryconditions_setnode
932 
939 
945 
952 
957 
959 
961 
963 
965 
967 
969 
971 
972 !!==================================================================================================================================
973 !!
974 !! CMISS
975 !!
976 !!==================================================================================================================================
977 
978  !Module parameters
987  INTEGER(INTG), PARAMETER :: cmfe_errors_output_error = cmfe_output_error
988  INTEGER(INTG), PARAMETER :: cmfe_errors_trap_error = cmfe_trap_error
991 
992  !Module types
993 
994  !Module variables
995 
996  !Interfaces
997 
1000  MODULE PROCEDURE cmfe_extracterrormessagec
1001  MODULE PROCEDURE cmfe_extracterrormessagevs
1002  END INTERFACE cmfe_extracterrormessage
1003 
1006  MODULE PROCEDURE cmfe_randomseedsget0
1007  MODULE PROCEDURE cmfe_randomseedsget1
1008  END INTERFACE cmfe_randomseedsget
1009 
1012  MODULE PROCEDURE cmfe_randomseedsset0
1013  MODULE PROCEDURE cmfe_randomseedsset1
1014  END INTERFACE cmfe_randomseedsset
1015 
1017 
1019 
1021 
1023 
1024 !!==================================================================================================================================
1025 !!
1026 !! CMISS_CELLML
1027 !!
1028 !!==================================================================================================================================
1029 
1030  !Module parameters
1031 
1039  INTEGER(INTG), PARAMETER :: cmfe_cellml_models_field = cellml_models_field
1040  INTEGER(INTG), PARAMETER :: cmfe_cellml_state_field = cellml_state_field
1045 
1046  !Module types
1047 
1048  !Module variables
1049 
1050  !Interfaces
1051 
1054  MODULE PROCEDURE cmfe_cellml_variablesetasknownnumberc
1055  MODULE PROCEDURE cmfe_cellml_variablesetasknownobjc
1057  MODULE PROCEDURE cmfe_cellml_variablesetasknownobjvs
1058  END INTERFACE cmfe_cellml_variablesetasknown
1059 
1063  MODULE PROCEDURE cmfe_cellml_variablesetaswantedobjc
1065  MODULE PROCEDURE cmfe_cellml_variablesetaswantedobjvs
1066  END INTERFACE cmfe_cellml_variablesetaswanted
1067 
1075 
1083 
1086  MODULE PROCEDURE cmfe_cellml_createfinishnumber
1087  MODULE PROCEDURE cmfe_cellml_createfinishobj
1088  END INTERFACE cmfe_cellml_createfinish
1089 
1092  MODULE PROCEDURE cmfe_cellml_createstartnumber
1093  MODULE PROCEDURE cmfe_cellml_createstartobj
1094  END INTERFACE cmfe_cellml_createstart
1095 
1098  MODULE PROCEDURE cmfe_cellml_destroynumber
1099  MODULE PROCEDURE cmfe_cellml_destroyobj
1100  END INTERFACE cmfe_cellml_destroy
1101 
1105  MODULE PROCEDURE cmfe_cellml_fieldmapscreatefinishobj
1106  END INTERFACE cmfe_cellml_fieldmapscreatefinish
1107 
1111  MODULE PROCEDURE cmfe_cellml_fieldmapscreatestartobj
1112  END INTERFACE cmfe_cellml_fieldmapscreatestart
1113 
1116  MODULE PROCEDURE cmfe_cellml_modelimportnumberc
1117  MODULE PROCEDURE cmfe_cellml_modelimportobjc
1118  MODULE PROCEDURE cmfe_cellml_modelimportnumbervs
1119  MODULE PROCEDURE cmfe_cellml_modelimportobjvs
1120  END INTERFACE cmfe_cellml_modelimport
1121 
1127 
1131  MODULE PROCEDURE cmfe_cellml_modelsfieldcreatestartobj
1133 
1136  MODULE PROCEDURE cmfe_cellml_modelsfieldgetnumber
1137  MODULE PROCEDURE cmfe_cellml_modelsfieldgetobj
1138  END INTERFACE cmfe_cellml_modelsfieldget
1139 
1143  MODULE PROCEDURE cmfe_cellml_statefieldcreatefinishobj
1145 
1149  MODULE PROCEDURE cmfe_cellml_statefieldcreatestartobj
1150  END INTERFACE cmfe_cellml_statefieldcreatestart
1151 
1154  MODULE PROCEDURE cmfe_cellml_statefieldgetnumber
1155  MODULE PROCEDURE cmfe_cellml_statefieldgetobj
1156  END INTERFACE cmfe_cellml_statefieldget
1157 
1160  MODULE PROCEDURE cmfe_cellml_fieldcomponentgetnumberc
1161  MODULE PROCEDURE cmfe_cellml_fieldcomponentgetobjc
1162  MODULE PROCEDURE cmfe_cellml_fieldcomponentgetnumbervs
1163  MODULE PROCEDURE cmfe_cellml_fieldcomponentgetobjvs
1164  END INTERFACE cmfe_cellml_fieldcomponentget
1165 
1171 
1177 
1181  MODULE PROCEDURE cmfe_cellml_intermediatefieldgetobj
1182  END INTERFACE cmfe_cellml_intermediatefieldget
1183 
1189 
1195 
1198  MODULE PROCEDURE cmfe_cellml_parametersfieldgetnumber
1199  MODULE PROCEDURE cmfe_cellml_parametersfieldgetobj
1200  END INTERFACE cmfe_cellml_parametersfieldget
1201 
1204  MODULE PROCEDURE cmfe_cellml_generatenumber
1205  MODULE PROCEDURE cmfe_cellml_generateobj
1206  END INTERFACE cmfe_cellml_generate
1207 
1209 
1211 
1213 
1215 
1216  PUBLIC cmfe_cellml_destroy
1217 
1219 
1221 
1223 
1225 
1227 
1229 
1231 
1233 
1234  PUBLIC cmfe_cellml_generate
1235 
1236 !!==================================================================================================================================
1237 !!
1238 !! COMP_ENVIRONMENT
1239 !!
1240 !!==================================================================================================================================
1241 
1242  !Module parameters
1243 
1244  !Module types
1245 
1246  !Module variables
1247 
1248  !Interfaces
1249 
1251 
1253 
1255 
1257 
1259 
1261 !!==================================================================================================================================
1262 !!
1263 !! CONSTANTS
1264 !!
1265 !!==================================================================================================================================
1266 
1267  !Module parameters
1268 
1276  INTEGER(INTG), PARAMETER :: cmfe_integer_type = integer_type
1277  INTEGER(INTG), PARAMETER :: cmfe_short_integer_type = short_integer_type
1278  INTEGER(INTG), PARAMETER :: cmfe_long_integer_type = long_integer_type
1279  INTEGER(INTG), PARAMETER :: cmfe_single_real_type = single_real_type
1280  INTEGER(INTG), PARAMETER :: cmfe_double_real_type = double_real_type
1281  INTEGER(INTG), PARAMETER :: cmfe_quadrauple_real_type = quadruple_real_type
1282  INTEGER(INTG), PARAMETER :: cmfe_character_type = character_type
1283  INTEGER(INTG), PARAMETER :: cmfe_logical_type = logical_type
1284  INTEGER(INTG), PARAMETER :: cmfe_single_complex_type = single_complex_type
1285  INTEGER(INTG), PARAMETER :: cmfe_double_complex_type = double_complex_type
1292  INTEGER(INTG), PARAMETER :: cmfe_no_global_deriv = no_global_deriv
1293  INTEGER(INTG), PARAMETER :: cmfe_global_deriv_s1 = global_deriv_s1
1294  INTEGER(INTG), PARAMETER :: cmfe_global_deriv_s2 = global_deriv_s2
1295  INTEGER(INTG), PARAMETER :: cmfe_global_deriv_s1_s2 = global_deriv_s1_s2
1296  INTEGER(INTG), PARAMETER :: cmfe_global_deriv_s3 = global_deriv_s3
1297  INTEGER(INTG), PARAMETER :: cmfe_global_deriv_s1_s3 = global_deriv_s1_s3
1298  INTEGER(INTG), PARAMETER :: cmfe_global_deriv_s2_s3 = global_deriv_s2_s3
1299  INTEGER(INTG), PARAMETER :: cmfe_global_deriv_s1_s2_s3 = global_deriv_s1_s2_s3
1302 
1303  !Module types
1304 
1305  !Module variables
1306 
1307  !Interfaces
1308 
1312 
1315 
1316 !!==================================================================================================================================
1317 !!
1318 !! CONTROL_LOOP_ROUTINES
1319 !!
1320 !!==================================================================================================================================
1321 
1322  !Module parameters
1323 
1331  INTEGER(INTG), PARAMETER :: cmfe_control_loop_node = control_loop_node
1342 
1343  !Module types
1344 
1345  !Module variables
1346 
1347  !Interfaces
1348 
1353  MODULE PROCEDURE cmfe_controlloop_currenttimesgetobj
1354  END INTERFACE cmfe_controlloop_currenttimesget
1355 
1358  MODULE PROCEDURE cmfe_controlloop_destroynumber0
1359  MODULE PROCEDURE cmfe_controlloop_destroynumber1
1360  MODULE PROCEDURE cmfe_controlloop_destroyobj
1361  END INTERFACE cmfe_controlloop_destroy
1362 
1369  MODULE PROCEDURE cmfe_controlloop_controlloopgetobj0
1370  MODULE PROCEDURE cmfe_controlloop_controlloopgetobj1
1371  END INTERFACE cmfe_controlloop_controlloopget
1372 
1375  MODULE PROCEDURE cmfe_controlloop_iterationssetnumber0
1376  MODULE PROCEDURE cmfe_controlloop_iterationssetnumber1
1377  MODULE PROCEDURE cmfe_controlloop_iterationssetobj
1378  END INTERFACE cmfe_controlloop_iterationsset
1379 
1382  MODULE PROCEDURE cmfe_controlloop_labelgetcnumber0
1383  MODULE PROCEDURE cmfe_controlloop_labelgetcnumber1
1384  MODULE PROCEDURE cmfe_controlloop_labelgetcobj
1385  MODULE PROCEDURE cmfe_controlloop_labelgetvsnumber0
1386  MODULE PROCEDURE cmfe_controlloop_labelgetvsnumber1
1387  MODULE PROCEDURE cmfe_controlloop_labelgetvsobj
1388  END INTERFACE cmfe_controlloop_labelget
1389 
1392  MODULE PROCEDURE cmfe_controlloop_labelsetcnumber0
1393  MODULE PROCEDURE cmfe_controlloop_labelsetcnumber1
1394  MODULE PROCEDURE cmfe_controlloop_labelsetcobj
1395  MODULE PROCEDURE cmfe_controlloop_labelsetvsnumber0
1396  MODULE PROCEDURE cmfe_controlloop_labelsetvsnumber1
1397  MODULE PROCEDURE cmfe_controlloop_labelsetvsobj
1398  END INTERFACE cmfe_controlloop_labelset
1399 
1406 
1413 
1420 
1427 
1434 
1441 
1444  MODULE PROCEDURE cmfe_controlloop_timeoutputsetnumber0
1445  MODULE PROCEDURE cmfe_controlloop_timeoutputsetnumber1
1446  MODULE PROCEDURE cmfe_controlloop_timeoutputsetobj
1447  END INTERFACE cmfe_controlloop_timeoutputset
1448 
1451  MODULE PROCEDURE cmfe_controlloop_outputtypegetnumber0
1452  MODULE PROCEDURE cmfe_controlloop_outputtypegetnumber1
1453  MODULE PROCEDURE cmfe_controlloop_outputtypegetobj
1454  END INTERFACE cmfe_controlloop_outputtypeget
1455 
1458  MODULE PROCEDURE cmfe_controlloop_outputtypesetnumber0
1459  MODULE PROCEDURE cmfe_controlloop_outputtypesetnumber1
1460  MODULE PROCEDURE cmfe_controlloop_outputtypesetobj
1461  END INTERFACE cmfe_controlloop_outputtypeset
1462 
1465  MODULE PROCEDURE cmfe_controlloop_timeinputsetnumber0
1466  MODULE PROCEDURE cmfe_controlloop_timeinputsetnumber1
1467  MODULE PROCEDURE cmfe_controlloop_timeinputsetobj
1468  END INTERFACE cmfe_controlloop_timeinputset
1469 
1472  MODULE PROCEDURE cmfe_controlloop_timesgetnumber0
1473  MODULE PROCEDURE cmfe_controlloop_timesgetnumber1
1474  MODULE PROCEDURE cmfe_controlloop_timesgetobj
1475  END INTERFACE cmfe_controlloop_timesget
1476 
1479  MODULE PROCEDURE cmfe_controlloop_timessetnumber0
1480  MODULE PROCEDURE cmfe_controlloop_timessetnumber1
1481  MODULE PROCEDURE cmfe_controlloop_timessetobj
1482  END INTERFACE cmfe_controlloop_timesset
1483 
1486  MODULE PROCEDURE cmfe_controlloop_typesetnumber0
1487  MODULE PROCEDURE cmfe_controlloop_typesetnumber1
1488  MODULE PROCEDURE cmfe_controlloop_typesetobj
1489  END INTERFACE cmfe_controlloop_typeset
1490 
1491  PUBLIC cmfe_control_loop_node
1492 
1494 
1496 
1498 
1500 
1502 
1504 
1506 
1508 
1510 
1512 
1514 
1516 
1518 
1520 
1521 
1522 !!==================================================================================================================================
1523 !!
1524 !! COORDINATE_ROUTINES
1525 !!
1526 !!==================================================================================================================================
1527 
1528  !Module parameters
1529 
1553 
1554  !Module types
1555 
1556  !Module variables
1557 
1558  !Interfaces
1559 
1563  MODULE PROCEDURE cmfe_coordinatesystem_createfinishobj
1565 
1569  MODULE PROCEDURE cmfe_coordinatesystem_createstartobj
1570  END INTERFACE cmfe_coordinatesystem_createstart
1571 
1574  MODULE PROCEDURE cmfe_coordinatesystem_destroynumber
1575  MODULE PROCEDURE cmfe_coordinatesystem_destroyobj
1576  END INTERFACE cmfe_coordinatesystem_destroy
1577 
1581  MODULE PROCEDURE cmfe_coordinatesystem_dimensiongetobj
1583 
1587  MODULE PROCEDURE cmfe_coordinatesystem_dimensionsetobj
1589 
1592  MODULE PROCEDURE cmfe_coordinatesystem_focusgetnumber
1593  MODULE PROCEDURE cmfe_coordinatesystem_focusgetobj
1594  END INTERFACE cmfe_coordinatesystem_focusget
1595 
1598  MODULE PROCEDURE cmfe_coordinatesystem_focussetnumber
1599  MODULE PROCEDURE cmfe_coordinatesystem_focussetobj
1600  END INTERFACE cmfe_coordinatesystem_focusset
1601 
1607 
1613 
1616  MODULE PROCEDURE cmfe_coordinatesystem_typegetnumber
1617  MODULE PROCEDURE cmfe_coordinatesystem_typegetobj
1618  END INTERFACE cmfe_coordinatesystem_typeget
1619 
1622  MODULE PROCEDURE cmfe_coordinatesystem_typesetnumber
1623  MODULE PROCEDURE cmfe_coordinatesystem_typesetobj
1624  END INTERFACE cmfe_coordinatesystem_typeset
1625 
1628  MODULE PROCEDURE cmfe_coordinatesystem_origingetnumber
1629  MODULE PROCEDURE cmfe_coordinatesystem_origingetobj
1630  END INTERFACE cmfe_coordinatesystem_originget
1631 
1634  MODULE PROCEDURE cmfe_coordinatesystem_originsetnumber
1635  MODULE PROCEDURE cmfe_coordinatesystem_originsetobj
1636  END INTERFACE cmfe_coordinatesystem_originset
1637 
1643 
1649 
1653 
1656 
1658 
1660 
1662 
1664 
1666 
1668 
1670 
1672 
1673 !!==================================================================================================================================
1674 !!
1675 !! DATA_POINT_ROUTINES
1676 !!
1677 !!==================================================================================================================================
1678 
1679  !Module parameters
1680 
1681  !Module types
1682 
1683  !Module variables
1684 
1685  !Interfaces
1686 
1689  MODULE PROCEDURE cmfe_datapoints_createfinishnumber
1690  MODULE PROCEDURE cmfe_datapoints_createfinishobj
1691  END INTERFACE cmfe_datapoints_createfinish
1692 
1695  MODULE PROCEDURE cmfe_datapoints_createstartnumber
1696  MODULE PROCEDURE cmfe_datapoints_createstartobj
1698  END INTERFACE cmfe_datapoints_createstart
1699 
1702  MODULE PROCEDURE cmfe_datapoints_destroynumber
1703  MODULE PROCEDURE cmfe_datapoints_destroyobj
1704  END INTERFACE cmfe_datapoints_destroy
1705 
1711 
1714  MODULE PROCEDURE cmfe_datapoints_labelgetcnumber
1715  MODULE PROCEDURE cmfe_datapoints_labelgetcobj
1716  MODULE PROCEDURE cmfe_datapoints_labelgetvsnumber
1717  MODULE PROCEDURE cmfe_datapoints_labelgetvsobj
1718  END INTERFACE cmfe_datapoints_labelget
1719 
1722  MODULE PROCEDURE cmfe_datapoints_labelsetcnumber
1723  MODULE PROCEDURE cmfe_datapoints_labelsetcobj
1724  MODULE PROCEDURE cmfe_datapoints_labelsetvsnumber
1725  MODULE PROCEDURE cmfe_datapoints_labelsetvsobj
1726  END INTERFACE cmfe_datapoints_labelset
1727 
1730  MODULE PROCEDURE cmfe_datapoints_usernumbergetnumber
1731  MODULE PROCEDURE cmfe_datapoints_usernumbergetobj
1732  END INTERFACE cmfe_datapoints_usernumberget
1733 
1736  MODULE PROCEDURE cmfe_datapoints_usernumbersetnumber
1737  MODULE PROCEDURE cmfe_datapoints_usernumbersetobj
1738  END INTERFACE cmfe_datapoints_usernumberset
1739 
1742  MODULE PROCEDURE cmfe_datapoints_valuesgetnumber
1743  MODULE PROCEDURE cmfe_datapoints_valuesgetobj
1744  END INTERFACE cmfe_datapoints_valuesget
1745 
1748  MODULE PROCEDURE cmfe_datapoints_valuessetnumber
1749  MODULE PROCEDURE cmfe_datapoints_valuessetobj
1750  END INTERFACE cmfe_datapoints_valuesset
1751 
1754  MODULE PROCEDURE cmfe_datapoints_weightsgetnumber
1755  MODULE PROCEDURE cmfe_datapoints_weightsgetobj
1756  END INTERFACE cmfe_datapoints_weightsget
1757 
1760  MODULE PROCEDURE cmfe_datapoints_weightssetnumber
1761  MODULE PROCEDURE cmfe_datapoints_weightssetobj
1762  END INTERFACE cmfe_datapoints_weightsset
1763 
1765 
1767 
1769 
1771 
1773 
1775 
1777 
1778 !!==================================================================================================================================
1779 !!
1780 !! DATA_PROJECTION_ROUTINES
1781 !!
1782 !!==================================================================================================================================
1783 
1784  !Module parameters
1785 
1798 
1799  !Module types
1800 
1801  !Module variables
1802 
1803  !Interfaces
1804 
1810 
1816 
1820  MODULE PROCEDURE cmfe_dataprojection_createfinishobj
1821  END INTERFACE cmfe_dataprojection_createfinish
1822 
1825  MODULE PROCEDURE cmfe_dataprojection_createstartnumber
1826  MODULE PROCEDURE cmfe_dataprojection_createstartobj
1827  END INTERFACE cmfe_dataprojection_createstart
1828 
1831  MODULE PROCEDURE cmfe_dataprojection_destroynumber
1832  MODULE PROCEDURE cmfe_dataprojection_destroyobj
1833  END INTERFACE cmfe_dataprojection_destroy
1834 
1841 
1847 
1853 
1859 
1865 
1871 
1877 
1883 
1890 
1896 
1902 
1908 
1914 
1918  MODULE PROCEDURE cmfe_dataprojection_startingxigetobj
1919  END INTERFACE cmfe_dataprojection_startingxiget
1920 
1924  MODULE PROCEDURE cmfe_dataprojection_startingxisetobj
1925  END INTERFACE cmfe_dataprojection_startingxiset
1926 
1931  MODULE PROCEDURE cmfe_dataprojection_elementsetobj
1932  END INTERFACE cmfe_dataprojection_elementset
1933 
1938  MODULE PROCEDURE cmfe_dataprojection_labelgetcobj
1941  MODULE PROCEDURE cmfe_dataprojection_labelgetvsobj
1942  END INTERFACE cmfe_dataprojection_labelget
1943 
1948  MODULE PROCEDURE cmfe_dataprojection_labelsetcobj
1951  MODULE PROCEDURE cmfe_dataprojection_labelsetvsobj
1952  END INTERFACE cmfe_dataprojection_labelset
1953 
1959 
1965 
1971 
1977 
1983 
1986  MODULE PROCEDURE cmfe_dataprojection_resultxigetnumber
1987  MODULE PROCEDURE cmfe_dataprojection_resultxigetobj
1988  END INTERFACE cmfe_dataprojection_resultxiget
1989 
1992  MODULE PROCEDURE cmfe_dataprojection_resultxisetnumber
1993  MODULE PROCEDURE cmfe_dataprojection_resultxisetobj
1994  END INTERFACE cmfe_dataprojection_resultxiset
1995 
2001 
2003 
2005 
2007 
2009 
2011 
2013 
2015 
2017 
2019 
2021 
2023 
2025 
2027 
2029 
2031 
2033 
2035 
2037 
2039 
2041 
2043 
2044 !!==================================================================================================================================
2045 !!
2046 !! EQUATIONS_ROUTINES
2047 !!
2048 !!==================================================================================================================================
2049 
2050  !Module parameters
2051 
2059  INTEGER(INTG), PARAMETER :: cmfe_equations_no_output = equations_no_output
2083  INTEGER(INTG), PARAMETER :: cmfe_equations_linear = equations_linear
2084  INTEGER(INTG), PARAMETER :: cmfe_equations_nonlinear = equations_nonlinear
2091  INTEGER(INTG), PARAMETER :: cmfe_equations_static = equations_static
2092  INTEGER(INTG), PARAMETER :: cmfe_equations_quasistatic = equations_quasistatic
2101  INTEGER(INTG), PARAMETER :: cmfe_equations_jacobian_finite_difference_calculated = equations_jacobian_finite_difference_calculated
2102  INTEGER(INTG), PARAMETER :: cmfe_equations_jacobian_analytic_calculated = equations_jacobian_analytic_calculated
2105 
2106  !Module types
2107 
2108  !Module variables
2109 
2110  !Interfaces
2111 
2114  MODULE PROCEDURE cmfe_equations_destroynumber
2115  MODULE PROCEDURE cmfe_equations_destroyobj
2116  END INTERFACE cmfe_equations_destroy
2117 
2120  MODULE PROCEDURE cmfe_equations_linearitytypegetnumber
2121  MODULE PROCEDURE cmfe_equations_linearitytypegetobj
2122  END INTERFACE cmfe_equations_linearitytypeget
2123 
2126  MODULE PROCEDURE cmfe_equations_lumpingtypegetnumber
2127  MODULE PROCEDURE cmfe_equations_lumpingtypegetobj
2128  END INTERFACE cmfe_equations_lumpingtypeget
2129 
2132  MODULE PROCEDURE cmfe_equations_lumpingtypesetnumber
2133  MODULE PROCEDURE cmfe_equations_lumpingtypesetobj
2134  END INTERFACE cmfe_equations_lumpingtypeset
2135 
2138  MODULE PROCEDURE cmfe_equations_outputtypegetnumber
2139  MODULE PROCEDURE cmfe_equations_outputtypegetobj
2140  END INTERFACE cmfe_equations_outputtypeget
2141 
2144  MODULE PROCEDURE cmfe_equations_outputtypesetnumber
2145  MODULE PROCEDURE cmfe_equations_outputtypesetobj
2146  END INTERFACE cmfe_equations_outputtypeset
2147 
2150  MODULE PROCEDURE cmfe_equations_sparsitytypegetnumber
2151  MODULE PROCEDURE cmfe_equations_sparsitytypegetobj
2152  END INTERFACE cmfe_equations_sparsitytypeget
2153 
2156  MODULE PROCEDURE cmfe_equations_sparsitytypesetnumber
2157  MODULE PROCEDURE cmfe_equations_sparsitytypesetobj
2158  END INTERFACE cmfe_equations_sparsitytypeset
2159 
2165 
2167 
2169 
2171 
2173 
2175 
2177 
2181 
2182  PUBLIC cmfe_equations_destroy
2183 
2185 
2187 
2189 
2191 
2193 
2195 
2197 
2199 
2201 
2203 
2205 
2207 
2209 
2211 
2213 
2215 
2217 
2219 
2221 
2222 !!==================================================================================================================================
2223 !!
2224 !! EQUATIONS_SET_CONSTANTS
2225 !!
2226 !!==================================================================================================================================
2227 
2228  !Module parameters
2229 
2252  INTEGER(INTG), PARAMETER :: cmfe_equations_set_no_type = equations_set_no_type
2272  & EQUATIONS_SET_ADVECTION_DIFFUSION_EQUATION_TYPE !<Advection-Diffusion equation equations set type \see OPENCMISS_EquationsSetTypes,OPENCMISS
2282  & EQUATIONS_SET_FINITE_ELASTICITY_NAVIER_STOKES_TYPE !<Finite Elasticity Navier Stokes equations set type \see OPENCMISS_EquationsSetTypes,OPENCMISS
2285  & EQUATIONS_SET_DIFFUSION_ADVECTION_DIFFUSION_TYPE !<Diffusion Advection Diffusion equations set type \see OPENCMISS_EquationsSetTypes,OPENCMISS
2288 
2297  & EQUATIONS_SET_TWO_DIMENSIONAL_PLANE_STRESS_SUBTYPE !<Plane stress linear elasticity equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
2305  & EQUATIONS_SET_INCOMPRESSIBLE_MOONEY_RIVLIN_SUBTYPE !< Incompressible Mooney-Rivlin constitutive law for finite elasticity equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
2309  & 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
2312  INTEGER(INTG), PARAMETER :: cmfe_equations_set_activecontraction_subtype =&
2313  & EQUATIONS_SET_ACTIVECONTRACTION_SUBTYPE !< Active contraction/costa-based law with quasistatic time loop for finite elasticity equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
2316  & EQUATIONS_SET_TRANSVERSE_ISOTROPIC_EXPONENTIAL_SUBTYPE !< Transverse isotropic exponential constitutive law for finite elasticity equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
2320  & 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
2324  & EQUATIONS_SET_COMPRESSIBLE_FINITE_ELASTICITY_SUBTYPE !<Compressible version for finite elasticity equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
2328  & EQUATIONS_SET_TRANSVERSE_ISOTROPIC_GUCCIONE_SUBTYPE !< Transverse isotropic Guccione constitutive law for finite elasticity equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
2332  & 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
2336  & EQUATIONS_SET_GUCCIONE_ACTIVECONTRACTION_SUBTYPE !< Transverse isotropic Guccione constitutive law with active contraction subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
2340  & EQUATIONS_SET_ELASTICITY_DARCY_INRIA_MODEL_SUBTYPE !<INRIA Model for finite elasticity coupled with Darcy equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
2344  & EQUATIONS_SET_INCOMPRESSIBLE_ELASTICITY_DRIVEN_DARCY_SUBTYPE !< Incompressible finite elasticity with Darcy flow driven by solid hydrostatic pressure \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
2348  & EQUATIONS_SET_INCOMPRESSIBLE_ELAST_MULTI_COMP_DARCY_SUBTYPE
2351  & EQUATIONS_SET_ORTHOTROPIC_MATERIAL_HOLZAPFEL_OGDEN_SUBTYPE !< Orthotropic Holzapfel-Ogden constitutive law for finite elasticity equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
2354  &
2356  & EQUATIONS_SET_ELASTICITY_FLUID_PRESSURE_STATIC_INRIA_SUBTYPE !< Static finite elasticity coupled with fluid pressure set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
2360  & EQUATIONS_SET_ELASTICITY_FLUID_PRES_HOLMES_MOW_ACTIVE_SUBTYPE !<Holmes and Mow's poroelastic constitutive relation subtype with active contraction \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
2361  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_TRANSVERSE_ISOTROPIC_POLYNOMIAL_SUBTYPE = &
2362  & EQUATIONS_SET_TRANSVERSE_ISOTROPIC_POLYNOMIAL_SUBTYPE !<Transverse isotropic constitutive law for finite elasticity equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
2363  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_ANISOTROPIC_POLYNOMIAL_SUBTYPE = &
2364  & EQUATIONS_SET_ANISOTROPIC_POLYNOMIAL_SUBTYPE !<Anisotropic polynomial constitutive law for finite elasticity equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
2365  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_ANISOTROPIC_POLYNOMIAL_ACTIVE_SUBTYPE = &
2366  & EQUATIONS_SET_ANISOTROPIC_POLYNOMIAL_ACTIVE_SUBTYPE !<Anisotropic polynomial active constitutive law for finite elasticity equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
2367  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_TRANSVERSE_ISOTROPIC_HUMPHREY_YIN_SUBTYPE= &
2368  & EQUATIONS_SET_TRANSVERSE_ISOTROPIC_HUMPHREY_YIN_SUBTYPE !<Humphrey and Yin transversely isotropic constitutive relation subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
2369  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_STATIC_STOKES_SUBTYPE = EQUATIONS_SET_STATIC_STOKES_SUBTYPE !<Static Stokes equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
2370  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_LAPLACE_STOKES_SUBTYPE = EQUATIONS_SET_LAPLACE_STOKES_SUBTYPE !<Laplace type Stokes equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
2371  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_TRANSIENT_STOKES_SUBTYPE = EQUATIONS_SET_TRANSIENT_STOKES_SUBTYPE !<Transient Stokes equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
2372  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_ALE_STOKES_SUBTYPE = EQUATIONS_SET_ALE_STOKES_SUBTYPE !<ALE Stokes equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
2373  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_PGM_STOKES_SUBTYPE = EQUATIONS_SET_PGM_STOKES_SUBTYPE !<PGM Stokes equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
2374  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_OPTIMISED_STOKES_SUBTYPE = EQUATIONS_SET_OPTIMISED_STOKES_SUBTYPE !<Optimised Stokes equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
2375  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
2376  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
2377  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
2378  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_TRANSIENT_RBS_NAVIER_STOKES_SUBTYPE = &
2379  & EQUATIONS_SET_TRANSIENT_RBS_NAVIER_STOKES_SUBTYPE !<Transient residual-based stabilisation Navier-Stokes equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
2380  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_STATIC_RBS_NAVIER_STOKES_SUBTYPE = &
2381  & EQUATIONS_SET_STATIC_RBS_NAVIER_STOKES_SUBTYPE !<Transient residual-based stabilisation Navier-Stokes equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
2382  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_MULTISCALE3D_NAVIER_STOKES_SUBTYPE = &
2383  & EQUATIONS_SET_MULTISCALE3D_NAVIER_STOKES_SUBTYPE !<Transient stabilised 3D Navier-Stokes equations set with coupled multiscale boundaries subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
2384  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_CONSTITUTIVE_MU_NAVIER_STOKES_SUBTYPE = &
2385  & 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
2386  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_TRANSIENT1D_NAVIER_STOKES_SUBTYPE = &
2387  & EQUATIONS_SET_TRANSIENT1D_NAVIER_STOKES_SUBTYPE !<TRANSIENT1D Navier-Stokes equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
2388  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_TRANSIENT1D_ADV_NAVIER_STOKES_SUBTYPE = &
2389  & EQUATIONS_SET_TRANSIENT1D_ADV_NAVIER_STOKES_SUBTYPE !<TRANSIENT1D Navier-Stokes equations set subtype with coupled Advection \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
2390  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_CHARACTERISTIC_SUBTYPE = &
2391  & EQUATIONS_SET_CHARACTERISTIC_SUBTYPE !<Static Characteristics equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
2392  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_COUPLED1D0D_NAVIER_STOKES_SUBTYPE = &
2393  & EQUATIONS_SET_COUPLED1D0D_NAVIER_STOKES_SUBTYPE !<Coupled 1D-0D Navier-Stokes equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
2394  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_COUPLED1D0D_ADV_NAVIER_STOKES_SUBTYPE = &
2395  & EQUATIONS_SET_COUPLED1D0D_ADV_NAVIER_STOKES_SUBTYPE !<Coupled 1D-0D Navier-Stokes equations set subtype with coupled Advection \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
2396  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_STREE1D0D_SUBTYPE = &
2397  & EQUATIONS_SET_STREE1D0D_SUBTYPE !<Coupled 1D-0D Navier-Stokes equations set subtype with coupled Advection \see
2398  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_STREE1D0D_ADV_SUBTYPE = &
2399  & EQUATIONS_SET_STREE1D0D_ADV_SUBTYPE !<Coupled 1D-0D Navier-Stokes equations set subtype with coupled Advection \see
2400  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
2401  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
2402  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
2403  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_STANDARD_DARCY_SUBTYPE = EQUATIONS_SET_STANDARD_DARCY_SUBTYPE !<Standard Darcy equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
2404  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_QUASISTATIC_DARCY_SUBTYPE = EQUATIONS_SET_QUASISTATIC_DARCY_SUBTYPE !<Quasistatic Darcy equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
2405  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_ALE_DARCY_SUBTYPE = EQUATIONS_SET_ALE_DARCY_SUBTYPE !<ALE Darcy equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
2406  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_TRANSIENT_DARCY_SUBTYPE = EQUATIONS_SET_TRANSIENT_DARCY_SUBTYPE !<Transient Darcy equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
2407  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
2408  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
2409  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_BURGERS_SUBTYPE = EQUATIONS_SET_BURGERS_SUBTYPE !<Burgers equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
2410  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_GENERALISED_BURGERS_SUBTYPE = EQUATIONS_SET_GENERALISED_BURGERS_SUBTYPE !<Generalised Burgers equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
2411  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_STATIC_BURGERS_SUBTYPE = EQUATIONS_SET_STATIC_BURGERS_SUBTYPE !<Static Burgers equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
2412  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_INVISCID_BURGERS_SUBTYPE = EQUATIONS_SET_INVISCID_BURGERS_SUBTYPE !<Inviscid Burgers equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
2413 
2414  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_STANDARD_LAPLACE_SUBTYPE = EQUATIONS_SET_STANDARD_LAPLACE_SUBTYPE !<Standard Laplace equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
2415  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_GENERALISED_LAPLACE_SUBTYPE = EQUATIONS_SET_GENERALISED_LAPLACE_SUBTYPE !<Generalised Laplace equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
2416  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
2417  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_STATIC_POISEUILLE_SUBTYPE = EQUATIONS_SET_STATIC_POISEUILLE_SUBTYPE !<Static Poiseuille equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
2418  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_DYNAMIC_POISEUILLE_SUBTYPE = EQUATIONS_SET_DYNAMIC_POISEUILLE_SUBTYPE !<Dynamic Poiseuille equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
2419  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
2420  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_NONLINEAR_PRESSURE_POISSON_SUBTYPE = &
2421  & EQUATIONS_SET_NONLINEAR_PRESSURE_POISSON_SUBTYPE !<Vector source Poisson equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
2422  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
2423  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
2424  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
2425  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_EXTRACELLULAR_BIDOMAIN_POISSON_SUBTYPE = &
2426  & EQUATIONS_SET_EXTRACELLULAR_BIDOMAIN_POISSON_SUBTYPE !<Poisson equations set subtype, that is the extracellular bidomain equation \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
2427  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
2428  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
2429  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_EXPONENTIAL_SOURCE_POISSON_SUBTYPE = &
2430  & EQUATIONS_SET_EXPONENTIAL_SOURCE_POISSON_SUBTYPE !<Exponential source Poisson equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
2431  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_STANDARD_HELMHOLTZ_SUBTYPE = EQUATIONS_SET_STANDARD_HELMHOLTZ_SUBTYPE !<No source Helmholtz equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
2432  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_GENERALISED_HELMHOLTZ_SUBTYPE = EQUATIONS_SET_GENERALISED_HELMHOLTZ_SUBTYPE !<No source Helmholtz equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
2433  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
2434  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_CONSTANT_SOURCE_DIFFUSION_SUBTYPE = &
2435  & EQUATIONS_SET_CONSTANT_SOURCE_DIFFUSION_SUBTYPE !<Constant source diffusion equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
2436  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
2437  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_QUADRATIC_SOURCE_DIFFUSION_SUBTYPE = &
2438  & EQUATIONS_SET_QUADRATIC_SOURCE_DIFFUSION_SUBTYPE !<Quadratic source diffusion equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
2439  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_EXPONENTIAL_SOURCE_DIFFUSION_SUBTYPE = &
2440  & EQUATIONS_SET_EXPONENTIAL_SOURCE_DIFFUSION_SUBTYPE !<Exponential source diffusion equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
2441  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
2442  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_CONSTANT_SOURCE_ALE_DIFFUSION_SUBTYPE = &
2443  & EQUATIONS_SET_CONSTANT_SOURCE_ALE_DIFFUSION_SUBTYPE !<Constant source diffusion equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
2444  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_LINEAR_SOURCE_ALE_DIFFUSION_SUBTYPE = &
2445  & EQUATIONS_SET_LINEAR_SOURCE_ALE_DIFFUSION_SUBTYPE !<Linear source diffusion equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
2446  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_QUADRATIC_SOURCE_ALE_DIFFUSION_SUBTYPE = &
2447  & EQUATIONS_SET_QUADRATIC_SOURCE_ALE_DIFFUSION_SUBTYPE !<Quadratic source diffusion equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
2448  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_EXPONENTIAL_SOURCE_ALE_DIFFUSION_SUBTYPE = &
2449  & EQUATIONS_SET_EXPONENTIAL_SOURCE_ALE_DIFFUSION_SUBTYPE !<Exponential source diffusion equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
2450  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_MULTI_COMP_TRANSPORT_DIFFUSION_SUBTYPE = &
2451  & EQUATIONS_SET_MULTI_COMP_TRANSPORT_DIFFUSION_SUBTYPE !<Multi-compartment transport diffusion equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
2452 
2453  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_ADVECTION_SUBTYPE = &
2454  & EQUATIONS_SET_ADVECTION_SUBTYPE !<advection equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
2455  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_NO_SOURCE_ADVECTION_DIFFUSION_SUBTYPE = &
2456  & EQUATIONS_SET_NO_SOURCE_ADVECTION_DIFFUSION_SUBTYPE !<No source advection diffusion equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
2457  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_CONSTANT_SOURCE_ADVECTION_DIFFUSION_SUBTYPE = &
2458  & EQUATIONS_SET_CONSTANT_SOURCE_ADVECTION_DIFFUSION_SUBTYPE !<Constant source advection diffusion equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
2459  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_LINEAR_SOURCE_ADVECTION_DIFFUSION_SUBTYPE = &
2460  & EQUATIONS_SET_LINEAR_SOURCE_ADVECTION_DIFFUSION_SUBTYPE !<Linear source advection diffusion equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
2461  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_QUADRATIC_SOURCE_ADVEC_DIFF_SUBTYPE = &
2462  & EQUATIONS_SET_QUADRATIC_SOURCE_ADVECTION_DIFFUSION_SUBTYPE !<Quadratic source advection diffusion equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
2463  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_EXPONENTIAL_SOURCE_ADVEC_DIFF_SUBTYPE = &
2464  & EQUATIONS_SET_EXPONENTIAL_SOURCE_ADVECTION_DIFFUSION_SUBTYPE !<Exponential source advection diffusion equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
2465  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_CONSTITUTIVE_LAW_IN_CELLML_EVALUATE_SUBTYPE = &
2466  & EQUATIONS_SET_CONSTITUTIVE_LAW_IN_CELLML_EVALUATE_SUBTYPE !<In CellML evaluated incompressible material law for finite elasticity equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
2467  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_CONSTIT_AND_GROWTH_LAW_IN_CELLML_SUBTYPE = &
2468  & 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
2469  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_NO_SOURCE_ALE_ADVECTION_DIFFUSION_SUBTYPE = &
2470  & EQUATIONS_SET_NO_SOURCE_ALE_ADVECTION_DIFFUSION_SUBTYPE !<No source advection diffusion equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
2471  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_CONSTANT_SOURCE_ALE_ADVEC_DIFF_SUBTYPE = &
2472  & EQUATIONS_SET_CONSTANT_SOURCE_ALE_ADVECTION_DIFFUSION_SUBTYPE !<Constant source advection diffusion equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
2473  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_LINEAR_SOURCE_ALE_ADVEC_DIFF_SUBTYPE = &
2474  & EQUATIONS_SET_LINEAR_SOURCE_ALE_ADVECTION_DIFFUSION_SUBTYPE !<Linear source advection diffusion equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
2475  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_QUADRATIC_SOURCE_ALE_ADVEC_DIFF_SUBTYPE = &
2476  & EQUATIONS_SET_QUADRATIC_SOURCE_ALE_ADVECTION_DIFFUSION_SUBTYPE !<Quadratic source advection diffusion equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
2477  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_EXP_SOURCE_ALE_ADVECTION_DIFFUSION_SUBTYPE = &
2478  & EQUATIONS_SET_EXP_SOURCE_ALE_ADVECTION_DIFFUSION_SUBTYPE !<Exponential source advection diffusion equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
2479 
2480  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_NO_SOURCE_STATIC_ADVEC_DIFF_SUBTYPE = &
2481  & EQUATIONS_SET_NO_SOURCE_STATIC_ADVEC_DIFF_SUBTYPE !<No source advection diffusion equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
2482  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_CONSTANT_SOURCE_STATIC_ADVEC_DIFF_SUBTYPE = &
2483  & EQUATIONS_SET_CONSTANT_SOURCE_STATIC_ADVEC_DIFF_SUBTYPE !<Constant source advection diffusion equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
2484  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_LINEAR_SOURCE_STATIC_ADVEC_DIFF_SUBTYPE = &
2485  & EQUATIONS_SET_LINEAR_SOURCE_STATIC_ADVEC_DIFF_SUBTYPE !<Linear source advection diffusion equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
2486 
2487  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_NO_SOURCE_ADVECTION_DIFF_SUPG_SUBTYPE = &
2488  & EQUATIONS_SET_NO_SOURCE_ADVECTION_DIFF_SUPG_SUBTYPE !<No source advection diffusion equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
2489  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_CONSTANT_SOURCE_ADVECTION_DIFF_SUPG_SUBTYPE = &
2490  & EQUATIONS_SET_CONSTANT_SOURCE_ADVECTION_DIFF_SUPG_SUBTYPE !<Constant source advection diffusion equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
2491  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_LINEAR_SOURCE_ADVECTION_DIFF_SUPG_SUBTYPE = &
2492  & EQUATIONS_SET_LINEAR_SOURCE_ADVECTION_DIFF_SUPG_SUBTYPE !<Linear source advection diffusion equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
2493  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_QUAD_SOURCE_ADVECTION_DIFF_SUPG_SUBTYPE = &
2494  & EQUATIONS_SET_QUAD_SOURCE_ADVECTION_DIFF_SUPG_SUBTYPE !<Quadratic source advection diffusion equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
2495  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_EXP_SOURCE_ADVECTION_DIFF_SUPG_SUBTYPE = &
2496  & EQUATIONS_SET_EXP_SOURCE_ADVECTION_DIFF_SUPG_SUBTYPE !<Exponential source advection diffusion equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
2497 
2498  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_NO_SOURCE_ALE_ADVECTION_DIFF_SUPG_SUBTYPE = &
2499  & EQUATIONS_SET_NO_SOURCE_ALE_ADVECTION_DIFF_SUPG_SUBTYPE !<No source advection diffusion equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
2500  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_CONSTANT_SOURCE_ALE_ADVEC_DIFF_SUPG_SUBTYPE = &
2501  & EQUATIONS_SET_CONSTANT_SOURCE_ALE_ADVECTION_DIFF_SUPG_SUBTYPE !<Constant source advection diffusion equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
2502  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_LINEAR_SOURCE_ALE_ADVEC_DIFF_SUPG_SUBTYPE = &
2503  & EQUATIONS_SET_LINEAR_SOURCE_ALE_ADVECTION_DIFF_SUPG_SUBTYPE !<Linear source advection diffusion equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
2504  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_QUAD_SOURCE_ALE_ADVECTION_DIFF_SUPG_SUBTYPE = &
2505  & EQUATIONS_SET_QUAD_SOURCE_ALE_ADVECTION_DIFF_SUPG_SUBTYPE !<Quadratic source advection diffusion equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
2506  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_EXP_SOURCE_ALE_ADVECTION_DIFF_SUPG_SUBTYPE = &
2507  & EQUATIONS_SET_EXP_SOURCE_ALE_ADVECTION_DIFF_SUPG_SUBTYPE !<Exponential source advection diffusion equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
2508 
2509  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_NO_SOURCE_STATIC_ADVEC_DIFF_SUPG_SUBTYPE = &
2510  & EQUATIONS_SET_NO_SOURCE_STATIC_ADVEC_DIFF_SUPG_SUBTYPE !<No source advection diffusion equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
2511  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_CONST_SOURCE_STATIC_ADVEC_DIFF_SUPG_SUBTYPE = &
2512  & EQUATIONS_SET_CONSTANT_SOURCE_STATIC_ADVEC_DIFF_SUPG_SUBTYPE !<Constant source advection diffusion equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
2513  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_LIN_SOURCE_STATIC_ADVEC_DIFF_SUPG_SUBTYPE = &
2514  & EQUATIONS_SET_LINEAR_SOURCE_STATIC_ADVEC_DIFF_SUPG_SUBTYPE !<Linear source advection diffusion equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
2515  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_COUPLED_SOURCE_DIFFUSION_ADVEC_DIFF_SUBTYPE = &
2516  & EQUATIONS_SET_COUPLED_SOURCE_DIFFUSION_ADVEC_DIFFUSION_SUBTYPE !<Coupled source diffusion & advection-diffusion equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
2517  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_MULTI_COMP_TRANSPORT_ADVEC_DIFF_SUBTYPE = &
2518  & EQUATIONS_SET_MULTI_COMP_TRANSPORT_ADVEC_DIFF_SUBTYPE !<Multi-component transport advection-diffusion equations set \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
2519  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_MULT_COMP_TRANSPORT_ADVEC_DIFF_SUPG_SUBTYPE = &
2520  & EQUATIONS_SET_MULTI_COMP_TRANSPORT_ADVEC_DIFF_SUPG_SUBTYPE !<Multi-component transport advection-diffusion equations set using SUPG scheme \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
2521 
2522  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_CELLML_REAC_SPLIT_REAC_DIFF_SUBTYPE = &
2523  & EQUATIONS_SET_CELLML_REAC_SPLIT_REAC_DIFF_SUBTYPE !CellML Reaction Diffusion with order splitting \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
2524  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_CELLML_REAC_NO_SPLIT_REAC_DIFF_SUBTYPE = &
2525  & EQUATIONS_SET_CELLML_REAC_NO_SPLIT_REAC_DIFF_SUBTYPE !CellML Reaction Diffusion without order splitting \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
2526 
2527  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_CONSTANT_REAC_DIFF_SUBTYPE = &
2528  & EQUATIONS_SET_CONSTANT_REAC_DIFF_SUBTYPE !Standard Reaction Diffusion without order splitting, and constant source \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
2529 
2530 
2531  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_MONODOMAIN_BUENOOROVIO_SUBTYPE= EQUATIONS_SET_MONODOMAIN_BUENOOROVIO_SUBTYPE !<First monodomain equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
2532  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_MONODOMAIN_TENTUSSCHER06_SUBTYPE= EQUATIONS_SET_MONODOMAIN_TENTUSSCHER06_SUBTYPE !<First monodomain equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
2533 
2534  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_FIRST_BIDOMAIN_SUBTYPE = EQUATIONS_SET_FIRST_BIDOMAIN_SUBTYPE !<First bidomain equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
2535  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_SECOND_BIDOMAIN_SUBTYPE = EQUATIONS_SET_SECOND_BIDOMAIN_SUBTYPE !<Second bidomain equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
2536  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_STANDARD_DATA_FITTING_SUBTYPE = &
2537  & EQUATIONS_SET_STANDARD_DATA_FITTING_SUBTYPE !<Standard Galerkin Projection equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
2538  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_GENERALISED_DATA_FITTING_SUBTYPE = &
2539  & EQUATIONS_SET_GENERALISED_DATA_FITTING_SUBTYPE !<Generalised Galerkin Projection equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
2540  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_MAT_PROPERTIES_DATA_FITTING_SUBTYPE = &
2541  & EQUATIONS_SET_MAT_PROPERTIES_DATA_FITTING_SUBTYPE !<Material Properties Galerkin Projection equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
2542  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_MAT_PROP_INRIA_MODEL_DATA_FITTING_SUBTYPE = &
2543  & EQUATIONS_SET_MAT_PROPERTIES_INRIA_MODEL_DATA_FITTING_SUBTYPE !<Material Properties INRIA Model Galerkin Projection equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
2544  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_VECTOR_DATA_FITTING_SUBTYPE = &
2545  & EQUATIONS_SET_VECTOR_DATA_FITTING_SUBTYPE !<Standard Galerkin Projection equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
2546  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_DIVFREE_VECTOR_DATA_FITTING_SUBTYPE = &
2547  & EQUATIONS_SET_DIVFREE_VECTOR_DATA_FITTING_SUBTYPE !<Standard Galerkin Projection equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
2548  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_DATA_POINT_VECTOR_STATIC_FITTING_SUBTYPE = &
2549  & EquationsSet_DataPointVectorStaticFittingSubtype !<Standard static Galerkin Projection using data points subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
2550  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_DATA_PT_VECTOR_QUASISTATIC_FITTING_SUBTYPE = &
2551  & EquationsSet_DataPointVectorQuasistaticFittingSubtype !<Standard quasistatic Galerkin Projection using data points subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
2552  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_VECTOR_DATA_PRE_FITTING_SUBTYPE = &
2553  & EQUATIONS_SET_VECTOR_DATA_PRE_FITTING_SUBTYPE !<Standard Galerkin Projection equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
2554  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_DIVFREE_VECTOR_DATA_PRE_FITTING_SUBTYPE = &
2555  & EQUATIONS_SET_DIVFREE_VECTOR_DATA_PRE_FITTING_SUBTYPE !<Standard Galerkin Projection equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
2556 
2557 
2558  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_STANDARD_ELASTICITY_DARCY_SUBTYPE = &
2559  & EQUATIONS_SET_STANDARD_ELASTICITY_DARCY_SUBTYPE !<Standard Elasticity Darcy equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
2560  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_COUPLED_SOURCE_DIFFUSION_DIFFUSION_SUBTYPE = &
2561  & EQUATIONS_SET_COUPLED_SOURCE_DIFFUSION_DIFFUSION_SUBTYPE !<Coupled source diffusion-diffusion equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
2562  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_STANDARD_MONODOMAIN_ELASTICITY_SUBTYPE = &
2563  & EQUATIONS_SET_STANDARD_MONODOMAIN_ELASTICITY_SUBTYPE !<Standard Monodomain Elasticity equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
2564  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_1D3D_MONODOMAIN_ELASTICITY_SUBTYPE = &
2565  & EQUATIONS_SET_1D3D_MONODOMAIN_ELASTICITY_SUBTYPE !<Coupled 1D Monodomain 3D Elasticity equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
2566  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_MONODOMAIN_ELASTICITY_W_TITIN_SUBTYPE = &
2567  & EQUATIONS_SET_MONODOMAIN_ELASTICITY_W_TITIN_SUBTYPE !<Coupled 1D Monodomain 3D Elasticity equations set subtype with titin \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
2568  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_MONODOMAIN_ELASTICITY_VELOCITY_SUBTYPE = &
2569  & EQUATIONS_SET_MONODOMAIN_ELASTICITY_VELOCITY_SUBTYPE !<Coupled 1D Monodomain 3D Elasticity equations set subtype with force-velocity relation \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
2570  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_1D3D_MONODOMAIN_ACTIVE_STRAIN_SUBTYPE = &
2571  & EQUATIONS_SET_1D3D_MONODOMAIN_ACTIVE_STRAIN_SUBTYPE !<Coupled 1D Monodomain 3D Elasticity equations set subtype \see OPENCMISS_EquationsSetSubtypes,OPENCMISS
2572  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_FINITE_ELASTICITY_NAVIER_STOKES_ALE_SUBTYPE = &
2573  & EQUATIONS_SET_FINITE_ELASTICITY_NAVIER_STOKES_ALE_SUBTYPE !<Finite Elasticity Navier Stokes ALE equations set subtype \see OPENCMISS_EquationsSetSubtype,OPENCMISS
2574 
2575  !>@}
2576  !> \addtogroup OPENCMISS_EquationsSetSolutionMethods OPENCMISS::EquationsSet::SolutionMethods
2577  !> \brief The solution method parameters
2578  !> \see OPENCMISS::EquationsSet,OPENCMISS
2579  !>@{
2580  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_FEM_SOLUTION_METHOD = EQUATIONS_SET_FEM_SOLUTION_METHOD !<Finite Element Method solution method. \see OPENCMISS_EquationsSetSolutionMethods,OPENCMISS
2581  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_BEM_SOLUTION_METHOD = EQUATIONS_SET_BEM_SOLUTION_METHOD !<Boundary Element Method solution method. \see OPENCMISS_EquationsSetSolutionMethods,OPENCMISS
2582  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_FD_SOLUTION_METHOD = EQUATIONS_SET_FD_SOLUTION_METHOD !<Finite Difference solution method. \see OPENCMISS_EquationsSetSolutionMethods,OPENCMISS
2583  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_FV_SOLUTION_METHOD = EQUATIONS_SET_FV_SOLUTION_METHOD !<Finite Volume solution method. \see OPENCMISS_EquationsSetSolutionMethods,OPENCMISS
2584  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
2585  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_GFD_SOLUTION_METHOD = EQUATIONS_SET_GFD_SOLUTION_METHOD !<Grid-based Finite Difference solution method. \see OPENCMISS_EquationsSetSolutionMethods,OPENCMISS
2586  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_GFV_SOLUTION_METHOD = EQUATIONS_SET_GFV_SOLUTION_METHOD !<Grid-based Finite Volume solution method. \see OPENCMISS_EquationsSetSolutionMethods,OPENCMISS
2587  !>@}
2588 
2589  !> \addtogroup OPENCMISS_EquationsSetDerivedTypes OPENCMISS::EquationsSet::DerivedTypes
2590  !> \brief EquationsSet derived type parameters
2591  !> \see OPENCMISS::EquationsSet,OPENCMISS
2592  !>@{
2593  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_DERIVED_STRAIN = EQUATIONS_SET_DERIVED_STRAIN !<Strain tensor field output. \see OPENCMISS_EquationsSetDerivedTypes,OPENCMISS
2594  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_DERIVED_STRESS = EQUATIONS_SET_DERIVED_STRESS !<Stress tensor field output. \see OPENCMISS_EquationsSetDerivedTypes,OPENCMISS
2595  !>@}
2596 
2597  !> \addtogroup OPENCMISS_EquationsSetTensorEvaluateTypes OPENCMISS::EquationsSet::TensorEvaluateTypes
2598  !> \brief Type of tensor to evaluate from an EquationsSet
2599  !> \see OPENCMISS::EquationsSet,OPENCMISS
2600  !>@{
2601  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_EVALUATE_DEFORMATION_GRADIENT_TENSOR = &
2602  & EQUATIONS_SET_EVALUATE_DEFORMATION_GRADIENT_TENSOR !<Deformation gradient tensor \see OPENCMISS_EquationsSetTensorEvaluateTypes,OPENCMISS
2603  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_EVALUATE_R_CAUCHY_GREEN_DEFORMATION_TENSOR = &
2604  & EQUATIONS_SET_EVALUATE_R_CAUCHY_GREEN_DEFORMATION_TENSOR !<Right Cauchy-Green deformation field \see OPENCMISS_EquationsSetTensorEvaluateTypes,OPENCMISS
2605  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_EVALUATE_GREEN_LAGRANGE_STRAIN_TENSOR = &
2606  & EQUATIONS_SET_EVALUATE_GREEN_LAGRANGE_STRAIN_TENSOR !<Green-Lagrange strain tensor \see OPENCMISS_EquationsSetTensorEvaluateTypes,OPENCMISS
2607  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_EVALUATE_CAUCHY_STRESS_TENSOR = &
2608  & EQUATIONS_SET_EVALUATE_CAUCHY_STRESS_TENSOR !<Cauchy-stress tensor \see OPENCMISS_EquationsSetTensorEvaluateTypes,OPENCMISS
2609  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_EVALUATE_SECOND_PK_STRESS_TENSOR = &
2610  & EQUATIONS_SET_EVALUATE_SECOND_PK_STRESS_TENSOR !<Second Piola Kirchhoff-stress tensor \see OPENCMISS_EquationsSetTensorEvaluateTypes,OPENCMISS
2611  !>@}
2612 
2613  !> \addtogroup OPENCMISS_EquationsSetDynamicMatrixTypes OPENCMISS::EquationsSet::DynamicMatrixTypes
2614  !> \brief Type of matrix in a dynamic equations set
2615  !>@{
2616  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_MATRIX_STIFFNESS=EQUATIONS_MATRIX_STIFFNESS !<A stiffness matrix (multiplies displacement values)
2617  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_MATRIX_DAMPING=EQUATIONS_MATRIX_DAMPING !<A damping matrix (multiplies velocity values)
2618  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_MATRIX_MASS=EQUATIONS_MATRIX_MASS !<A mass matrix (multiplies acceleration values)
2619  !>@}
2620 
2621  !> \addtogroup OPENCMISS_EquationsSetAnalyticFunctionTypes OPENCMISS::EquationsSet::AnalyticFunctionTypes
2622  !> \brief The analytic function types.
2623  !> \see OPENCMISS::EquationsSet,OPENCMISS
2624  !>@{
2625  !> \addtogroup OPENCMISS_EquationsSetLaplaceAnalyticFunctionTypes OPENCMISS::EquationsSet::AnalyticFunctionTypes::Laplace
2626  !> \brief The analytic function types for a Laplace equation
2627  !> \see OPENCMISS::EquationsSet::AnalyticFunctionTypes,OPENCMISS
2628  !>@{
2629  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
2630  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
2631  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
2632  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
2633  !>@}
2634  !> \addtogroup OPENCMISS_EquationsSetHelmholtzAnalyticFunctionTypes OPENCMISS::EquationsSet::AnalyticFunctionTypes::Helmholtz
2635  !> \brief The analytic function types for a Helmholtz equation
2636  !> \see OPENCMISS::EquationsSet::AnalyticFunctionTypes,OPENCMISS
2637  !>@{
2638  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
2639  !>@}
2640  !> \addtogroup OPENCMISS_PoiseuilleAnalyticFunctionTypes OPENCMISS::EquationsSet::AnalyticFunctionTypes::Poiseuille
2641  !> \brief The analytic function types for a Poiseuille equation.
2642  !> \see OPENCMISS::EquationsSet::AnalyticFunctionTypes,OPENCMISS
2643  !>@{
2644  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
2645  !>@}
2646  !> \addtogroup OPENCMISS_PoissonAnalyticFunctionTypes OPENCMISS::EquationsSet::AnalyticFunctionTypes::Poisson
2647  !> \brief The analytic function types for a Poisson equation.
2648  !> \see OPENCMISS::EquationsSet::AnalyticFunctionTypes,OPENCMISS
2649  !>@{
2650  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
2651  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_POISSON_EQUATION_TWO_DIM_2 = EQUATIONS_SET_POISSON_EQUATION_TWO_DIM_2 !<u=tbd \see OPENCMISS_EquationsSetPoissonAnalyticFunctionTypes,OPENCMISS
2652  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_POISSON_EQUATION_TWO_DIM_3 = EQUATIONS_SET_POISSON_EQUATION_TWO_DIM_3 !<u=tbd \see OPENCMISS_EquationsSetPoissonAnalyticFunctionTypes,OPENCMISS
2653  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
2654  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_POISSON_EQUATION_THREE_DIM_2 = EQUATIONS_SET_POISSON_EQUATION_THREE_DIM_2 !<u=tbd \see OPENCMISS_EquationsSetPoissonAnalyticFunctionTypes,OPENCMISS
2655  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_POISSON_EQUATION_THREE_DIM_3 = EQUATIONS_SET_POISSON_EQUATION_THREE_DIM_3 !<u=tbd \see OPENCMISS_EquationsSetPoissonAnalyticFunctionTypes,OPENCMISS
2656  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_PRESSURE_POISSON_THREE_DIM_1 = EQUATIONS_SET_PRESSURE_POISSON_THREE_DIM_1 !<u=tbd \see OPENCMISS_EquationsSetPoissonAnalyticFunctionTypes,OPENCMISS
2657  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_PRESSURE_POISSON_THREE_DIM_2 = EQUATIONS_SET_PRESSURE_POISSON_THREE_DIM_2 !<u=tbd \see OPENCMISS_EquationsSetPoissonAnalyticFunctionTypes,OPENCMISS
2658  !>@}
2659  !> \addtogroup OPENCMISS_DiffusionAnalyticFunctionTypes OPENCMISS::EquationsSet::AnalyticFunctionTypes::Diffusion
2660  !> \brief The analytic function types for a diffusion equation.
2661  !> \see OPENCMISS::EquationsSet::AnalyticFunctionTypes,OPENCMISS
2662  !>@{
2663  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_DIFFUSION_EQUATION_ONE_DIM_1 = EQUATIONS_SET_DIFFUSION_EQUATION_ONE_DIM_1
2664  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
2665  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_DIFFUSION_EQUATION_THREE_DIM_1 = EQUATIONS_SET_DIFFUSION_EQUATION_THREE_DIM_1 !<
2666  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_LINEAR_SOURCE_DIFFUSION_THREE_DIM_1 = &
2667  & EQUATIONS_SET_LINEAR_SOURCE_DIFFUSION_EQUATION_THREE_DIM_1
2668  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_QUADRATIC_SOURCE_DIFFUSION_ONE_DIM_1 = &
2669  & EQUATIONS_SET_QUADRATIC_SOURCE_DIFFUSION_EQUATION_ONE_DIM_1
2670  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_EXPONENTIAL_SOURCE_DIFFUSION_ONE_DIM_1 = &
2671  & EQUATIONS_SET_EXPONENTIAL_SOURCE_DIFFUSION_EQUATION_ONE_DIM_1
2672 
2673  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_MULTI_COMP_DIFFUSION_TWO_COMP_TWO_DIM = &
2674  & EQUATIONS_SET_MULTI_COMP_DIFFUSION_TWO_COMP_TWO_DIM !<Prescribed solution, using a source term to correct for error - 2D with 2 compartments
2675  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_MULTI_COMP_DIFFUSION_TWO_COMP_THREE_DIM = &
2676  & EQUATIONS_SET_MULTI_COMP_DIFFUSION_TWO_COMP_THREE_DIM !<Prescribed solution, using a source term to correct for error - 3D with 2 compartments
2677  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_MULTI_COMP_DIFFUSION_THREE_COMP_THREE_DIM = &
2678  & EQUATIONS_SET_MULTI_COMP_DIFFUSION_THREE_COMP_THREE_DIM !<Prescribed solution, using a source term to correct for error - 3D with 3 compartments
2679  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_MULTI_COMP_DIFFUSION_FOUR_COMP_THREE_DIM = &
2680  & EQUATIONS_SET_MULTI_COMP_DIFFUSION_FOUR_COMP_THREE_DIM !<Prescribed solution, using a source term to correct for error - 3D with 3 compartments
2681  !>@}
2682  !> \addtogroup OPENCMISS_AdvectionDiffusionAnalyticFunctionTypes OPENCMISS::EquationsSet::AnalyticFunctionTypes::AdvectionDiffusion
2683  !> \brief The analytic function types for an advection-diffusion equation.
2684  !> \see OPENCMISS::EquationsSet::AnalyticFunctionTypes,OPENCMISS
2685  !>@{
2686  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_ADVECTION_DIFFUSION_EQUATION_TWO_DIM_1 = &
2687  & EQUATIONS_SET_ADVECTION_DIFFUSION_EQUATION_TWO_DIM_1 !<u=exp(-kt)*sin(sqrt(k)*(x*cos(phi)+y*sin(phi))) \see OPENCMISS_EquationsSetDiffusionAnalyticFunctionTypes,OPENCMISS
2688  !> \addtogroup OPENCMISS_StokesAnalyticFunctionTypes OPENCMISS::EquationsSet::AnalyticFunctionTypes::Stokes
2689  !> \brief The analytic function types for a Stokes equation.
2690  !> \see OPENCMISS::EquationsSet::AnalyticFunctionTypes,OPENCMISS
2691  !>@{
2692  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_STOKES_EQUATION_TWO_DIM_1 = EQUATIONS_SET_STOKES_EQUATION_TWO_DIM_1 !<u=tbd \see OPENCMISS_EquationsSetStokesAnalyticFunctionTypes,OPENCMISS
2693  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_STOKES_EQUATION_TWO_DIM_2 = EQUATIONS_SET_STOKES_EQUATION_TWO_DIM_2 !<u=tbd \see OPENCMISS_EquationsSetStokesAnalyticFunctionTypes,OPENCMISS
2694  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_STOKES_EQUATION_TWO_DIM_3 = EQUATIONS_SET_STOKES_EQUATION_TWO_DIM_3 !<u=tbd \see OPENCMISS_EquationsSetStokesAnalyticFunctionTypes,OPENCMISS
2695  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_STOKES_EQUATION_TWO_DIM_4 = EQUATIONS_SET_STOKES_EQUATION_TWO_DIM_4 !<u=tbd \see OPENCMISS_EquationsSetStokesAnalyticFunctionTypes,OPENCMISS
2696  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_STOKES_EQUATION_TWO_DIM_5 = EQUATIONS_SET_STOKES_EQUATION_TWO_DIM_5 !<u=tbd \see OPENCMISS_EquationsSetStokesAnalyticFunctionTypes,OPENCMISS
2697  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_STOKES_EQUATION_THREE_DIM_1 = EQUATIONS_SET_STOKES_EQUATION_THREE_DIM_1 !<u=tbd \see OPENCMISS_EquationsSetStokesAnalyticFunctionTypes,OPENCMISS
2698  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_STOKES_EQUATION_THREE_DIM_2 = EQUATIONS_SET_STOKES_EQUATION_THREE_DIM_2 !<u=tbd \see OPENCMISS_EquationsSetStokesAnalyticFunctionTypes,OPENCMISS
2699  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_STOKES_EQUATION_THREE_DIM_3 = EQUATIONS_SET_STOKES_EQUATION_THREE_DIM_3 !<u=tbd \see OPENCMISS_EquationsSetStokesAnalyticFunctionTypes,OPENCMISS
2700  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_STOKES_EQUATION_THREE_DIM_4 = EQUATIONS_SET_STOKES_EQUATION_THREE_DIM_4 !<u=tbd \see OPENCMISS_EquationsSetStokesAnalyticFunctionTypes,OPENCMISS
2701  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_STOKES_EQUATION_THREE_DIM_5 = EQUATIONS_SET_STOKES_EQUATION_THREE_DIM_5 !<u=tbd \see OPENCMISS_EquationsSetStokesAnalyticFunctionTypes,OPENCMISS
2702  !>@}
2703  !> \addtogroup OPENCMISS_NavierStokesAnalyticFunctionTypes OPENCMISS::EquationsSet::AnalyticFunctionTypes::NavierStokes
2704  !> \brief The analytic function types for a Navier-Stokes equation.
2705  !> \see OPENCMISS::EquationsSet::AnalyticFunctionTypes,OPENCMISS
2706  !>@{
2707  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_NAVIER_STOKES_EQUATION_TWO_DIM_POISEUILLE= &
2708  & EQUATIONS_SET_NAVIER_STOKES_EQUATION_TWO_DIM_POISEUILLE !< fully developed 2D channel flow (parabolic) \see OPENCMISS_EquationsSetNavierStokesAnalyticFunctionTypes,OPENCMISS
2709  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_NAVIER_STOKES_EQUATION_TWO_DIM_TAYLOR_GREEN= &
2710  & EQUATIONS_SET_NAVIER_STOKES_EQUATION_TWO_DIM_TAYLOR_GREEN !< 2D dynamic nonlinear Taylor-Green vortex decay \see OPENCMISS_EquationsSetNavierStokesAnalyticFunctionTypes,OPENCMISS
2711  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_NAVIER_STOKES_EQUATION_FLOWRATE_AORTA= &
2712  & EQUATIONS_SET_NAVIER_STOKES_EQUATION_FLOWRATE_AORTA !< A fourier decomposed flow waveform for boundary conditions
2713  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_NAVIER_STOKES_EQUATION_SINUSOID= &
2714  & EQUATIONS_SET_NAVIER_STOKES_EQUATION_SINUSOID !< A sinusoidal flow waveform
2715  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_NAVIER_STOKES_EQUATION_SPLINT_FROM_FILE= &
2716  & EQUATIONS_SET_NAVIER_STOKES_EQUATION_SPLINT_FROM_FILE !< Spline integration of dependent values specified in a file
2717  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
2718  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
2719  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
2720  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
2721  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
2722  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_NAVIER_STOKES_EQUATION_THREE_DIM_1 = &
2723  & EQUATIONS_SET_NAVIER_STOKES_EQUATION_THREE_DIM_1 !<u=tbd \see OPENCMISS_EquationsSetNavierStokesAnalyticFunctionTypes,OPENCMISS
2724  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_NAVIER_STOKES_EQUATION_THREE_DIM_2 = &
2725  & EQUATIONS_SET_NAVIER_STOKES_EQUATION_THREE_DIM_2 !<u=tbd \see OPENCMISS_EquationsSetNavierStokesAnalyticFunctionTypes,OPENCMISS
2726  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_NAVIER_STOKES_EQUATION_THREE_DIM_3 = &
2727  & EQUATIONS_SET_NAVIER_STOKES_EQUATION_THREE_DIM_3 !<u=tbd \see OPENCMISS_EquationsSetNavierStokesAnalyticFunctionTypes,OPENCMISS
2728  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_NAVIER_STOKES_EQUATION_THREE_DIM_4 = &
2729  & EQUATIONS_SET_NAVIER_STOKES_EQUATION_THREE_DIM_4 !<u=tbd \see OPENCMISS_EquationsSetNavierStokesAnalyticFunctionTypes,OPENCMISS
2730  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_NAVIER_STOKES_EQUATION_THREE_DIM_5 = &
2731  & EQUATIONS_SET_NAVIER_STOKES_EQUATION_THREE_DIM_5 !<u=tbd \see OPENCMISS_EquationsSetNavierStokesAnalyticFunctionTypes,OPENCMISS
2732  !>@}
2733  !> \addtogroup OPENCMISS_DarcyAnalyticFunctionTypes OPENCMISS::EquationsSet::AnalyticFunctionTypes::Darcy
2734  !> \brief The analytic function types for a Darcy equation.
2735  !> \see OPENCMISS::EquationsSet::AnalyticFunctionTypes,OPENCMISS
2736  !>@{
2737  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_DARCY_EQUATION_TWO_DIM_1 = EQUATIONS_SET_DARCY_EQUATION_TWO_DIM_1 !<u=tbd \see OPENCMISS_EquationsSetDarcyAnalyticFunctionTypes,OPENCMISS
2738  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_DARCY_EQUATION_TWO_DIM_2 = EQUATIONS_SET_DARCY_EQUATION_TWO_DIM_2 !<u=tbd \see OPENCMISS_EquationsSetDarcyAnalyticFunctionTypes,OPENCMISS
2739  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_DARCY_EQUATION_TWO_DIM_3 = EQUATIONS_SET_DARCY_EQUATION_TWO_DIM_3 !<u=tbd \see OPENCMISS_EquationsSetDarcyAnalyticFunctionTypes,OPENCMISS
2740  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_DARCY_EQUATION_THREE_DIM_1 = EQUATIONS_SET_DARCY_EQUATION_THREE_DIM_1 !<u=tbd \see OPENCMISS_EquationsSetDarcyAnalyticFunctionTypes,OPENCMISS
2741  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_DARCY_EQUATION_THREE_DIM_2 = EQUATIONS_SET_DARCY_EQUATION_THREE_DIM_2 !<u=tbd \see OPENCMISS_EquationsSetDarcyAnalyticFunctionTypes,OPENCMISS
2742  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_DARCY_EQUATION_THREE_DIM_3 = EQUATIONS_SET_DARCY_EQUATION_THREE_DIM_3 !<u=tbd \see OPENCMISS_EquationsSetDarcyAnalyticFunctionTypes,OPENCMISS
2743  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_INCOMP_ELAST_DARCY_ANALYTIC_DARCY = &
2744  & 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
2745  !>@}
2746  !> \addtogroup OPENCMISS_BurgersAnalyticFunctionTypes OPENCMISS::EquationsSet::AnalyticFunctionTypes::Burgers
2747  !> \brief The analytic function types for a Burgers equation.
2748  !> \see OPENCMISS::EquationsSet::AnalyticFunctionTypes,OPENCMISS
2749  !>@{
2750  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_BURGERS_EQUATION_ONE_DIM_1 = EQUATIONS_SET_BURGERS_EQUATION_ONE_DIM_1
2751  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_GENERALISED_BURGERS_EQUATION_ONE_DIM_1 = &
2752  & EQUATIONS_SET_GENERALISED_BURGERS_EQUATION_ONE_DIM_1
2753  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_GENERALISED_BURGERS_EQUATION_ONE_DIM_2 = &
2754  & EQUATIONS_SET_GENERALISED_BURGERS_EQUATION_ONE_DIM_2
2755  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_STATIC_BURGERS_EQUATION_ONE_DIM_1 = &
2756  & EQUATIONS_SET_STATIC_BURGERS_EQUATION_ONE_DIM_1
2757  !>@}
2758 
2759  !> \addtogroup OPENCMISS_EquationsSetLinearElasticityAnalyticFunctionTypes OPENCMISS::EquationsSet::AnalyticFunctionTypes::LinearElasticity
2760  !> \brief The analytic function types for a LinearElasticity equation
2761  !> \see OPENCMISS::EquationsSet::AnalyticFunctionTypes,OPENCMISS
2762  !>@{
2763  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_LINEAR_ELASTICITY_ONE_DIM_1 = EQUATIONS_SET_LINEAR_ELASTICITY_ONE_DIM_1 !<u=tbd \see OPENCMISS_EquationsSetLinearElasticityAnalyticFunctionTypes,OPENCMISS
2764  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_LINEAR_ELASTICITY_TWO_DIM_1 = EQUATIONS_SET_LINEAR_ELASTICITY_TWO_DIM_1 !<u=tbd \see OPENCMISS_EquationsSetLinearElasticityAnalyticFunctionTypes,OPENCMISS
2765  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_LINEAR_ELASTICITY_TWO_DIM_2 = EQUATIONS_SET_LINEAR_ELASTICITY_TWO_DIM_2 !<u=tbd \see OPENCMISS_EquationsSetLinearElasticityAnalyticFunctionTypes,OPENCMISS
2766  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_LINEAR_ELASTICITY_THREE_DIM_1 = EQUATIONS_SET_LINEAR_ELASTICITY_THREE_DIM_1 !<u=tbd \see OPENCMISS_EquationsSetLinearElasticityAnalyticFunctionTypes,OPENCMISS
2767  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_LINEAR_ELASTICITY_THREE_DIM_2 = EQUATIONS_SET_LINEAR_ELASTICITY_THREE_DIM_2 !<u=tbd \see OPENCMISS_EquationsSetLinearElasticityAnalyticFunctionTypes,OPENCMISS
2768  !>@}
2769  !> \addtogroup OPENCMISS_EquationsSetFiniteElasticityAnalyticFunctionTypes OPENCMISS::EquationsSet::AnalyticFunctionTypes::FiniteElasticity
2770  !> \brief The analytic function types for a FiniteElasticity equation
2771  !> \see OPENCMISS::EquationsSet::AnalyticFunctionTypes,OPENCMISS
2772  !>@{
2773  INTEGER(INTG), PARAMETER :: CMFE_EQUATIONS_SET_FINITE_ELASTICITY_CYLINDER = EQUATIONS_SET_FINITE_ELASTICITY_CYLINDER !<u=tbd \see OPENCMISS_EquationsSetLinearElasticityAnalyticFunctionTypes,OPENCMISS
2774  !>@}
2775  !>@}
2776  !>@}
2777 
2778  !> \addtogroup OPENCMISS_AnalyticParamIndices OPENCMISS::FiniteElasticity::AnalyticParamIndices
2779  !> \brief Indices for EQUATIONS_SET_ANALYTIC_TYPE%ANALYTIC_USER_PARAMS
2780  !> \see OPENCMISS::FiniteElasticity::AnalyticParamIndices,OPENCMISS
2781  !>@{
2782  INTEGER(INTG), PARAMETER :: CMFE_FINITE_ELASTICITY_ANALYTIC_CYLINDER_PARAM_PIN_IDX = &
2783  & FINITE_ELASTICITY_ANALYTIC_CYLINDER_PARAM_PIN_IDX !<Inner pressure parameter index \see OPENCMISS_AnalyticParamIndices,OPENCMISS
2784  INTEGER(INTG), PARAMETER :: CMFE_FINITE_ELASTICITY_ANALYTIC_CYLINDER_PARAM_POUT_IDX = &
2785  & FINITE_ELASTICITY_ANALYTIC_CYLINDER_PARAM_POUT_IDX !<Outer pressure parameter index \see OPENCMISS_AnalyticParamIndices,OPENCMISS
2786  INTEGER(INTG), PARAMETER :: CMFE_FINITE_ELASTICITY_ANALYTIC_CYLINDER_PARAM_LAMBDA_IDX = &
2787  & FINITE_ELASTICITY_ANALYTIC_CYLINDER_PARAM_LAMBDA_IDX !<Lambda parameter index \see OPENCMISS_AnalyticParamIndices,OPENCMISS
2788  INTEGER(INTG), PARAMETER :: CMFE_FINITE_ELASTICITY_ANALYTIC_CYLINDER_PARAM_TSI_IDX = &
2789  & FINITE_ELASTICITY_ANALYTIC_CYLINDER_PARAM_TSI_IDX !<Tsi parameter index \see OPENCMISS_AnalyticParamIndices,OPENCMISS
2790  INTEGER(INTG), PARAMETER :: CMFE_FINITE_ELASTICITY_ANALYTIC_CYLINDER_PARAM_RIN_IDX = &
2791  & FINITE_ELASTICITY_ANALYTIC_CYLINDER_PARAM_RIN_IDX !<Inner radius parameter index \see OPENCMISS_AnalyticParamIndices,OPENCMISS
2792  INTEGER(INTG), PARAMETER :: CMFE_FINITE_ELASTICITY_ANALYTIC_CYLINDER_PARAM_ROUT_IDX = &
2793  & FINITE_ELASTICITY_ANALYTIC_CYLINDER_PARAM_ROUT_IDX !<Outer radius parameter index \see OPENCMISS_AnalyticParamIndices,OPENCMISS
2794  INTEGER(INTG), PARAMETER :: CMFE_FINITE_ELASTICITY_ANALYTIC_CYLINDER_PARAM_C1_IDX = &
2795  & FINITE_ELASTICITY_ANALYTIC_CYLINDER_PARAM_C1_IDX !<c1 parameter index \see OPENCMISS_AnalyticParamIndices,OPENCMISS
2796  INTEGER(INTG), PARAMETER :: CMFE_FINITE_ELASTICITY_ANALYTIC_CYLINDER_PARAM_C2_IDX = &
2797  & FINITE_ELASTICITY_ANALYTIC_CYLINDER_PARAM_C2_IDX !<c2 parameter index \see OPENCMISS_AnalyticParamIndices,OPENCMISS
2798  !>@}
2799 
2800  !Module types
2801 
2802  !Module variables
2803 
2804  !Interfaces
2805 
2806  PUBLIC CMFE_EQUATIONS_SET_NO_CLASS,CMFE_EQUATIONS_SET_ELASTICITY_CLASS,CMFE_EQUATIONS_SET_FLUID_MECHANICS_CLASS, &
2807  & CMFE_EQUATIONS_SET_ELECTROMAGNETICS_CLASS,CMFE_EQUATIONS_SET_CLASSICAL_FIELD_CLASS,CMFE_EQUATIONS_SET_BIOELECTRICS_CLASS, &
2808  & CMFE_EQUATIONS_SET_MODAL_CLASS,CMFE_EQUATIONS_SET_FITTING_CLASS,CMFE_EQUATIONS_SET_OPTIMISATION_CLASS, &
2809  & CMFE_EQUATIONS_SET_MULTI_PHYSICS_CLASS
2810 
2811  PUBLIC CMFE_EQUATIONS_SET_NO_TYPE,CMFE_EQUATIONS_SET_LINEAR_ELASTICITY_TYPE,CMFE_EQUATIONS_SET_FINITE_ELASTICITY_TYPE, &
2812  & CMFE_EQUATIONS_SET_STOKES_EQUATION_TYPE,CMFE_EQUATIONS_SET_NAVIER_STOKES_EQUATION_TYPE, &
2813  & CMFE_EQUATIONS_SET_DARCY_EQUATION_TYPE, &
2814  & CMFE_EQUATIONS_SET_DARCY_PRESSURE_EQUATION_TYPE,CMFE_EQUATIONS_SET_BURGERS_EQUATION_TYPE, &
2815  & CMFE_EQUATIONS_SET_STATIC_POISEUILLE_SUBTYPE, &
2816  & CMFE_EQUATIONS_SET_DYNAMIC_POISEUILLE_SUBTYPE, &
2817  & CMFE_EQUATIONS_SET_CHARACTERISTIC_EQUATION_TYPE, &
2818  & CMFE_EQUATIONS_SET_ELECTROSTATIC_TYPE,CMFE_EQUATIONS_SET_MAGNETOSTATIC_TYPE,CMFE_EQUATIONS_SET_MAXWELLS_EQUATIONS_TYPE, &
2819  & CMFE_EQUATIONS_SET_LAPLACE_EQUATION_TYPE,CMFE_EQUATIONS_SET_POISEUILLE_EQUATION_TYPE, &
2820  & CMFE_EQUATIONS_SET_POISSON_EQUATION_TYPE, &
2821  & CMFE_EQUATIONS_SET_HELMHOLTZ_EQUATION_TYPE,CMFE_EQUATIONS_SET_WAVE_EQUATION_TYPE, &
2822  & CMFE_EQUATIONS_SET_DIFFUSION_EQUATION_TYPE,CMFE_EQUATIONS_SET_ADVECTION_EQUATION_TYPE, &
2823  & CMFE_EQUATIONS_SET_ADVECTION_DIFFUSION_EQUATION_TYPE,CMFE_EQUATIONS_SET_REACTION_DIFFUSION_EQUATION_TYPE, &
2824  & CMFE_EQUATIONS_SET_BIHARMONIC_EQUATION_TYPE,CMFE_EQUATIONS_SET_MONODOMAIN_EQUATION_TYPE, &
2825  & CMFE_EQUATIONS_SET_BIDOMAIN_EQUATION_TYPE, &
2826  & CMFE_EQUATIONS_SET_LINEAR_ELASTIC_MODAL_TYPE,CMFE_EQUATIONS_SET_DATA_FITTING_EQUATION_TYPE, &
2827  & CMFE_EQUATIONS_SET_MONODOMAIN_STRANG_SPLITTING_EQUATION_TYPE
2828 
2829  PUBLIC CMFE_EQUATIONS_SET_FINITE_ELASTICITY_DARCY_TYPE, &
2830  & CMFE_EQUATIONS_SET_FINITE_ELASTICITY_STOKES_TYPE, CMFE_EQUATIONS_SET_FINITE_ELASTICITY_NAVIER_STOKES_TYPE, &
2831  & CMFE_EQUATIONS_SET_DIFFUSION_DIFFUSION_TYPE, CMFE_EQUATIONS_SET_DIFFUSION_ADVECTION_DIFFUSION_TYPE
2832 
2833  PUBLIC CMFE_EQUATIONS_SET_NO_SUBTYPE,CMFE_EQUATIONS_SET_THREE_DIMENSIONAL_SUBTYPE, &
2834  & CMFE_EQUATIONS_SET_TWO_DIMENSIONAL_PLANE_STRESS_SUBTYPE, &
2835  & CMFE_EQUATIONS_SET_TWO_DIMENSIONAL_PLANE_STRAIN_SUBTYPE,CMFE_EQUATIONS_SET_ONE_DIMENSIONAL_SUBTYPE, &
2836  & CMFE_EQUATIONS_SET_PLATE_SUBTYPE, &
2837  & CMFE_EQUATIONS_SET_SHELL_SUBTYPE, &
2838  & CMFE_EQUATIONS_SET_INCOMPRESSIBLE_MOONEY_RIVLIN_SUBTYPE,CMFE_EQUATIONS_SET_NEARLY_INCOMPRESSIBLE_MOONEY_RIVLIN_SUBTYPE, &
2839  & CMFE_EQUATIONS_SET_MOONEY_RIVLIN_SUBTYPE, &
2840  & CMFE_EQUATIONS_SET_REFERENCE_STATE_MOONEY_RIVLIN_SUBTYPE, CMFE_EQUATIONS_SET_ISOTROPIC_EXPONENTIAL_SUBTYPE, &
2841  & CMFE_EQUATIONS_SET_ACTIVECONTRACTION_SUBTYPE,CMFE_EQUATIONS_SET_MOONEY_RIVLIN_ACTIVECONTRACTION_SUBTYPE, &
2842  & CMFE_EQUATIONS_SET_COMPRESSIBLE_ACTIVECONTRACTION_SUBTYPE,CMFE_EQUATIONS_SET_TRANSVERSE_ISOTROPIC_ACTIVE_SUBTYPE, &
2843  & CMFE_EQUATIONS_SET_TRANS_ISOTROPIC_ACTIVE_TRANSITION_SUBTYPE, &
2844  & CMFE_EQUATIONS_SET_TRANSVERSE_ISOTROPIC_POLYNOMIAL_SUBTYPE,CMFE_EQUATIONS_SET_STVENANT_KIRCHOFF_ACTIVECONTRACTION_SUBTYPE, &
2845  & CMFE_EQUATIONS_SET_ANISOTROPIC_POLYNOMIAL_SUBTYPE,CMFE_EQUATIONS_SET_ANISOTROPIC_POLYNOMIAL_ACTIVE_SUBTYPE, &
2846  & CMFE_EQUATIONS_SET_TRANSVERSE_ISOTROPIC_EXPONENTIAL_SUBTYPE,CMFE_EQUATIONS_SET_ORTHOTROPIC_MATERIAL_COSTA_SUBTYPE, &
2847  & CMFE_EQUATIONS_SET_COMPRESSIBLE_FINITE_ELASTICITY_SUBTYPE,CMFE_EQUATIONS_SET_INCOMPRESS_FINITE_ELASTICITY_DARCY_SUBTYPE, &
2848  & CMFE_EQUATIONS_SET_ELASTICITY_DARCY_INRIA_MODEL_SUBTYPE,CMFE_EQUATIONS_SET_ELASTICITY_MULTI_COMP_DARCY_INRIA_SUBTYPE, &
2849  & CMFE_EQUATIONS_SET_INCOMPRESS_ELASTICITY_DRIVEN_DARCY_SUBTYPE, &
2850  & CMFE_EQUATIONS_SET_INCOMPRESSIBLE_ELASTICITY_DRIVEN_MR_SUBTYPE, &
2851  & CMFE_EQUATIONS_SET_INCOMPRESS_ELAST_MULTI_COMP_DARCY_SUBTYPE,CMFE_EQUATIONS_SET_TRANSVERSE_ISOTROPIC_GUCCIONE_SUBTYPE, &
2852  & CMFE_EQUATIONS_SET_GUCCIONE_ACTIVECONTRACTION_SUBTYPE, &
2853  & CMFE_EQUATIONS_SET_ACTIVE_STRAIN_SUBTYPE, &
2854  & CMFE_EQUATIONS_SET_MULTISCALE_ACTIVE_STRAIN_SUBTYPE, &
2855  & CMFE_EQUATIONS_SET_MEMBRANE_SUBTYPE, CMFE_EQUATIONS_SET_ORTHOTROPIC_HOLZAPFEL_OGDEN_SUBTYPE, &
2856  & CMFE_EQUATIONS_SET_HOLZAPFEL_OGDEN_ACTIVECONTRACTION_SUBTYPE, &
2857  & CMFE_EQUATIONS_SET_ELASTICITY_FLUID_PRES_STATIC_INRIA_SUBTYPE, &
2858  & CMFE_EQUATIONS_SET_ELASTICITY_FLUID_PRES_HOLMES_MOW_SUBTYPE, &
2859  & CMFE_EQUATIONS_SET_ELASTI_FLUID_PRES_HOLMES_MOW_ACTIVE_SUBTYPE, &
2860  & CMFE_EQUATIONS_SET_TRANSVERSE_ISOTROPIC_HUMPHREY_YIN_SUBTYPE, &
2861  & CMFE_EQUATIONS_SET_STATIC_STOKES_SUBTYPE, CMFE_EQUATIONS_SET_LAPLACE_STOKES_SUBTYPE, &
2862  & CMFE_EQUATIONS_SET_TRANSIENT_STOKES_SUBTYPE,CMFE_EQUATIONS_SET_ALE_STOKES_SUBTYPE, &
2863  & CMFE_EQUATIONS_SET_ALE_NAVIER_STOKES_SUBTYPE, &
2864  & CMFE_EQUATIONS_SET_OPTIMISED_STOKES_SUBTYPE,CMFE_EQUATIONS_SET_STATIC_NAVIER_STOKES_SUBTYPE, &
2865  & CMFE_EQUATIONS_SET_LAPLACE_NAVIER_STOKES_SUBTYPE,CMFE_EQUATIONS_SET_TRANSIENT_NAVIER_STOKES_SUBTYPE, &
2866  & CMFE_EQUATIONS_SET_TRANSIENT1D_NAVIER_STOKES_SUBTYPE, CMFE_EQUATIONS_SET_TRANSIENT_RBS_NAVIER_STOKES_SUBTYPE, &
2867  & CMFE_EQUATIONS_SET_STATIC_RBS_NAVIER_STOKES_SUBTYPE, &
2868  & CMFE_EQUATIONS_SET_CHARACTERISTIC_SUBTYPE, &
2869  & CMFE_EQUATIONS_SET_TRANSIENT1D_ADV_NAVIER_STOKES_SUBTYPE, CMFE_EQUATIONS_SET_COUPLED1D0D_ADV_NAVIER_STOKES_SUBTYPE, &
2870  & CMFE_EQUATIONS_SET_STREE1D0D_SUBTYPE, CMFE_EQUATIONS_SET_STREE1D0D_ADV_SUBTYPE, &
2871  & CMFE_EQUATIONS_SET_MULTISCALE3D_NAVIER_STOKES_SUBTYPE, &
2872  & CMFE_EQUATIONS_SET_CONSTITUTIVE_MU_NAVIER_STOKES_SUBTYPE, &
2873  & CMFE_EQUATIONS_SET_COUPLED1D0D_NAVIER_STOKES_SUBTYPE, &
2874  & CMFE_EQUATIONS_SET_OPTIMISED_NAVIER_STOKES_SUBTYPE,CMFE_EQUATIONS_SET_STANDARD_DARCY_SUBTYPE, &
2875  & CMFE_EQUATIONS_SET_QUASISTATIC_DARCY_SUBTYPE,CMFE_EQUATIONS_SET_ALE_DARCY_SUBTYPE, &
2876  & CMFE_EQUATIONS_SET_TRANSIENT_DARCY_SUBTYPE, &
2877  & CMFE_EQUATIONS_SET_TRANSIENT_ALE_DARCY_SUBTYPE,CMFE_EQUATIONS_SET_MULTI_COMPARTMENT_DARCY_SUBTYPE, &
2878  & CMFE_EQUATIONS_SET_STANDARD_LAPLACE_SUBTYPE,CMFE_EQUATIONS_SET_MOVING_MESH_LAPLACE_SUBTYPE, &
2879  & CMFE_EQUATIONS_SET_GENERALISED_LAPLACE_SUBTYPE,CMFE_EQUATIONS_SET_CONSTANT_SOURCE_POISSON_SUBTYPE, &
2880  & CMFE_EQUATIONS_SET_EXTRACELLULAR_BIDOMAIN_POISSON_SUBTYPE, &
2881  & CMFE_EQUATIONS_SET_LINEAR_PRESSURE_POISSON_SUBTYPE, CMFE_EQUATIONS_SET_NONLINEAR_PRESSURE_POISSON_SUBTYPE, &
2882  & CMFE_EQUATIONS_SET_ALE_PRESSURE_POISSON_SUBTYPE, CMFE_EQUATIONS_SET_FITTED_PRESSURE_POISSON_SUBTYPE,&
2883  & CMFE_EQUATIONS_SET_LINEAR_SOURCE_POISSON_SUBTYPE,CMFE_EQUATIONS_SET_QUADRATIC_SOURCE_POISSON_SUBTYPE, &
2884  & CMFE_EQUATIONS_SET_EXPONENTIAL_SOURCE_POISSON_SUBTYPE,CMFE_EQUATIONS_SET_STANDARD_HELMHOLTZ_SUBTYPE, &
2885  & CMFE_EQUATIONS_SET_GENERALISED_HELMHOLTZ_SUBTYPE, &
2886  & CMFE_EQUATIONS_SET_NO_SOURCE_DIFFUSION_SUBTYPE,CMFE_EQUATIONS_SET_CONSTANT_SOURCE_DIFFUSION_SUBTYPE, &
2887  & CMFE_EQUATIONS_SET_LINEAR_SOURCE_DIFFUSION_SUBTYPE,CMFE_EQUATIONS_SET_QUADRATIC_SOURCE_DIFFUSION_SUBTYPE, &
2888  & CMFE_EQUATIONS_SET_EXPONENTIAL_SOURCE_DIFFUSION_SUBTYPE,CMFE_EQUATIONS_SET_MULTI_COMP_TRANSPORT_DIFFUSION_SUBTYPE, &
2889  & CMFE_EQUATIONS_SET_NO_SOURCE_ALE_DIFFUSION_SUBTYPE,CMFE_EQUATIONS_SET_CONSTANT_SOURCE_ALE_DIFFUSION_SUBTYPE, &
2890  & CMFE_EQUATIONS_SET_LINEAR_SOURCE_ALE_DIFFUSION_SUBTYPE,CMFE_EQUATIONS_SET_QUADRATIC_SOURCE_ALE_DIFFUSION_SUBTYPE, &
2891  & CMFE_EQUATIONS_SET_EXPONENTIAL_SOURCE_ALE_DIFFUSION_SUBTYPE, &
2892  & CMFE_EQUATIONS_SET_ADVECTION_SUBTYPE, &
2893  & CMFE_EQUATIONS_SET_NO_SOURCE_ADVECTION_DIFFUSION_SUBTYPE, &
2894  & CMFE_EQUATIONS_SET_CONSTANT_SOURCE_ADVECTION_DIFFUSION_SUBTYPE, &
2895  & CMFE_EQUATIONS_SET_LINEAR_SOURCE_ADVECTION_DIFFUSION_SUBTYPE, &
2896  & CMFE_EQUATIONS_SET_QUADRATIC_SOURCE_ADVEC_DIFF_SUBTYPE,CMFE_EQUATIONS_SET_EXPONENTIAL_SOURCE_ADVEC_DIFF_SUBTYPE, &
2897  & CMFE_EQUATIONS_SET_NO_SOURCE_ALE_ADVECTION_DIFFUSION_SUBTYPE, &
2898  & CMFE_EQUATIONS_SET_CONSTANT_SOURCE_ALE_ADVEC_DIFF_SUBTYPE,CMFE_EQUATIONS_SET_LINEAR_SOURCE_ALE_ADVEC_DIFF_SUBTYPE, &
2899  & CMFE_EQUATIONS_SET_QUADRATIC_SOURCE_ALE_ADVEC_DIFF_SUBTYPE,CMFE_EQUATIONS_SET_EXP_SOURCE_ALE_ADVECTION_DIFFUSION_SUBTYPE, &
2900  & CMFE_EQUATIONS_SET_NO_SOURCE_STATIC_ADVEC_DIFF_SUBTYPE, CMFE_EQUATIONS_SET_CONSTANT_SOURCE_STATIC_ADVEC_DIFF_SUBTYPE, &
2901  & CMFE_EQUATIONS_SET_LINEAR_SOURCE_STATIC_ADVEC_DIFF_SUBTYPE, &
2902  & CMFE_EQUATIONS_SET_NO_SOURCE_ADVECTION_DIFF_SUPG_SUBTYPE, CMFE_EQUATIONS_SET_CONSTANT_SOURCE_ADVECTION_DIFF_SUPG_SUBTYPE, &
2903  & CMFE_EQUATIONS_SET_LINEAR_SOURCE_ADVECTION_DIFF_SUPG_SUBTYPE, CMFE_EQUATIONS_SET_QUAD_SOURCE_ADVECTION_DIFF_SUPG_SUBTYPE, &
2904  & CMFE_EQUATIONS_SET_EXP_SOURCE_ADVECTION_DIFF_SUPG_SUBTYPE, &
2905  & CMFE_EQUATIONS_SET_NO_SOURCE_ALE_ADVECTION_DIFF_SUPG_SUBTYPE, &
2906  & CMFE_EQUATIONS_SET_CONSTANT_SOURCE_ALE_ADVEC_DIFF_SUPG_SUBTYPE, &
2907  & CMFE_EQUATIONS_SET_LINEAR_SOURCE_ALE_ADVEC_DIFF_SUPG_SUBTYPE, &
2908  & CMFE_EQUATIONS_SET_QUAD_SOURCE_ALE_ADVECTION_DIFF_SUPG_SUBTYPE, &
2909  & CMFE_EQUATIONS_SET_EXP_SOURCE_ALE_ADVECTION_DIFF_SUPG_SUBTYPE, &
2910  & CMFE_EQUATIONS_SET_NO_SOURCE_STATIC_ADVEC_DIFF_SUPG_SUBTYPE, &
2911  & CMFE_EQUATIONS_SET_CONST_SOURCE_STATIC_ADVEC_DIFF_SUPG_SUBTYPE, &
2912  & CMFE_EQUATIONS_SET_LIN_SOURCE_STATIC_ADVEC_DIFF_SUPG_SUBTYPE, &
2913  & CMFE_EQUATIONS_SET_MULTI_COMP_TRANSPORT_ADVEC_DIFF_SUBTYPE,CMFE_EQUATIONS_SET_MULT_COMP_TRANSPORT_ADVEC_DIFF_SUPG_SUBTYPE, &
2914  & CMFE_EQUATIONS_SET_PGM_STOKES_SUBTYPE, &
2915  & CMFE_EQUATIONS_SET_FIRST_BIDOMAIN_SUBTYPE,CMFE_EQUATIONS_SET_SECOND_BIDOMAIN_SUBTYPE, &
2916  & CMFE_EQUATIONS_SET_MONODOMAIN_BUENOOROVIO_SUBTYPE,&
2917  & CMFE_EQUATIONS_SET_MONODOMAIN_TENTUSSCHER06_SUBTYPE ,&
2918  & CMFE_EQUATIONS_SET_STANDARD_DATA_FITTING_SUBTYPE,CMFE_EQUATIONS_SET_GENERALISED_DATA_FITTING_SUBTYPE, &
2919  & CMFE_EQUATIONS_SET_VECTOR_DATA_FITTING_SUBTYPE,CMFE_EQUATIONS_SET_DIVFREE_VECTOR_DATA_FITTING_SUBTYPE, &
2920  & CMFE_EQUATIONS_SET_VECTOR_DATA_PRE_FITTING_SUBTYPE,CMFE_EQUATIONS_SET_DIVFREE_VECTOR_DATA_PRE_FITTING_SUBTYPE, &
2921  & CMFE_EQUATIONS_SET_MAT_PROPERTIES_DATA_FITTING_SUBTYPE,CMFE_EQUATIONS_SET_MAT_PROP_INRIA_MODEL_DATA_FITTING_SUBTYPE, &
2922  & CMFE_EQUATIONS_SET_DATA_POINT_VECTOR_STATIC_FITTING_SUBTYPE, &
2923  & CMFE_EQUATIONS_SET_DATA_PT_VECTOR_QUASISTATIC_FITTING_SUBTYPE, &
2924  & CMFE_EQUATIONS_SET_PGM_NAVIER_STOKES_SUBTYPE, &
2925  & CMFE_EQUATIONS_SET_CONSTITUTIVE_LAW_IN_CELLML_EVALUATE_SUBTYPE, &
2926  & CMFE_EQUATIONS_SET_COUPLED_SOURCE_DIFFUSION_DIFFUSION_SUBTYPE, &
2927  & CMFE_EQUATIONS_SET_COUPLED_SOURCE_DIFFUSION_ADVEC_DIFF_SUBTYPE, &
2928  & CMFE_EQUATIONS_SET_BURGERS_SUBTYPE,CMFE_EQUATIONS_SET_GENERALISED_BURGERS_SUBTYPE, &
2929  & CMFE_EQUATIONS_SET_STATIC_BURGERS_SUBTYPE, &
2930  & CMFE_EQUATIONS_SET_INVISCID_BURGERS_SUBTYPE,CMFE_EQUATIONS_SET_STANDARD_MONODOMAIN_ELASTICITY_SUBTYPE, &
2931  & CMFE_EQUATIONS_SET_1D3D_MONODOMAIN_ELASTICITY_SUBTYPE,CMFE_EQUATIONS_SET_MONODOMAIN_ELASTICITY_W_TITIN_SUBTYPE, &
2932  & CMFE_EQUATIONS_SET_1D3D_MONODOMAIN_ACTIVE_STRAIN_SUBTYPE, &
2933  & CMFE_EQUATIONS_SET_CONSTIT_AND_GROWTH_LAW_IN_CELLML_SUBTYPE, &
2934  & CMFE_EQUATIONS_SET_MONODOMAIN_ELASTICITY_VELOCITY_SUBTYPE, &
2935  & CMFE_EQUATIONS_SET_FINITE_ELASTICITY_NAVIER_STOKES_ALE_SUBTYPE
2936 
2937  PUBLIC CMFE_EQUATIONS_SET_CELLML_REAC_SPLIT_REAC_DIFF_SUBTYPE, CMFE_EQUATIONS_SET_CELLML_REAC_NO_SPLIT_REAC_DIFF_SUBTYPE, &
2938  & CMFE_EQUATIONS_SET_CONSTANT_REAC_DIFF_SUBTYPE
2939 
2940  PUBLIC CMFE_EQUATIONS_SET_FEM_SOLUTION_METHOD,CMFE_EQUATIONS_SET_BEM_SOLUTION_METHOD,CMFE_EQUATIONS_SET_FD_SOLUTION_METHOD, &
2941  & CMFE_EQUATIONS_SET_FV_SOLUTION_METHOD,CMFE_EQUATIONS_SET_GFEM_SOLUTION_METHOD,CMFE_EQUATIONS_SET_GFD_SOLUTION_METHOD, &
2942  & CMFE_EQUATIONS_SET_GFV_SOLUTION_METHOD
2943 
2944  PUBLIC CMFE_EQUATIONS_SET_DERIVED_STRAIN,CMFE_EQUATIONS_SET_DERIVED_STRESS
2945 
2946  PUBLIC CMFE_EQUATIONS_SET_EVALUATE_DEFORMATION_GRADIENT_TENSOR, &
2947  & CMFE_EQUATIONS_SET_EVALUATE_R_CAUCHY_GREEN_DEFORMATION_TENSOR, &
2948  & CMFE_EQUATIONS_SET_EVALUATE_GREEN_LAGRANGE_STRAIN_TENSOR, &
2949  & CMFE_EQUATIONS_SET_EVALUATE_CAUCHY_STRESS_TENSOR, &
2950  & CMFE_EQUATIONS_SET_EVALUATE_SECOND_PK_STRESS_TENSOR
2951 
2952  PUBLIC CMFE_EQUATIONS_MATRIX_STIFFNESS,CMFE_EQUATIONS_MATRIX_DAMPING,CMFE_EQUATIONS_MATRIX_MASS
2953 
2954  PUBLIC CMFE_EQUATIONS_SET_LAPLACE_EQUATION_TWO_DIM_1,CMFE_EQUATIONS_SET_LAPLACE_EQUATION_TWO_DIM_2, &
2955  & CMFE_EQUATIONS_SET_LAPLACE_EQUATION_THREE_DIM_1,CMFE_EQUATIONS_SET_LAPLACE_EQUATION_THREE_DIM_2
2956 
2957  PUBLIC CMFE_EQUATIONS_SET_HELMHOLTZ_EQUATION_TWO_DIM_1
2958 
2959  PUBLIC CMFE_EQUATIONS_SET_LINEAR_ELASTICITY_ONE_DIM_1,CMFE_EQUATIONS_SET_LINEAR_ELASTICITY_TWO_DIM_1, &
2960  & CMFE_EQUATIONS_SET_LINEAR_ELASTICITY_TWO_DIM_2,CMFE_EQUATIONS_SET_LINEAR_ELASTICITY_THREE_DIM_1, &
2961  & CMFE_EQUATIONS_SET_LINEAR_ELASTICITY_THREE_DIM_2
2962 
2963  PUBLIC CMFE_EQUATIONS_SET_DIFFUSION_EQUATION_ONE_DIM_1,CMFE_EQUATIONS_SET_DIFFUSION_EQUATION_TWO_DIM_1, &
2964  & CMFE_EQUATIONS_SET_DIFFUSION_EQUATION_THREE_DIM_1, &
2965  & CMFE_EQUATIONS_SET_LINEAR_SOURCE_DIFFUSION_THREE_DIM_1,CMFE_EQUATIONS_SET_QUADRATIC_SOURCE_DIFFUSION_ONE_DIM_1, &
2966  & CMFE_EQUATIONS_SET_EXPONENTIAL_SOURCE_DIFFUSION_ONE_DIM_1,CMFE_EQUATIONS_SET_MULTI_COMP_DIFFUSION_TWO_COMP_TWO_DIM, &
2967  & CMFE_EQUATIONS_SET_MULTI_COMP_DIFFUSION_TWO_COMP_THREE_DIM,CMFE_EQUATIONS_SET_MULTI_COMP_DIFFUSION_THREE_COMP_THREE_DIM, &
2968  & CMFE_EQUATIONS_SET_MULTI_COMP_DIFFUSION_FOUR_COMP_THREE_DIM
2969 
2970 
2971  PUBLIC CMFE_EQUATIONS_SET_ADVECTION_DIFFUSION_EQUATION_TWO_DIM_1
2972 
2973  PUBLIC CMFE_EQUATIONS_SET_POISEUILLE_EQUATION_TWO_DIM_1
2974 
2975  PUBLIC CMFE_EQUATIONS_SET_BURGERS_EQUATION_ONE_DIM_1,CMFE_EQUATIONS_SET_GENERALISED_BURGERS_EQUATION_ONE_DIM_1, &
2976  & CMFE_EQUATIONS_SET_GENERALISED_BURGERS_EQUATION_ONE_DIM_2, &
2977  & CMFE_EQUATIONS_SET_STATIC_BURGERS_EQUATION_ONE_DIM_1
2978 
2979  PUBLIC CMFE_EQUATIONS_SET_POISSON_EQUATION_TWO_DIM_1,CMFE_EQUATIONS_SET_POISSON_EQUATION_TWO_DIM_2, &
2980  & CMFE_EQUATIONS_SET_POISSON_EQUATION_TWO_DIM_3
2981  PUBLIC CMFE_EQUATIONS_SET_POISSON_EQUATION_THREE_DIM_1,CMFE_EQUATIONS_SET_POISSON_EQUATION_THREE_DIM_2, &
2982  & CMFE_EQUATIONS_SET_POISSON_EQUATION_THREE_DIM_3
2983  PUBLIC CMFE_EQUATIONS_SET_PRESSURE_POISSON_THREE_DIM_1, &
2984  & CMFE_EQUATIONS_SET_PRESSURE_POISSON_THREE_DIM_2
2985 
2986  PUBLIC CMFE_EQUATIONS_SET_STOKES_EQUATION_TWO_DIM_1,CMFE_EQUATIONS_SET_STOKES_EQUATION_TWO_DIM_2, &
2987  & CMFE_EQUATIONS_SET_STOKES_EQUATION_TWO_DIM_3
2988  PUBLIC CMFE_EQUATIONS_SET_STOKES_EQUATION_TWO_DIM_4,CMFE_EQUATIONS_SET_STOKES_EQUATION_TWO_DIM_5
2989  PUBLIC CMFE_EQUATIONS_SET_STOKES_EQUATION_THREE_DIM_1,CMFE_EQUATIONS_SET_STOKES_EQUATION_THREE_DIM_2, &
2990  & CMFE_EQUATIONS_SET_STOKES_EQUATION_THREE_DIM_3
2991  PUBLIC CMFE_EQUATIONS_SET_STOKES_EQUATION_THREE_DIM_4,CMFE_EQUATIONS_SET_STOKES_EQUATION_THREE_DIM_5
2992 
2993  PUBLIC CMFE_EQUATIONS_SET_NAVIER_STOKES_EQUATION_TWO_DIM_POISEUILLE, &
2994  & CMFE_EQUATIONS_SET_NAVIER_STOKES_EQUATION_TWO_DIM_TAYLOR_GREEN
2995  PUBLIC CMFE_EQUATIONS_SET_NAVIER_STOKES_EQUATION_FLOWRATE_AORTA, &
2996  & CMFE_EQUATIONS_SET_NAVIER_STOKES_EQUATION_SINUSOID, &
2997  & CMFE_EQUATIONS_SET_NAVIER_STOKES_EQUATION_SPLINT_FROM_FILE
2998  PUBLIC CMFE_EQUATIONS_SET_NAVIER_STOKES_EQUATION_TWO_DIM_1,CMFE_EQUATIONS_SET_NAVIER_STOKES_EQUATION_TWO_DIM_2, &
2999  & CMFE_EQUATIONS_SET_NAVIER_STOKES_EQUATION_TWO_DIM_3
3000  PUBLIC CMFE_EQUATIONS_SET_NAVIER_STOKES_EQUATION_TWO_DIM_4,CMFE_EQUATIONS_SET_NAVIER_STOKES_EQUATION_TWO_DIM_5
3001  PUBLIC CMFE_EQUATIONS_SET_NAVIER_STOKES_EQUATION_THREE_DIM_1,CMFE_EQUATIONS_SET_NAVIER_STOKES_EQUATION_THREE_DIM_2, &
3002  & CMFE_EQUATIONS_SET_NAVIER_STOKES_EQUATION_THREE_DIM_3
3003  PUBLIC CMFE_EQUATIONS_SET_NAVIER_STOKES_EQUATION_THREE_DIM_4,CMFE_EQUATIONS_SET_NAVIER_STOKES_EQUATION_THREE_DIM_5
3004 
3005  PUBLIC CMFE_EQUATIONS_SET_DARCY_EQUATION_TWO_DIM_1,CMFE_EQUATIONS_SET_DARCY_EQUATION_TWO_DIM_2, &
3006  & CMFE_EQUATIONS_SET_DARCY_EQUATION_TWO_DIM_3
3007  PUBLIC CMFE_EQUATIONS_SET_DARCY_EQUATION_THREE_DIM_1,CMFE_EQUATIONS_SET_DARCY_EQUATION_THREE_DIM_2, &
3008  & CMFE_EQUATIONS_SET_DARCY_EQUATION_THREE_DIM_3
3009  PUBLIC CMFE_EQUATIONS_SET_INCOMP_ELAST_DARCY_ANALYTIC_DARCY
3010 
3011  PUBLIC CMFE_EQUATIONS_SET_FINITE_ELASTICITY_CYLINDER
3012  PUBLIC CMFE_FINITE_ELASTICITY_ANALYTIC_CYLINDER_PARAM_PIN_IDX,CMFE_FINITE_ELASTICITY_ANALYTIC_CYLINDER_PARAM_POUT_IDX
3013  PUBLIC CMFE_FINITE_ELASTICITY_ANALYTIC_CYLINDER_PARAM_LAMBDA_IDX,CMFE_FINITE_ELASTICITY_ANALYTIC_CYLINDER_PARAM_TSI_IDX
3014  PUBLIC CMFE_FINITE_ELASTICITY_ANALYTIC_CYLINDER_PARAM_RIN_IDX,CMFE_FINITE_ELASTICITY_ANALYTIC_CYLINDER_PARAM_ROUT_IDX
3015  PUBLIC CMFE_FINITE_ELASTICITY_ANALYTIC_CYLINDER_PARAM_C1_IDX,CMFE_FINITE_ELASTICITY_ANALYTIC_CYLINDER_PARAM_C2_IDX
3016 
3017 !!==================================================================================================================================
3018 !!
3019 !! EQUATIONS_SET_ROUTINES
3020 !!
3021 !!==================================================================================================================================
3022 
3023  !Module parameters
3024 
3025  !Module types
3026 
3027  !Module variables
3028 
3029  !Interfaces
3030 
3031  !>Finish the creation of a analytic solution for an equations set. \see OpenCMISS::Iron::cmfe_EquationsSet_AnalyticCreateStart
3032  INTERFACE cmfe_EquationsSet_AnalyticCreateFinish
3033  MODULE PROCEDURE cmfe_EquationsSet_AnalyticCreateFinishNumber
3034  MODULE PROCEDURE cmfe_EquationsSet_AnalyticCreateFinishObj
3035  END INTERFACE cmfe_EquationsSet_AnalyticCreateFinish
3036 
3037  !>Start the creation of a analytic solution for an equations set. \see OpenCMISS::Iron::cmfe_EquationsSet_AnalyticCreateFinish
3038  INTERFACE cmfe_EquationsSet_AnalyticCreateStart
3039  MODULE PROCEDURE cmfe_EquationsSet_AnalyticCreateStartNumber
3040  MODULE PROCEDURE cmfe_EquationsSet_AnalyticCreateStartObj
3041  END INTERFACE cmfe_EquationsSet_AnalyticCreateStart
3042 
3043  !>Destroy the analytic solution for an equations set.
3044  INTERFACE cmfe_EquationsSet_AnalyticDestroy
3045  MODULE PROCEDURE cmfe_EquationsSet_AnalyticDestroyNumber
3046  MODULE PROCEDURE cmfe_EquationsSet_AnalyticDestroyObj
3047  END INTERFACE cmfe_EquationsSet_AnalyticDestroy
3048 
3049  !>Evaluates the current analytic solution for an equations set.
3050  INTERFACE cmfe_EquationsSet_AnalyticEvaluate
3051  MODULE PROCEDURE cmfe_EquationsSet_AnalyticEvaluateNumber
3052  MODULE PROCEDURE cmfe_EquationsSet_AnalyticEvaluateObj
3053  END INTERFACE cmfe_EquationsSet_AnalyticEvaluate
3054 
3055  !>Returns the analytic time for an equations set.
3056  INTERFACE cmfe_EquationsSet_AnalyticTimeGet
3057  MODULE PROCEDURE cmfe_EquationsSet_AnalyticTimeGetNumber
3058  MODULE PROCEDURE cmfe_EquationsSet_AnalyticTimeGetObj
3059  END INTERFACE cmfe_EquationsSet_AnalyticTimeGet
3060 
3061  !>Sets/changes the analytic time for an equations set.
3062  INTERFACE cmfe_EquationsSet_AnalyticTimeSet
3063  MODULE PROCEDURE cmfe_EquationsSet_AnalyticTimeSetNumber
3064  MODULE PROCEDURE cmfe_EquationsSet_AnalyticTimeSetObj
3065  END INTERFACE cmfe_EquationsSet_AnalyticTimeSet
3066 
3067  !>Finish the creation of an equations set. \see OpenCMISS::Iron::cmfe_EquationsSet_CreateStart
3068  INTERFACE cmfe_EquationsSet_CreateFinish
3069  MODULE PROCEDURE cmfe_EquationsSet_CreateFinishNumber
3070  MODULE PROCEDURE cmfe_EquationsSet_CreateFinishObj
3071  END INTERFACE cmfe_EquationsSet_CreateFinish
3072 
3073  !>Start the creation of an equations set on a region. \see OpenCMISS::Iron::cmfe_EquationsSet_CreateFinish
3074  INTERFACE cmfe_EquationsSet_CreateStart
3075  MODULE PROCEDURE cmfe_EquationsSet_CreateStartNumber
3076  MODULE PROCEDURE cmfe_EquationsSet_CreateStartObj
3077  END INTERFACE cmfe_EquationsSet_CreateStart
3078 
3079  !>Destroy an equations set.
3080  INTERFACE cmfe_EquationsSet_Destroy
3081  MODULE PROCEDURE cmfe_EquationsSet_DestroyNumber
3082  MODULE PROCEDURE cmfe_EquationsSet_DestroyObj
3083  END INTERFACE cmfe_EquationsSet_Destroy
3084 
3085  !>Finish the creation of dependent variables for an equations set. \see OpenCMISS::Iron::cmfe_EquationsSet_DependentCreateStart
3086  INTERFACE cmfe_EquationsSet_DependentCreateFinish
3087  MODULE PROCEDURE cmfe_EquationsSet_DependentCreateFinishNumber
3088  MODULE PROCEDURE cmfe_EquationsSet_DependentCreateFinishObj
3089  END INTERFACE cmfe_EquationsSet_DependentCreateFinish
3090 
3091  !>Start the creation of dependent variables for an equations set. \see OpenCMISS::Iron::cmfe_EquationsSet_DependentCreateFinish
3092  INTERFACE cmfe_EquationsSet_DependentCreateStart
3093  MODULE PROCEDURE cmfe_EquationsSet_DependentCreateStartNumber
3094  MODULE PROCEDURE cmfe_EquationsSet_DependentCreateStartObj
3095  END INTERFACE cmfe_EquationsSet_DependentCreateStart
3096 
3097  !>Destroy the dependent variables for an equations set.
3098  INTERFACE cmfe_EquationsSet_DependentDestroy
3099  MODULE PROCEDURE cmfe_EquationsSet_DependentDestroyNumber
3100  MODULE PROCEDURE cmfe_EquationsSet_DependentDestroyObj
3101  END INTERFACE cmfe_EquationsSet_DependentDestroy
3102 
3103  !>Finish the creation of derived variables for an equations set. \see OpenCMISS::Iron::cmfe_EquationsSet_DerivedCreateStart
3104  INTERFACE cmfe_EquationsSet_DerivedCreateFinish
3105  MODULE PROCEDURE cmfe_EquationsSet_DerivedCreateFinishNumber
3106  MODULE PROCEDURE cmfe_EquationsSet_DerivedCreateFinishObj
3107  END INTERFACE cmfe_EquationsSet_DerivedCreateFinish
3108 
3109  !>Start the creation of derived variables for an equations set. These are used to store any intermediate
3110  !>calculated values, for example stress and strain fields in an elasticity problem. \see OpenCMISS::Iron::cmfe_EquationsSet_DerivedCreateFinish
3111  INTERFACE cmfe_EquationsSet_DerivedCreateStart
3112  MODULE PROCEDURE cmfe_EquationsSet_DerivedCreateStartNumber
3113  MODULE PROCEDURE cmfe_EquationsSet_DerivedCreateStartObj
3114  END INTERFACE cmfe_EquationsSet_DerivedCreateStart
3115 
3116  !>Destroy the derived variables for an equations set.
3117  INTERFACE cmfe_EquationsSet_DerivedDestroy
3118  MODULE PROCEDURE cmfe_EquationsSet_DerivedDestroyNumber
3119  MODULE PROCEDURE cmfe_EquationsSet_DerivedDestroyObj
3120  END INTERFACE cmfe_EquationsSet_DerivedDestroy
3121 
3122  !>Finish the creation of equations for an equations set. \see OpenCMISS::Iron::cmfe_EquationsSet_EquationsCreateStart
3123  INTERFACE cmfe_EquationsSet_EquationsCreateFinish
3124  MODULE PROCEDURE cmfe_EquationsSet_EquationsCreateFinishNumber
3125  MODULE PROCEDURE cmfe_EquationsSet_EquationsCreateFinishObj
3126  END INTERFACE cmfe_EquationsSet_EquationsCreateFinish
3127 
3128  !>Start the creation of equations for an equations set. \see OpenCMISS::Iron::cmfe_EquationsSet_EquationsCreateFinish
3129  INTERFACE cmfe_EquationsSet_EquationsCreateStart
3130  MODULE PROCEDURE cmfe_EquationsSet_EquationsCreateStartNumber
3131  MODULE PROCEDURE cmfe_EquationsSet_EquationsCreateStartObj
3132  END INTERFACE cmfe_EquationsSet_EquationsCreateStart
3133 
3134  !>Destroy the equations for an equations set.
3135  INTERFACE cmfe_EquationsSet_EquationsDestroy
3136  MODULE PROCEDURE cmfe_EquationsSet_EquationsDestroyNumber
3137  MODULE PROCEDURE cmfe_EquationsSet_EquationsDestroyObj
3138  END INTERFACE cmfe_EquationsSet_EquationsDestroy
3139 
3140  !>Finish the creation of independent fields for an equations set. \see OpenCMISS::Iron::cmfe_EquationsSet_IndependentCreateStart
3141  INTERFACE cmfe_EquationsSet_IndependentCreateFinish
3142  MODULE PROCEDURE cmfe_EquationsSet_IndependentCreateFinishNumber
3143  MODULE PROCEDURE cmfe_EquationsSet_IndependentCreateFinishObj
3144  END INTERFACE cmfe_EquationsSet_IndependentCreateFinish
3145 
3146  !>Start the creation of independent fields for an equations set. \see OpenCMISS::Iron::cmfe_EquationsSet_MaterialsCreateFinish
3147  INTERFACE cmfe_EquationsSet_IndependentCreateStart
3148  MODULE PROCEDURE cmfe_EquationsSet_IndependentCreateStartNumber
3149  MODULE PROCEDURE cmfe_EquationsSet_IndependentCreateStartObj
3150  END INTERFACE cmfe_EquationsSet_IndependentCreateStart
3151 
3152  !>Destroy the independent fields for an equations set.
3153  INTERFACE cmfe_EquationsSet_IndependentDestroy
3154  MODULE PROCEDURE cmfe_EquationsSet_IndependentDestroyNumber
3155  MODULE PROCEDURE cmfe_EquationsSet_IndependentDestroyObj
3156  END INTERFACE cmfe_EquationsSet_IndependentDestroy
3157 
3158  !>Finish the creation of materials for an equations set. \see OpenCMISS::Iron::cmfe_EquationsSet_MaterialsCreateStart
3159  INTERFACE cmfe_EquationsSet_MaterialsCreateFinish
3160  MODULE PROCEDURE cmfe_EquationsSet_MaterialsCreateFinishNumber
3161  MODULE PROCEDURE cmfe_EquationsSet_MaterialsCreateFinishObj
3162  END INTERFACE cmfe_EquationsSet_MaterialsCreateFinish
3163 
3164  !>Start the creation of materials for an equations set. \see OpenCMISS::Iron::cmfe_EquationsSet_MaterialsCreateFinish
3165  INTERFACE cmfe_EquationsSet_MaterialsCreateStart
3166  MODULE PROCEDURE cmfe_EquationsSet_MaterialsCreateStartNumber
3167  MODULE PROCEDURE cmfe_EquationsSet_MaterialsCreateStartObj
3168  END INTERFACE cmfe_EquationsSet_MaterialsCreateStart
3169 
3170  !>Destroy the materials for an equations set.
3171  INTERFACE cmfe_EquationsSet_MaterialsDestroy
3172  MODULE PROCEDURE cmfe_EquationsSet_MaterialsDestroyNumber
3173  MODULE PROCEDURE cmfe_EquationsSet_MaterialsDestroyObj
3174  END INTERFACE cmfe_EquationsSet_MaterialsDestroy
3175 
3176  !>Returns the solution method for an equations set.
3177  INTERFACE cmfe_EquationsSet_SolutionMethodGet
3178  MODULE PROCEDURE cmfe_EquationsSet_SolutionMethodGetNumber
3179  MODULE PROCEDURE cmfe_EquationsSet_SolutionMethodGetObj
3180  END INTERFACE cmfe_EquationsSet_SolutionMethodGet
3181 
3182  !>Sets/changes the solution method for an equations set.
3183  INTERFACE cmfe_EquationsSet_SolutionMethodSet
3184  MODULE PROCEDURE cmfe_EquationsSet_SolutionMethodSetNumber
3185  MODULE PROCEDURE cmfe_EquationsSet_SolutionMethodSetObj
3186  END INTERFACE cmfe_EquationsSet_SolutionMethodSet
3187 
3188  !>Finish the creation of a source for an equations set. \see OpenCMISS::Iron::cmfe_EquationsSet_SourceCreateStart
3189  INTERFACE cmfe_EquationsSet_SourceCreateFinish
3190  MODULE PROCEDURE cmfe_EquationsSet_SourceCreateFinishNumber
3191  MODULE PROCEDURE cmfe_EquationsSet_SourceCreateFinishObj
3192  END INTERFACE cmfe_EquationsSet_SourceCreateFinish
3193 
3194  !>Start the creation of a source for an equations set. \see OpenCMISS::Iron::cmfe_EquationsSet_SourceCreateFinish
3195  INTERFACE cmfe_EquationsSet_SourceCreateStart
3196  MODULE PROCEDURE cmfe_EquationsSet_SourceCreateStartNumber
3197  MODULE PROCEDURE cmfe_EquationsSet_SourceCreateStartObj
3198  END INTERFACE cmfe_EquationsSet_SourceCreateStart
3199 
3200  !>Destroy the source for an equations set.
3201  INTERFACE cmfe_EquationsSet_SourceDestroy
3202  MODULE PROCEDURE cmfe_EquationsSet_SourceDestroyNumber
3203  MODULE PROCEDURE cmfe_EquationsSet_SourceDestroyObj
3204  END INTERFACE cmfe_EquationsSet_SourceDestroy
3205 
3206  !>Returns the equations set specification array
3207  INTERFACE cmfe_EquationsSet_SpecificationGet
3208  MODULE PROCEDURE cmfe_EquationsSet_SpecificationGetNumber
3209  MODULE PROCEDURE cmfe_EquationsSet_SpecificationGetObj
3210  END INTERFACE cmfe_EquationsSet_SpecificationGet
3211 
3212  !>Returns the size of the equations set specification array.
3213  INTERFACE cmfe_EquationsSet_SpecificationSizeGet
3214  MODULE PROCEDURE cmfe_EquationsSet_SpecificationSizeGetNumber
3215  MODULE PROCEDURE cmfe_EquationsSet_SpecificationSizeGetObj
3216  END INTERFACE cmfe_EquationsSet_SpecificationSizeGet
3217 
3218  !>Calculates an output field for the equations set.
3219  INTERFACE cmfe_EquationsSet_DerivedVariableCalculate
3220  MODULE PROCEDURE cmfe_EquationsSet_DerivedVariableCalculateNumber
3221  MODULE PROCEDURE cmfe_EquationsSet_DerivedVariableCalculateObj
3222  END INTERFACE cmfe_EquationsSet_DerivedVariableCalculate
3223 
3224  !>Set the derived field variable type to be used by a derived variable
3225  INTERFACE cmfe_EquationsSet_DerivedVariableSet
3226  MODULE PROCEDURE cmfe_EquationsSet_DerivedVariableSetNumber
3227  MODULE PROCEDURE cmfe_EquationsSet_DerivedVariableSetObj
3228  END INTERFACE cmfe_EquationsSet_DerivedVariableSet
3229 
3230  !>Evaluate a tensor at a given element xi location.
3231  INTERFACE cmfe_EquationsSet_TensorInterpolateXi
3232  MODULE PROCEDURE cmfe_EquationsSet_TensorInterpolateXiNumber
3233  MODULE PROCEDURE cmfe_EquationsSet_TensorInterpolateXiObj
3234  END INTERFACE cmfe_EquationsSet_TensorInterpolateXi
3235 
3236  !>Gets the equations set analytic user parameter
3237  INTERFACE cmfe_EquationsSet_AnalyticUserParamGet
3238  MODULE PROCEDURE cmfe_EquationsSet_AnalyticUserParamGetNumber
3239  MODULE PROCEDURE cmfe_EquationsSet_AnalyticUserParamGetObj
3240  END INTERFACE cmfe_EquationsSet_AnalyticUserParamGet
3241 
3242  !>Sets/changes the equations set analytic user parameter
3243  INTERFACE cmfe_EquationsSet_AnalyticUserParamSet
3244  MODULE PROCEDURE cmfe_EquationsSet_AnalyticUserParamSetNumber
3245  MODULE PROCEDURE cmfe_EquationsSet_AnalyticUserParamSetObj
3246  END INTERFACE cmfe_EquationsSet_AnalyticUserParamSet
3247 
3248  PUBLIC cmfe_EquationsSet_AnalyticCreateFinish,cmfe_EquationsSet_AnalyticCreateStart
3249 
3250  PUBLIC cmfe_EquationsSet_AnalyticDestroy
3251 
3252  PUBLIC cmfe_EquationsSet_AnalyticEvaluate
3253 
3254  PUBLIC cmfe_EquationsSet_AnalyticTimeGet,cmfe_EquationsSet_AnalyticTimeSet
3255 
3256  PUBLIC cmfe_EquationsSet_CreateFinish,cmfe_EquationsSet_CreateStart
3257 
3258  PUBLIC cmfe_EquationsSet_Destroy
3259 
3260  PUBLIC cmfe_EquationsSet_DependentCreateFinish,cmfe_EquationsSet_DependentCreateStart
3261 
3262  PUBLIC cmfe_EquationsSet_DependentDestroy
3263 
3264  PUBLIC cmfe_EquationsSet_DerivedCreateFinish,cmfe_EquationsSet_DerivedCreateStart
3265 
3266  PUBLIC cmfe_EquationsSet_DerivedDestroy
3267 
3268  PUBLIC cmfe_EquationsSet_DerivedVariableCalculate,cmfe_EquationsSet_DerivedVariableSet
3269 
3270  PUBLIC cmfe_EquationsSet_EquationsCreateFinish,cmfe_EquationsSet_EquationsCreateStart
3271 
3272  PUBLIC cmfe_EquationsSet_EquationsDestroy
3273 
3274  PUBLIC cmfe_EquationsSet_IndependentCreateFinish,cmfe_EquationsSet_IndependentCreateStart
3275 
3276  PUBLIC cmfe_EquationsSet_IndependentDestroy
3277 
3278  PUBLIC cmfe_EquationsSet_MaterialsCreateFinish,cmfe_EquationsSet_MaterialsCreateStart
3279 
3280  PUBLIC cmfe_EquationsSet_MaterialsDestroy
3281 
3282  PUBLIC cmfe_EquationsSet_SolutionMethodGet,cmfe_EquationsSet_SolutionMethodSet
3283 
3284  PUBLIC cmfe_EquationsSet_SourceCreateFinish,cmfe_EquationsSet_SourceCreateStart
3285 
3286  PUBLIC cmfe_EquationsSet_SourceDestroy
3287 
3288  PUBLIC cmfe_EquationsSet_SpecificationGet,cmfe_EquationsSet_SpecificationSizeGet
3289 
3290  PUBLIC cmfe_EquationsSet_TensorInterpolateXi
3291 
3292  PUBLIC cmfe_EquationsSet_AnalyticUserParamSet,cmfe_EquationsSet_AnalyticUserParamGet
3293 
3294 !!==================================================================================================================================
3295 !!
3296 !! FIELD_ROUTINES
3297 !!
3298 !!==================================================================================================================================
3299 
3300  !Module parameters
3301 
3302  !> \addtogroup OPENCMISS_FieldConstants OPENCMISS::Field::Constants
3303  !> \brief Field constants.
3304  !>@{
3305  !> \addtogroup OPENCMISS_FieldDependentTypes OPENCMISS::Field::DependentTypes
3306  !> \brief Depedent field parameter types.
3307  !> \see OPENCMISS::Field,OPENCMISS
3308  !>@{
3309  INTEGER(INTG), PARAMETER :: CMFE_FIELD_INDEPENDENT_TYPE = FIELD_INDEPENDENT_TYPE !<Independent field type \see OPENCMISS_FieldDependentTypes,OPENCMISS
3310  INTEGER(INTG), PARAMETER :: CMFE_FIELD_DEPENDENT_TYPE = FIELD_DEPENDENT_TYPE !<Dependent field type \see OPENCMISS_FieldDependentTypes,OPENCMISS
3311  !>@}
3312  !> \addtogroup OPENCMISS_FieldDimensionTypes OPENCMISS::Field::DimensionTypes
3313  !> \brief Field dimension parameter types.
3314  !> \see OPENCMISS::Field,OPENCMISS
3315  !>@{
3316  INTEGER(INTG), PARAMETER :: CMFE_FIELD_SCALAR_DIMENSION_TYPE = FIELD_SCALAR_DIMENSION_TYPE !<Scalar field \see OPENCMISS_FieldDimensionTypes,OPENCMISS
3317  INTEGER(INTG), PARAMETER :: CMFE_FIELD_VECTOR_DIMENSION_TYPE = FIELD_VECTOR_DIMENSION_TYPE !<Vector field \see OPENCMISS_FieldDimensionTypes,OPENCMISS
3318  INTEGER(INTG), PARAMETER :: CMFE_FIELD_TENSOR_DIMENSION_TYPE = FIELD_TENSOR_DIMENSION_TYPE !<Tensor field \see OPENCMISS_FieldDimensionTypes,OPENCMISS
3319  !>@}
3320  !> \addtogroup OPENCMISS_FieldTypes OPENCMISS::Field::Types
3321  !> \brief Field type parameters.
3322  !> \see OPENCMISS::Field,OPENCMISS
3323  !>@{
3324  INTEGER(INTG), PARAMETER :: CMFE_FIELD_GEOMETRIC_TYPE = FIELD_GEOMETRIC_TYPE !<Geometric field \see OPENCMISS_FieldTypes,OPENCMISS
3325  INTEGER(INTG), PARAMETER :: CMFE_FIELD_FIBRE_TYPE = FIELD_FIBRE_TYPE !<Fibre field \see OPENCMISS_FieldTypes,OPENCMISS
3326  INTEGER(INTG), PARAMETER :: CMFE_FIELD_GENERAL_TYPE = FIELD_GENERAL_TYPE !<General field \see OPENCMISS_FieldTypes,OPENCMISS
3327  INTEGER(INTG), PARAMETER :: CMFE_FIELD_MATERIAL_TYPE = FIELD_MATERIAL_TYPE !<Material field \see OPENCMISS_FieldTypes,OPENCMISS
3328  INTEGER(INTG), PARAMETER :: CMFE_FIELD_GEOMETRIC_GENERAL_TYPE = FIELD_GEOMETRIC_GENERAL_TYPE !<Geometric general field \see OPENCMISS_FieldTypes,OPENCMISS
3329  !>@}
3330  !> \addtogroup OPENCMISS_FieldInterpolationTypes OPENCMISS::Field::InterpolationTypes
3331  !> \brief Field interpolation parameters.
3332  !> \see OPENCMISS::Field,OPENCMISS
3333  !>@{
3334  INTEGER(INTG), PARAMETER :: CMFE_FIELD_CONSTANT_INTERPOLATION = FIELD_CONSTANT_INTERPOLATION !<Constant interpolation. One parameter for the field \see OPENCMISS_FieldInterpolationTypes,OPENCMISS
3335  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
3336  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
3337  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
3338  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
3339  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
3340  !>@}
3341  !> \addtogroup OPENCMISS_FieldVariableTypes OPENCMISS::Field::VariableTypes
3342  !> \brief Field variable type parameters.
3343  !> \see OPENCMISS::Field,OPENCMISS
3344  !>@{
3345  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
3346  INTEGER(INTG), PARAMETER :: CMFE_FIELD_U_VARIABLE_TYPE = FIELD_U_VARIABLE_TYPE !<Standard variable type i.e., u \see OPENCMISS_FieldVariableTypes,OPENCMISS
3347  INTEGER(INTG), PARAMETER :: CMFE_FIELD_DELUDELN_VARIABLE_TYPE = FIELD_DELUDELN_VARIABLE_TYPE !<Normal derivative variable type i.e., du/dn \see OPENCMISS_FieldVariableTypes,OPENCMISS
3348  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
3349  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
3350  INTEGER(INTG), PARAMETER :: CMFE_FIELD_V_VARIABLE_TYPE = FIELD_V_VARIABLE_TYPE !<Second standard variable type i.e., v \see OPENCMISS_FieldVariableTypes,OPENCMISS
3351  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
3352  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
3353  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
3354  INTEGER(INTG), PARAMETER :: CMFE_FIELD_U1_VARIABLE_TYPE = FIELD_U1_VARIABLE_TYPE !<Standard variable type i.e., u \see OPENCMISS_FieldVariableTypes,OPENCMISS
3355  INTEGER(INTG), PARAMETER :: CMFE_FIELD_DELU1DELN_VARIABLE_TYPE = FIELD_DELU1DELN_VARIABLE_TYPE !<Normal derivative variable type i.e., du/dn \see OPENCMISS_FieldVariableTypes,OPENCMISS
3356  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
3357  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
3358  INTEGER(INTG), PARAMETER :: CMFE_FIELD_U2_VARIABLE_TYPE = FIELD_U2_VARIABLE_TYPE !<Standard variable type i.e., u \see OPENCMISS_FieldVariableTypes,OPENCMISS
3359  INTEGER(INTG), PARAMETER :: CMFE_FIELD_DELU2DELN_VARIABLE_TYPE = FIELD_DELU2DELN_VARIABLE_TYPE !<Normal derivative variable type i.e., du/dn \see OPENCMISS_FieldVariableTypes,OPENCMISS
3360  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
3361  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
3362  INTEGER(INTG), PARAMETER :: CMFE_FIELD_U3_VARIABLE_TYPE = FIELD_U3_VARIABLE_TYPE !<Standard variable type i.e., u \see OPENCMISS_FieldVariableTypes,OPENCMISS
3363  INTEGER(INTG), PARAMETER :: CMFE_FIELD_DELU3DELN_VARIABLE_TYPE = FIELD_DELU3DELN_VARIABLE_TYPE !<Normal derivative variable type i.e., du/dn \see OPENCMISS_FieldVariableTypes,OPENCMISS
3364  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
3365  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
3366  INTEGER(INTG), PARAMETER :: CMFE_FIELD_U4_VARIABLE_TYPE = FIELD_U4_VARIABLE_TYPE !<Standard variable type i.e., u \see OPENCMISS_FieldVariableTypes,OPENCMISS
3367  INTEGER(INTG), PARAMETER :: CMFE_FIELD_DELU4DELN_VARIABLE_TYPE = FIELD_DELU4DELN_VARIABLE_TYPE !<Normal derivative variable type i.e., du/dn \see OPENCMISS_FieldVariableTypes,OPENCMISS
3368  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
3369  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
3370  INTEGER(INTG), PARAMETER :: CMFE_FIELD_U5_VARIABLE_TYPE = FIELD_U5_VARIABLE_TYPE !<Standard variable type i.e., u \see OPENCMISS_FieldVariableTypes,OPENCMISS
3371  INTEGER(INTG), PARAMETER :: CMFE_FIELD_DELU5DELN_VARIABLE_TYPE = FIELD_DELU5DELN_VARIABLE_TYPE !<Normal derivative variable type i.e., du/dn \see OPENCMISS_FieldVariableTypes,OPENCMISS
3372  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
3373  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
3374  INTEGER(INTG), PARAMETER :: CMFE_FIELD_U6_VARIABLE_TYPE = FIELD_U6_VARIABLE_TYPE !<Standard variable type i.e., u \see OPENCMISS_FieldVariableTypes,OPENCMISS
3375  INTEGER(INTG), PARAMETER :: CMFE_FIELD_DELU6DELN_VARIABLE_TYPE = FIELD_DELU6DELN_VARIABLE_TYPE !<Normal derivative variable type i.e., du/dn \see OPENCMISS_FieldVariableTypes,OPENCMISS
3376  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
3377  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
3378  INTEGER(INTG), PARAMETER :: CMFE_FIELD_U7_VARIABLE_TYPE = FIELD_U7_VARIABLE_TYPE !<Standard variable type i.e., u \see OPENCMISS_FieldVariableTypes,OPENCMISS
3379  INTEGER(INTG), PARAMETER :: CMFE_FIELD_DELU7DELN_VARIABLE_TYPE = FIELD_DELU7DELN_VARIABLE_TYPE !<Normal derivative variable type i.e., du/dn \see OPENCMISS_FieldVariableTypes,OPENCMISS
3380  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
3381  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
3382  INTEGER(INTG), PARAMETER :: CMFE_FIELD_U8_VARIABLE_TYPE = FIELD_U8_VARIABLE_TYPE !<Standard variable type i.e., u \see OPENCMISS_FieldVariableTypes,OPENCMISS
3383  INTEGER(INTG), PARAMETER :: CMFE_FIELD_DELU8DELN_VARIABLE_TYPE = FIELD_DELU8DELN_VARIABLE_TYPE !<Normal derivative variable type i.e., du/dn \see OPENCMISS_FieldVariableTypes,OPENCMISS
3384  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
3385  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
3386  INTEGER(INTG), PARAMETER :: CMFE_FIELD_U9_VARIABLE_TYPE = FIELD_U9_VARIABLE_TYPE !<Standard variable type i.e., u \see OPENCMISS_FieldVariableTypes,OPENCMISS
3387  INTEGER(INTG), PARAMETER :: CMFE_FIELD_DELU9DELN_VARIABLE_TYPE = FIELD_DELU9DELN_VARIABLE_TYPE !<Normal derivative variable type i.e., du/dn \see OPENCMISS_FieldVariableTypes,OPENCMISS
3388  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
3389  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
3390  INTEGER(INTG), PARAMETER :: CMFE_FIELD_U10_VARIABLE_TYPE = FIELD_U10_VARIABLE_TYPE !<Standard variable type i.e., u \see OPENCMISS_FieldVariableTypes,OPENCMISS
3391  INTEGER(INTG), PARAMETER :: CMFE_FIELD_DELU10DELN_VARIABLE_TYPE = FIELD_DELU10DELN_VARIABLE_TYPE !<Normal derivative variable type i.e., du/dn \see OPENCMISS_FieldVariableTypes,OPENCMISS
3392  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
3393  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
3394  !>@}
3395  !> \addtogroup OPENCMISS_FieldDataTypes OPENCMISS::Field::DataTypes
3396  !> \brief Field data types
3397  !> \see OPENCMISS::Field,OPENCMISS
3398  !>@{
3399  INTEGER(INTG), PARAMETER :: CMFE_FIELD_INTG_TYPE = FIELD_INTG_TYPE !<Integer field data type \see OPENCMISS_FieldDataTypes,OPENCMISS
3400  INTEGER(INTG), PARAMETER :: CMFE_FIELD_SP_TYPE = FIELD_SP_TYPE !<Single precision real field data type \see OPENCMISS_FieldDataTypes,OPENCMISS
3401  INTEGER(INTG), PARAMETER :: CMFE_FIELD_DP_TYPE = FIELD_DP_TYPE !<Double precision real field data type \see OPENCMISS_FieldDataTypes,OPENCMISS
3402  INTEGER(INTG), PARAMETER :: CMFE_FIELD_L_TYPE = FIELD_L_TYPE !<Logical field data type \see OPENCMISS_FieldDataTypes,OPENCMISS
3403  !>@}
3404  !> \addtogroup OPENCMISS_FieldDOFOrderTypes OPENCMISS::Field::DOFOrderTypes
3405  !> \brief Field DOF order types
3406  !> \see OPENCMISS::Field,OPENCMISS
3407  !>@{
3408  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
3409  INTEGER(INTG), PARAMETER :: CMFE_FIELD_CONTIGUOUS_COMPONENT_DOF_ORDER = FIELD_CONTIGUOUS_COMPONENT_DOF_ORDER !<Field variable component dofs are contiguous \see OPENCMISS_FieldDOFOrderTypes,OPENCMISS
3410  !>@}
3411  !> \addtogroup OPENCMISS_FieldParameterSetTypes OPENCMISS::Field::ParameterSetTypes
3412  !> \brief Field parameter set type parameters
3413  !> \see OPENCMISS::Field,OPENCMISS
3414  !>@{
3415  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
3416  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
3417  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
3418  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
3419  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
3420  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
3421  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
3422  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
3423  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
3424  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
3425  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
3426  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
3427  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
3428  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
3429  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
3430  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
3431  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
3432  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
3433  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
3434  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
3435  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
3436  !>@}
3437  !> \addtogroup OPENCMISS_FieldScalingTypes OPENCMISS::Field::ScalingTypes
3438  !> \brief Field scaling type parameters
3439  !> \see OPENCMISS::Field,OPENCMISS
3440  !>@{
3441  INTEGER(INTG), PARAMETER :: CMFE_FIELD_NO_SCALING = FIELD_NO_SCALING !<The field is not scaled \see OPENCMISS_FieldScalingTypes,OPENCMISS
3442  INTEGER(INTG), PARAMETER :: CMFE_FIELD_UNIT_SCALING = FIELD_UNIT_SCALING !<The field has unit scaling \see OPENCMISS_FieldScalingTypes,OPENCMISS
3443  INTEGER(INTG), PARAMETER :: CMFE_FIELD_ARC_LENGTH_SCALING = FIELD_ARC_LENGTH_SCALING !<The field has arc length scaling \see OPENCMISS_FieldScalingTypes,OPENCMISS
3444  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
3445  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
3446  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
3447  !>@}
3448  !>@}
3449 
3450  !Module types
3451 
3452  !Module variables
3453 
3454  !Interfaces
3455 
3456  !>Returns the interpolation type for a field variable component.
3457  INTERFACE cmfe_Field_ComponentInterpolationGet
3458  MODULE PROCEDURE cmfe_Field_ComponentInterpolationGetNumber
3459  MODULE PROCEDURE cmfe_Field_ComponentInterpolationGetObj
3460  END INTERFACE cmfe_Field_ComponentInterpolationGet
3461 
3462  !>Sets/changes the interpolation type for a field variable component.
3463  INTERFACE cmfe_Field_ComponentInterpolationSet
3464  MODULE PROCEDURE cmfe_Field_ComponentInterpolationSetNumber
3465  MODULE PROCEDURE cmfe_Field_ComponentInterpolationSetObj
3466  END INTERFACE cmfe_Field_ComponentInterpolationSet
3467 
3468  !>Returns the label for a field variable component.
3469  INTERFACE cmfe_Field_ComponentLabelGet
3470  MODULE PROCEDURE cmfe_Field_ComponentLabelGetCNumber
3471  MODULE PROCEDURE cmfe_Field_ComponentLabelGetCObj
3472  MODULE PROCEDURE cmfe_Field_ComponentLabelGetVSNumber
3473  MODULE PROCEDURE cmfe_Field_ComponentLabelGetVSObj
3474  END INTERFACE cmfe_Field_ComponentLabelGet
3475 
3476  !>Sets/changes the label for a field variable component.
3477  INTERFACE cmfe_Field_ComponentLabelSet
3478  MODULE PROCEDURE cmfe_Field_ComponentLabelSetCNumber
3479  MODULE PROCEDURE cmfe_Field_ComponentLabelSetCObj
3480  MODULE PROCEDURE cmfe_Field_ComponentLabelSetVSNumber
3481  MODULE PROCEDURE cmfe_Field_ComponentLabelSetVSObj
3482  END INTERFACE cmfe_Field_ComponentLabelSet
3483 
3484  !>Returns the mesh component number for a field variable component.
3485  INTERFACE cmfe_Field_ComponentMeshComponentGet
3486  MODULE PROCEDURE cmfe_Field_ComponentMeshComponentGetNumber
3487  MODULE PROCEDURE cmfe_Field_ComponentMeshComponentGetObj
3488  END INTERFACE cmfe_Field_ComponentMeshComponentGet
3489 
3490  !>Sets/changes the mesh component number for a field variable component.
3491  INTERFACE cmfe_Field_ComponentMeshComponentSet
3492  MODULE PROCEDURE cmfe_Field_ComponentMeshComponentSetNumber
3493  MODULE PROCEDURE cmfe_Field_ComponentMeshComponentSetObj
3494  END INTERFACE cmfe_Field_ComponentMeshComponentSet
3495 
3496  !>Initialises the values of a parameter set of a field variable component to a constant value.
3497  INTERFACE cmfe_Field_ComponentValuesInitialise
3498  MODULE PROCEDURE cmfe_Field_ComponentValuesInitialiseIntgNumber
3499  MODULE PROCEDURE cmfe_Field_ComponentValuesInitialiseIntgObj
3500  MODULE PROCEDURE cmfe_Field_ComponentValuesInitialiseSPNumber
3501  MODULE PROCEDURE cmfe_Field_ComponentValuesInitialiseSPObj
3502  MODULE PROCEDURE cmfe_Field_ComponentValuesInitialiseDPNumber
3503  MODULE PROCEDURE cmfe_Field_ComponentValuesInitialiseDPObj
3504  MODULE PROCEDURE cmfe_Field_ComponentValuesInitialiseLNumber
3505  MODULE PROCEDURE cmfe_Field_ComponentValuesInitialiseLObj
3506  END INTERFACE cmfe_Field_ComponentValuesInitialise
3507 
3508  !>Returns the data type for a field variable.
3509  INTERFACE cmfe_Field_DataTypeGet
3510  MODULE PROCEDURE cmfe_Field_DataTypeGetNumber
3511  MODULE PROCEDURE cmfe_Field_DataTypeGetObj
3512  END INTERFACE cmfe_Field_DataTypeGet
3513 
3514  !>Sets/changes the data type for a field variable.
3515  INTERFACE cmfe_Field_DataTypeSet
3516  MODULE PROCEDURE cmfe_Field_DataTypeSetNumber
3517  MODULE PROCEDURE cmfe_Field_DataTypeSetObj
3518  END INTERFACE cmfe_Field_DataTypeSet
3519 
3520  !>Returns the DOF order type for a field variable.
3521  INTERFACE cmfe_Field_DOFOrderTypeGet
3522  MODULE PROCEDURE cmfe_Field_DOFOrderTypeGetNumber
3523  MODULE PROCEDURE cmfe_Field_DOFOrderTypeGetObj
3524  END INTERFACE cmfe_Field_DOFOrderTypeGet
3525 
3526  !>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.
3527  INTERFACE cmfe_Field_DOFOrderTypeSet
3528  MODULE PROCEDURE cmfe_Field_DOFOrderTypeSetNumber
3529  MODULE PROCEDURE cmfe_Field_DOFOrderTypeSetObj
3530  END INTERFACE cmfe_Field_DOFOrderTypeSet
3531 
3532  !>Finishes the creation of a field. \see OpenCMISS::Iron::cmfe_Field_CreateStart
3533  INTERFACE cmfe_Field_CreateFinish
3534  MODULE PROCEDURE cmfe_Field_CreateFinishNumber
3535  MODULE PROCEDURE cmfe_Field_CreateFinishObj
3536  END INTERFACE cmfe_Field_CreateFinish
3537 
3538  !>Starts the creation of a field. \see OpenCMISS::Iron::cmfe_Field_CreateFinish
3539  INTERFACE cmfe_Field_CreateStart
3540  MODULE PROCEDURE cmfe_Field_CreateStartNumber
3541  MODULE PROCEDURE cmfe_Field_CreateStartInterfaceObj
3542  MODULE PROCEDURE cmfe_Field_CreateStartRegionObj
3543  END INTERFACE cmfe_Field_CreateStart
3544 
3545  !>Returns the dependent type for a field.
3546  INTERFACE cmfe_Field_DependentTypeGet
3547  MODULE PROCEDURE cmfe_Field_DependentTypeGetNumber
3548  MODULE PROCEDURE cmfe_Field_DependentTypeGetObj
3549  END INTERFACE cmfe_Field_DependentTypeGet
3550 
3551  !>Sets/changes the dependent type for a field.
3552  INTERFACE cmfe_Field_DependentTypeSet
3553  MODULE PROCEDURE cmfe_Field_DependentTypeSetNumber
3554  MODULE PROCEDURE cmfe_Field_DependentTypeSetObj
3555  END INTERFACE cmfe_Field_DependentTypeSet
3556 
3557  !>Destroys a field.
3558  INTERFACE cmfe_Field_Destroy
3559  MODULE PROCEDURE cmfe_Field_DestroyNumber
3560  MODULE PROCEDURE cmfe_Field_DestroyObj
3561  END INTERFACE cmfe_Field_Destroy
3562 
3563  !>Returns the field dimension for a field variable.
3564  INTERFACE cmfe_Field_DimensionGet
3565  MODULE PROCEDURE cmfe_Field_DimensionGetNumber
3566  MODULE PROCEDURE cmfe_Field_DimensionGetObj
3567  END INTERFACE cmfe_Field_DimensionGet
3568 
3569  !>Sets/changes the field dimension for a field variable.
3570  INTERFACE cmfe_Field_DimensionSet
3571  MODULE PROCEDURE cmfe_Field_DimensionSetNumber
3572  MODULE PROCEDURE cmfe_Field_DimensionSetObj
3573  END INTERFACE cmfe_Field_DimensionSet
3574 
3575  !>Returns the geometric field for a field.
3576  INTERFACE cmfe_Field_GeometricFieldGet
3577  MODULE PROCEDURE cmfe_Field_GeometricFieldGetNumber
3578  MODULE PROCEDURE cmfe_Field_GeometricFieldGetObj
3579  END INTERFACE cmfe_Field_GeometricFieldGet
3580 
3581  !>Sets/changes the geometric field for a field.
3582  INTERFACE cmfe_Field_GeometricFieldSet
3583  MODULE PROCEDURE cmfe_Field_GeometricFieldSetNumber
3584  MODULE PROCEDURE cmfe_Field_GeometricFieldSetObj
3585  END INTERFACE cmfe_Field_GeometricFieldSet
3586 
3587  !>Gets line lengths from a geometric field given an element number and element basis line number.
3588  INTERFACE cmfe_Field_GeometricParametersElementLineLengthGet
3589  MODULE PROCEDURE cmfe_Field_GeometricParametersElementLineLengthGetNumber
3590  MODULE PROCEDURE cmfe_Field_GeometricParametersElementLineLengthGetObj
3591  END INTERFACE cmfe_Field_GeometricParametersElementLineLengthGet
3592 
3593  !>Gets volumes from a geometric field given an element number.
3594  INTERFACE cmfe_Field_GeometricParametersElementVolumeGet
3595  MODULE PROCEDURE cmfe_Field_GeometricParametersElementVolumeGetNumber
3596  MODULE PROCEDURE cmfe_Field_GeometricParametersElementVolumeGetObj
3597  END INTERFACE cmfe_Field_GeometricParametersElementVolumeGet
3598 
3599  !>Returns the label for a field.
3600  INTERFACE cmfe_Field_LabelGet
3601  MODULE PROCEDURE cmfe_Field_LabelGetCNumber
3602  MODULE PROCEDURE cmfe_Field_LabelGetCObj
3603  MODULE PROCEDURE cmfe_Field_LabelGetVSNumber
3604  MODULE PROCEDURE cmfe_Field_LabelGetVSObj
3605  END INTERFACE cmfe_Field_LabelGet
3606 
3607  !>Sets/changes the label for a field.
3608  INTERFACE cmfe_Field_LabelSet
3609  MODULE PROCEDURE cmfe_Field_LabelSetCNumber
3610  MODULE PROCEDURE cmfe_Field_LabelSetCObj
3611  MODULE PROCEDURE cmfe_Field_LabelSetVSNumber
3612  MODULE PROCEDURE cmfe_Field_LabelSetVSObj
3613  END INTERFACE cmfe_Field_LabelSet
3614 
3615  INTERFACE cmfe_Field_PositionNormalTangentCalculateNode
3616  MODULE PROCEDURE cmfe_Field_PositionNormalTangentCalculateNodeNumber
3617  MODULE PROCEDURE cmfe_Field_PositionNormalTangentCalculateNodeObj
3618  END INTERFACE
3619 
3620  !>Returns the mesh decomposition for a field.
3621  INTERFACE cmfe_Field_MeshDecompositionGet
3622  MODULE PROCEDURE cmfe_Field_MeshDecompositionGetNumber
3623  MODULE PROCEDURE cmfe_Field_MeshDecompositionGetObj
3624  END INTERFACE cmfe_Field_MeshDecompositionGet
3625 
3626  !>Sets/changes the mesh decomposition for a field. \todo remove when fields take decomposition argument on creation???
3627  INTERFACE cmfe_Field_MeshDecompositionSet
3628  MODULE PROCEDURE cmfe_Field_MeshDecompositionSetNumber
3629  MODULE PROCEDURE cmfe_Field_MeshDecompositionSetObj
3630  END INTERFACE cmfe_Field_MeshDecompositionSet
3631 
3632  !>Sets/changes the data projection for a field.
3633  INTERFACE cmfe_Field_DataProjectionSet
3634  MODULE PROCEDURE cmfe_Field_DataProjectionSetNumber
3635  MODULE PROCEDURE cmfe_Field_DataProjectionSetObj
3636  END INTERFACE cmfe_Field_DataProjectionSet
3637 
3638  !>Returns the number of field components for a field variable.
3639  INTERFACE cmfe_Field_NumberOfComponentsGet
3640  MODULE PROCEDURE cmfe_Field_NumberOfComponentsGetNumber
3641  MODULE PROCEDURE cmfe_Field_NumberOfComponentsGetObj
3642  END INTERFACE cmfe_Field_NumberOfComponentsGet
3643 
3644  !>Sets/changes the number of field components for a field variable.
3645  INTERFACE cmfe_Field_NumberOfComponentsSet
3646  MODULE PROCEDURE cmfe_Field_NumberOfComponentsSetNumber
3647  MODULE PROCEDURE cmfe_Field_NumberOfComponentsSetObj
3648  END INTERFACE cmfe_Field_NumberOfComponentsSet
3649 
3650  !>Returns the number of field variables for a field.
3651  INTERFACE cmfe_Field_NumberOfVariablesGet
3652  MODULE PROCEDURE cmfe_Field_NumberOfVariablesGetNumber
3653  MODULE PROCEDURE cmfe_Field_NumberOfVariablesGetObj
3654  END INTERFACE cmfe_Field_NumberOfVariablesGet
3655 
3656  !>Sets/changes the number of field variables for a field.
3657  INTERFACE cmfe_Field_NumberOfVariablesSet
3658  MODULE PROCEDURE cmfe_Field_NumberOfVariablesSetNumber
3659  MODULE PROCEDURE cmfe_Field_NumberOfVariablesSetObj
3660  END INTERFACE cmfe_Field_NumberOfVariablesSet
3661 
3662  !>Adds the given value to the given parameter set for the constant of the field variable component.
3663  INTERFACE cmfe_Field_ParameterSetAddConstant
3664  MODULE PROCEDURE cmfe_Field_ParameterSetAddConstantIntgNumber
3665  MODULE PROCEDURE cmfe_Field_ParameterSetAddConstantIntgObj
3666  MODULE PROCEDURE cmfe_Field_ParameterSetAddConstantSPNumber
3667  MODULE PROCEDURE cmfe_Field_ParameterSetAddConstantSPObj
3668  MODULE PROCEDURE cmfe_Field_ParameterSetAddConstantDPNumber
3669  MODULE PROCEDURE cmfe_Field_ParameterSetAddConstantDPObj
3670  MODULE PROCEDURE cmfe_Field_ParameterSetAddConstantLNumber
3671  MODULE PROCEDURE cmfe_Field_ParameterSetAddConstantLObj
3672  END INTERFACE cmfe_Field_ParameterSetAddConstant
3673 
3674  !>Adds the given value to the given parameter set for a particular user element of the field variable component.
3675  INTERFACE cmfe_Field_ParameterSetAddElement
3676  MODULE PROCEDURE cmfe_Field_ParameterSetAddElementIntgNumber
3677  MODULE PROCEDURE cmfe_Field_ParameterSetAddElementIntgObj
3678  MODULE PROCEDURE cmfe_Field_ParameterSetAddElementSPNumber
3679  MODULE PROCEDURE cmfe_Field_ParameterSetAddElementSPObj
3680  MODULE PROCEDURE cmfe_Field_ParameterSetAddElementDPNumber
3681  MODULE PROCEDURE cmfe_Field_ParameterSetAddElementDPObj
3682  MODULE PROCEDURE cmfe_Field_ParameterSetAddElementLNumber
3683  MODULE PROCEDURE cmfe_Field_ParameterSetAddElementLObj
3684  END INTERFACE cmfe_Field_ParameterSetAddElement
3685 
3686  !>Adds the given value to the given parameter set for a particular user node of the field variable component.
3687  INTERFACE cmfe_Field_ParameterSetAddNode
3688  MODULE PROCEDURE cmfe_Field_ParameterSetAddNodeIntgNumber
3689  MODULE PROCEDURE cmfe_Field_ParameterSetAddNodeIntgObj
3690  MODULE PROCEDURE cmfe_Field_ParameterSetAddNodeSPNumber
3691  MODULE PROCEDURE cmfe_Field_ParameterSetAddNodeSPObj
3692  MODULE PROCEDURE cmfe_Field_ParameterSetAddNodeDPNumber
3693  MODULE PROCEDURE cmfe_Field_ParameterSetAddNodeDPObj
3694  MODULE PROCEDURE cmfe_Field_ParameterSetAddNodeLNumber
3695  MODULE PROCEDURE cmfe_Field_ParameterSetAddNodeLObj
3696  END INTERFACE cmfe_Field_ParameterSetAddNode
3697 
3698  !>Creates a new parameter set of type set type for a field variable.
3699  INTERFACE cmfe_Field_ParameterSetCreate
3700  MODULE PROCEDURE cmfe_Field_ParameterSetCreateNumber
3701  MODULE PROCEDURE cmfe_Field_ParameterSetCreateObj
3702  END INTERFACE cmfe_Field_ParameterSetCreate
3703 
3704  !>Destroy a parameter set of type set type for a field variable.
3705  INTERFACE cmfe_Field_ParameterSetDestroy
3706  MODULE PROCEDURE cmfe_Field_ParameterSetDestroyNumber
3707  MODULE PROCEDURE cmfe_Field_ParameterSetDestroyObj
3708  END INTERFACE cmfe_Field_ParameterSetDestroy
3709 
3710  !>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.
3711  INTERFACE cmfe_Field_ParameterSetDataGet
3712  MODULE PROCEDURE cmfe_Field_ParameterSetDataGetIntgNumber
3713  MODULE PROCEDURE cmfe_Field_ParameterSetDataGetIntgObj
3714  MODULE PROCEDURE cmfe_Field_ParameterSetDataGetSPNumber
3715  MODULE PROCEDURE cmfe_Field_ParameterSetDataGetSPObj
3716  MODULE PROCEDURE cmfe_Field_ParameterSetDataGetDPNumber
3717  MODULE PROCEDURE cmfe_Field_ParameterSetDataGetDPObj
3718  MODULE PROCEDURE cmfe_Field_ParameterSetDataGetLNumber
3719  MODULE PROCEDURE cmfe_Field_ParameterSetDataGetLObj
3720  END INTERFACE cmfe_Field_ParameterSetDataGet
3721 
3722  !>Restores the specified field variable parameter set local array that was obtained with an OpenCMISS::Iron::cmfe_Field_ParameterSetDataGet call.
3723  INTERFACE cmfe_Field_ParameterSetDataRestore
3724  MODULE PROCEDURE cmfe_Field_ParameterSetDataRestoreIntgNumber
3725  MODULE PROCEDURE cmfe_Field_ParameterSetDataRestoreIntgObj
3726  MODULE PROCEDURE cmfe_Field_ParameterSetDataRestoreSPNumber
3727  MODULE PROCEDURE cmfe_Field_ParameterSetDataRestoreSPObj
3728  MODULE PROCEDURE cmfe_Field_ParameterSetDataRestoreDPNumber
3729  MODULE PROCEDURE cmfe_Field_ParameterSetDataRestoreDPObj
3730  MODULE PROCEDURE cmfe_Field_ParameterSetDataRestoreLNumber
3731  MODULE PROCEDURE cmfe_Field_ParameterSetDataRestoreLObj
3732  END INTERFACE cmfe_Field_ParameterSetDataRestore
3733 
3734  !>Returns from the given parameter set a value for the specified constant of a field variable component.
3735  INTERFACE cmfe_Field_ParameterSetGetConstant
3736  MODULE PROCEDURE cmfe_Field_ParameterSetGetConstantIntgNumber
3737  MODULE PROCEDURE cmfe_Field_ParameterSetGetConstantIntgObj
3738  MODULE PROCEDURE cmfe_Field_ParameterSetGetConstantSPNumber
3739  MODULE PROCEDURE cmfe_Field_ParameterSetGetConstantSPObj
3740  MODULE PROCEDURE cmfe_Field_ParameterSetGetConstantDPNumber
3741  MODULE PROCEDURE cmfe_Field_ParameterSetGetConstantDPObj
3742  MODULE PROCEDURE cmfe_Field_ParameterSetGetConstantLNumber
3743  MODULE PROCEDURE cmfe_Field_ParameterSetGetConstantLObj
3744  END INTERFACE cmfe_Field_ParameterSetGetConstant
3745 
3746  !>Returns from the given parameter set a value for the specified data pont of a field variable component.
3747  INTERFACE cmfe_Field_ParameterSetGetDataPoint
3748  MODULE PROCEDURE cmfe_Field_ParameterSetGetDataPointIntgNumberI !Interface
3749  MODULE PROCEDURE cmfe_Field_ParameterSetGetDataPointIntgNumberR !Region
3750  MODULE PROCEDURE cmfe_Field_ParameterSetGetDataPointIntgObj
3751  MODULE PROCEDURE cmfe_Field_ParameterSetGetDataPointSPNumberI !Interface
3752  MODULE PROCEDURE cmfe_Field_ParameterSetGetDataPointSPNumberR !Region
3753  MODULE PROCEDURE cmfe_Field_ParameterSetGetDataPointSPObj
3754  MODULE PROCEDURE cmfe_Field_ParameterSetGetDataPointDPNumberI !Interface
3755  MODULE PROCEDURE cmfe_Field_ParameterSetGetDataPointDPNumberR !Region
3756  MODULE PROCEDURE cmfe_Field_ParameterSetGetDataPointDPObj
3757  MODULE PROCEDURE cmfe_Field_ParameterSetGetDataPointLNumberI !Interface
3758  MODULE PROCEDURE cmfe_Field_ParameterSetGetDataPointLNumberR !Region
3759  MODULE PROCEDURE cmfe_Field_ParameterSetGetDataPointLObj
3760  END INTERFACE cmfe_Field_ParameterSetGetDataPoint
3761 
3762  !>Returns from the given parameter set a value for the specified element of a field variable component.
3763  INTERFACE cmfe_Field_ParameterSetGetElement
3764  MODULE PROCEDURE cmfe_Field_ParameterSetGetElementIntgNumber
3765  MODULE PROCEDURE cmfe_Field_ParameterSetGetElementIntgObj
3766  MODULE PROCEDURE cmfe_Field_ParameterSetGetElementSPNumber
3767  MODULE PROCEDURE cmfe_Field_ParameterSetGetElementSPObj
3768  MODULE PROCEDURE cmfe_Field_ParameterSetGetElementDPNumber
3769  MODULE PROCEDURE cmfe_Field_ParameterSetGetElementDPObj
3770  MODULE PROCEDURE cmfe_Field_ParameterSetGetElementLNumber
3771  MODULE PROCEDURE cmfe_Field_ParameterSetGetElementLObj
3772  END INTERFACE cmfe_Field_ParameterSetGetElement
3773 
3774  !>Returns from the given parameter set a value for the specified node and derivative of a field variable component.
3775  INTERFACE cmfe_Field_ParameterSetGetNode
3776  MODULE PROCEDURE cmfe_Field_ParameterSetGetNodeIntgNumber
3777  MODULE PROCEDURE cmfe_Field_ParameterSetGetNodeIntgObj
3778  MODULE PROCEDURE cmfe_Field_ParameterSetGetNodeSPNumber
3779  MODULE PROCEDURE cmfe_Field_ParameterSetGetNodeSPObj
3780  MODULE PROCEDURE cmfe_Field_ParameterSetGetNodeDPNumber
3781  MODULE PROCEDURE cmfe_Field_ParameterSetGetNodeDPObj
3782  MODULE PROCEDURE cmfe_Field_ParameterSetGetNodeLNumber
3783  MODULE PROCEDURE cmfe_Field_ParameterSetGetNodeLObj
3784  END INTERFACE cmfe_Field_ParameterSetGetNode
3785 
3786  !>Returns from the given parameter set a value for the specified element and Gauss point of a field variable component.
3787  INTERFACE cmfe_Field_ParameterSetGetGaussPoint ! TODO: other versions
3788  MODULE PROCEDURE cmfe_Field_ParameterSetGetGaussPointDPObj
3789  END INTERFACE cmfe_Field_ParameterSetGetGaussPoint
3790 
3791  !>Updates the given parameter set with the given value for the constant of a field variable component.
3792  INTERFACE cmfe_Field_ParameterSetUpdateConstant
3793  MODULE PROCEDURE cmfe_Field_ParameterSetUpdateConstantIntgNumber
3794  MODULE PROCEDURE cmfe_Field_ParameterSetUpdateConstantIntgObj
3795  MODULE PROCEDURE cmfe_Field_ParameterSetUpdateConstantSPNumber
3796  MODULE PROCEDURE cmfe_Field_ParameterSetUpdateConstantSPObj
3797  MODULE PROCEDURE cmfe_Field_ParameterSetUpdateConstantDPNumber
3798  MODULE PROCEDURE cmfe_Field_ParameterSetUpdateConstantDPObj
3799  MODULE PROCEDURE cmfe_Field_ParameterSetUpdateConstantLNumber
3800  MODULE PROCEDURE cmfe_Field_ParameterSetUpdateConstantLObj
3801  END INTERFACE cmfe_Field_ParameterSetUpdateConstant
3802 
3803  !>Update the given parameter set a value for the specified data pont of a field variable component.
3804  INTERFACE cmfe_Field_ParameterSetUpdateDataPoint
3805  MODULE PROCEDURE cmfe_Field_ParameterSetUpdateDataPointIntgNumberI !Interface
3806  MODULE PROCEDURE cmfe_Field_ParameterSetUpdateDataPointIntgNumberR !Region
3807  MODULE PROCEDURE cmfe_Field_ParameterSetUpdateDataPointIntgObj
3808  MODULE PROCEDURE cmfe_Field_ParameterSetUpdateDataPointSPNumberI !Interface
3809  MODULE PROCEDURE cmfe_Field_ParameterSetUpdateDataPointSPNumberR !Region
3810  MODULE PROCEDURE cmfe_Field_ParameterSetUpdateDataPointSPObj
3811  MODULE PROCEDURE cmfe_Field_ParameterSetUpdateDataPointDPNumberI !Interface
3812  MODULE PROCEDURE cmfe_Field_ParameterSetUpdateDataPointDPNumberR !Region
3813  MODULE PROCEDURE cmfe_Field_ParameterSetUpdateDataPointDPObj
3814  MODULE PROCEDURE cmfe_Field_ParameterSetUpdateDataPointLNumberI !Interface
3815  MODULE PROCEDURE cmfe_Field_ParameterSetUpdateDataPointLNumberR !Region
3816  MODULE PROCEDURE cmfe_Field_ParameterSetUpdateDataPointLObj
3817  END INTERFACE cmfe_Field_ParameterSetUpdateDataPoint
3818 
3819  !>Updates the given parameter set with the given value for a particular user element of a field variable component.
3820  INTERFACE cmfe_Field_ParameterSetUpdateElement
3821  MODULE PROCEDURE cmfe_Field_ParameterSetUpdateElementIntgNumber
3822  MODULE PROCEDURE cmfe_Field_ParameterSetUpdateElementIntgObj
3823  MODULE PROCEDURE cmfe_Field_ParameterSetUpdateElementSPNumber
3824  MODULE PROCEDURE cmfe_Field_ParameterSetUpdateElementSPObj
3825  MODULE PROCEDURE cmfe_Field_ParameterSetUpdateElementDPNumber
3826  MODULE PROCEDURE cmfe_Field_ParameterSetUpdateElementDPObj
3827  MODULE PROCEDURE cmfe_Field_ParameterSetUpdateElementLNumber
3828  MODULE PROCEDURE cmfe_Field_ParameterSetUpdateElementLObj
3829  END INTERFACE cmfe_Field_ParameterSetUpdateElement
3830 
3831  !>Finishes the parameter set update for a field variable. \see OpenCMISS::Iron::cmfe_Field_ParameterSetUpdateStart
3832  INTERFACE cmfe_Field_ParameterSetUpdateFinish
3833  MODULE PROCEDURE cmfe_Field_ParameterSetUpdateFinishNumber
3834  MODULE PROCEDURE cmfe_Field_ParameterSetUpdateFinishObj
3835  END INTERFACE cmfe_Field_ParameterSetUpdateFinish
3836 
3837  !>Updates the given parameter set with the given value for a particular user node of a field variable component.
3838  INTERFACE cmfe_Field_ParameterSetUpdateNode
3839  MODULE PROCEDURE cmfe_Field_ParameterSetUpdateNodeIntgNumber
3840  MODULE PROCEDURE cmfe_Field_ParameterSetUpdateNodeIntgObj
3841  MODULE PROCEDURE cmfe_Field_ParameterSetUpdateNodeSPNumber
3842  MODULE PROCEDURE cmfe_Field_ParameterSetUpdateNodeSPObj
3843  MODULE PROCEDURE cmfe_Field_ParameterSetUpdateNodeDPNumber
3844  MODULE PROCEDURE cmfe_Field_ParameterSetUpdateNodeDPObj
3845  MODULE PROCEDURE cmfe_Field_ParameterSetUpdateNodeLNumber
3846  MODULE PROCEDURE cmfe_Field_ParameterSetUpdateNodeLObj
3847  END INTERFACE cmfe_Field_ParameterSetUpdateNode
3848 
3849  !\todo: merge the two types of routines for getting scalefactors under the same interface declaration?
3850  !>Gets a scale factor for a particular node.
3851  INTERFACE cmfe_Field_ParameterSetNodeScaleFactorGet
3852  MODULE PROCEDURE cmfe_Field_ParameterSetNodeScaleFactorGetNumber
3853  MODULE PROCEDURE cmfe_Field_ParameterSetNodeScaleFactorGetObj
3854  END INTERFACE cmfe_Field_ParameterSetNodeScaleFactorGet
3855 
3856  !>Gets the scale factors for all nodes
3857  INTERFACE cmfe_Field_ParameterSetNodeScaleFactorsGet
3858  MODULE PROCEDURE cmfe_Field_ParameterSetNodeScaleFactorsGetNumber
3859  MODULE PROCEDURE cmfe_Field_ParameterSetNodeScaleFactorsGetObj
3860  END INTERFACE cmfe_Field_ParameterSetNodeScaleFactorsGet
3861 
3862  !>Sets a scale factor for a particular node.
3863  INTERFACE cmfe_Field_ParameterSetNodeScaleFactorSet
3864  MODULE PROCEDURE cmfe_Field_ParameterSetNodeScaleFactorSetNumber
3865  MODULE PROCEDURE cmfe_Field_ParameterSetNodeScaleFactorSetObj
3866  END INTERFACE cmfe_Field_ParameterSetNodeScaleFactorSet
3867 
3868  !>Sets the scale factors for all nodes
3869  INTERFACE cmfe_Field_ParameterSetNodeScaleFactorsSet
3870  MODULE PROCEDURE cmfe_Field_ParameterSetNodeScaleFactorsSetNumber
3871  MODULE PROCEDURE cmfe_Field_ParameterSetNodeScaleFactorsSetObj
3872  END INTERFACE cmfe_Field_ParameterSetNodeScaleFactorsSet
3873 
3874  !>Gets the number of scalefactor dofs
3875  INTERFACE cmfe_Field_ParameterSetNodeNumberOfScaleFactorDofsGet
3876  MODULE PROCEDURE cmfe_Field_ParameterSetNodeNumberOfScaleFactorDofsGetNumber
3877  MODULE PROCEDURE cmfe_Field_ParameterSetNodeNumberOfScaleFactorDofsGetObj
3878  END INTERFACE cmfe_Field_ParameterSetNodeNumberOfScaleFactorDofsGet
3879 
3880  !>Updates the given parameter set with the given values for all local dofs of the field variable.
3881  INTERFACE cmfe_Field_ParameterSetUpdateLocalDofs
3882  MODULE PROCEDURE cmfe_Field_ParameterSetUpdateLocalDofsDPObj
3883  !\todo: add Intg/SP/L routines, both indexed by Number and Obj
3884  END INTERFACE cmfe_Field_ParameterSetUpdateLocalDofs
3885 
3886  !>Updates the given parameter set with the given value for a particular Gauss point of a field variable component.
3887  INTERFACE cmfe_Field_ParameterSetUpdateGaussPoint
3888  MODULE PROCEDURE cmfe_Field_ParameterSetUpdateGaussPointIntgNumber
3889  MODULE PROCEDURE cmfe_Field_ParameterSetUpdateGaussPointIntgObj
3890  MODULE PROCEDURE cmfe_Field_ParameterSetUpdateGaussPointSPNumber
3891  MODULE PROCEDURE cmfe_Field_ParameterSetUpdateGaussPointSPObj
3892  MODULE PROCEDURE cmfe_Field_ParameterSetUpdateGaussPointDPNumber
3893  MODULE PROCEDURE cmfe_Field_ParameterSetUpdateGaussPointDPObj
3894  MODULE PROCEDURE cmfe_Field_ParameterSetUpdateGaussPointLNumber
3895  MODULE PROCEDURE cmfe_Field_ParameterSetUpdateGaussPointLObj
3896  END INTERFACE cmfe_Field_ParameterSetUpdateGaussPoint
3897 
3898  !>Interpolates the given parameter set at a specified xi/set of xi locations for specified element and derviative.
3899  INTERFACE cmfe_Field_ParameterSetInterpolateXi
3900  MODULE PROCEDURE cmfe_Field_ParameterSetInterpolateSingleXiDPNumber
3901  MODULE PROCEDURE cmfe_Field_ParameterSetInterpolateSingleXiDPObj
3902  MODULE PROCEDURE cmfe_Field_ParameterSetInterpolateMultipleXiDPNumber
3903  MODULE PROCEDURE cmfe_Field_ParameterSetInterpolateMultipleXiDPObj
3904  END INTERFACE cmfe_Field_ParameterSetInterpolateXi
3905 
3906  !>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.
3907  INTERFACE cmfe_Field_ParameterSetInterpolateGauss
3908  MODULE PROCEDURE cmfe_Field_ParameterSetInterpolateSingleGaussDPNumber
3909  MODULE PROCEDURE cmfe_Field_ParameterSetInterpolateSingleGaussDPObj
3910  MODULE PROCEDURE cmfe_Field_ParameterSetInterpolateMultipleGaussDPNumber
3911  MODULE PROCEDURE cmfe_Field_ParameterSetInterpolateMultipleGaussDPObj
3912  END INTERFACE CMFE_FIELD_PARAMETERSETINTERPOLATEGAUSS
3913 
3914  !>Updates the given parameter set with the given value for a particular data point of a field variable component.
3915  INTERFACE cmfe_Field_ParameterSetUpdateElementDataPoint
3916  MODULE PROCEDURE cmfe_Field_ParameterSetUpdateElementDataPointDPObj
3917  END INTERFACE cmfe_Field_ParameterSetUpdateElementDataPoint
3918 
3919  !>Starts the parameter set update for a field variable. \see OpenCMISS::Iron::cmfe_Field_ParameterSetUpdateFinish
3920  INTERFACE cmfe_Field_ParameterSetUpdateStart
3921  MODULE PROCEDURE cmfe_Field_ParameterSetUpdateStartNumber
3922  MODULE PROCEDURE cmfe_Field_ParameterSetUpdateStartObj
3923  END INTERFACE cmfe_Field_ParameterSetUpdateStart
3924 
3925  !>Copy the parameters from the parameter set of a component of a field variable to the paramters of a parameter set of
3926  !>a component of another field variable.
3927  INTERFACE cmfe_Field_ParametersToFieldParametersComponentCopy
3928  MODULE PROCEDURE cmfe_Field_ParametersToFieldParametersComponentCopyNumber
3929  MODULE PROCEDURE cmfe_Field_ParametersToFieldParametersComponentCopyObj
3930  END INTERFACE cmfe_Field_ParametersToFieldParametersComponentCopy
3931 
3932  !>Returns the scaling type for a field.
3933  INTERFACE cmfe_Field_ScalingTypeGet
3934  MODULE PROCEDURE cmfe_Field_ScalingTypeGetNumber
3935  MODULE PROCEDURE cmfe_Field_ScalingTypeGetObj
3936  END INTERFACE cmfe_Field_ScalingTypeGet
3937 
3938  !>Sets/changes the scaling type for a field.
3939  INTERFACE cmfe_Field_ScalingTypeSet
3940  MODULE PROCEDURE cmfe_Field_ScalingTypeSetNumber
3941  MODULE PROCEDURE cmfe_Field_ScalingTypeSetObj
3942  END INTERFACE cmfe_Field_ScalingTypeSet
3943 
3944  !>Returns the type for a field.
3945  INTERFACE cmfe_Field_TypeGet
3946  MODULE PROCEDURE cmfe_Field_TypeGetNumber
3947  MODULE PROCEDURE cmfe_Field_TypeGetObj
3948  END INTERFACE cmfe_Field_TypeGet
3949 
3950  !>Sets/changes the type for a field.
3951  INTERFACE cmfe_Field_TypeSet
3952  MODULE PROCEDURE cmfe_Field_TypeSetNumber
3953  MODULE PROCEDURE cmfe_Field_TypeSetObj
3954  END INTERFACE cmfe_Field_TypeSet
3955 
3956  !>Returns the label for a field variable.
3957  INTERFACE cmfe_Field_VariableLabelGet
3958  MODULE PROCEDURE cmfe_Field_VariableLabelGetCNumber
3959  MODULE PROCEDURE cmfe_Field_VariableLabelGetCObj
3960  MODULE PROCEDURE cmfe_Field_VariableLabelGetVSNumber
3961  MODULE PROCEDURE cmfe_Field_VariableLabelGetVSObj
3962  END INTERFACE cmfe_Field_VariableLabelGet
3963 
3964  !>Sets/changes the label for a field variable.
3965  INTERFACE cmfe_Field_VariableLabelSet
3966  MODULE PROCEDURE cmfe_Field_VariableLabelSetCNumber
3967  MODULE PROCEDURE cmfe_Field_VariableLabelSetCObj
3968  MODULE PROCEDURE cmfe_Field_VariableLabelSetVSNumber
3969  MODULE PROCEDURE cmfe_Field_VariableLabelSetVSObj
3970  END INTERFACE cmfe_Field_VariableLabelSet
3971 
3972  !>Returns the field variable types for a field.
3973  INTERFACE cmfe_Field_VariableTypesGet
3974  MODULE PROCEDURE cmfe_Field_VariableTypesGetNumber
3975  MODULE PROCEDURE cmfe_Field_VariableTypesGetObj
3976  END INTERFACE cmfe_Field_VariableTypesGet
3977 
3978  !>Sets/changes the field variable types for a field.
3979  INTERFACE cmfe_Field_VariableTypesSet
3980  MODULE PROCEDURE cmfe_Field_VariableTypesSetNumber
3981  MODULE PROCEDURE cmfe_Field_VariableTypesSetObj
3982  END INTERFACE cmfe_Field_VariableTypesSet
3983 
3984 
3985  PUBLIC CMFE_FIELD_DEPENDENT_TYPE,CMFE_FIELD_INDEPENDENT_TYPE
3986 
3987  PUBLIC CMFE_FIELD_SCALAR_DIMENSION_TYPE,CMFE_FIELD_VECTOR_DIMENSION_TYPE,CMFE_FIELD_TENSOR_DIMENSION_TYPE
3988 
3989  PUBLIC CMFE_FIELD_GEOMETRIC_TYPE,CMFE_FIELD_FIBRE_TYPE,CMFE_FIELD_GENERAL_TYPE,CMFE_FIELD_MATERIAL_TYPE, &
3990  & CMFE_FIELD_GEOMETRIC_GENERAL_TYPE
3991 
3992  PUBLIC CMFE_FIELD_CONSTANT_INTERPOLATION,CMFE_FIELD_ELEMENT_BASED_INTERPOLATION,CMFE_FIELD_NODE_BASED_INTERPOLATION, &
3993  & CMFE_FIELD_GRID_POINT_BASED_INTERPOLATION,CMFE_FIELD_GAUSS_POINT_BASED_INTERPOLATION, &
3994  & CMFE_FIELD_DATA_POINT_BASED_INTERPOLATION
3995 
3996  PUBLIC CMFE_FIELD_NUMBER_OF_VARIABLE_SUBTYPES
3997 
3998  PUBLIC CMFE_FIELD_U_VARIABLE_TYPE,CMFE_FIELD_DELUDELN_VARIABLE_TYPE,CMFE_FIELD_DELUDELT_VARIABLE_TYPE, &
3999  & CMFE_FIELD_DEL2UDELT2_VARIABLE_TYPE, &
4000  & CMFE_FIELD_V_VARIABLE_TYPE,CMFE_FIELD_DELVDELN_VARIABLE_TYPE,CMFE_FIELD_DELVDELT_VARIABLE_TYPE, &
4001  & CMFE_FIELD_DEL2VDELT2_VARIABLE_TYPE, &
4002  & CMFE_FIELD_U1_VARIABLE_TYPE,CMFE_FIELD_DELU1DELN_VARIABLE_TYPE,CMFE_FIELD_DELU1DELT_VARIABLE_TYPE, &
4003  & CMFE_FIELD_DEL2U1DELT2_VARIABLE_TYPE, &
4004  & CMFE_FIELD_U2_VARIABLE_TYPE,CMFE_FIELD_DELU2DELN_VARIABLE_TYPE,CMFE_FIELD_DELU2DELT_VARIABLE_TYPE, &
4005  & CMFE_FIELD_DEL2U2DELT2_VARIABLE_TYPE, &
4006  & CMFE_FIELD_U3_VARIABLE_TYPE,CMFE_FIELD_DELU3DELN_VARIABLE_TYPE,CMFE_FIELD_DELU3DELT_VARIABLE_TYPE, &
4007  & CMFE_FIELD_DEL2U3DELT2_VARIABLE_TYPE, &
4008  & CMFE_FIELD_U4_VARIABLE_TYPE,CMFE_FIELD_DELU4DELN_VARIABLE_TYPE,CMFE_FIELD_DELU4DELT_VARIABLE_TYPE, &
4009  & CMFE_FIELD_DEL2U4DELT2_VARIABLE_TYPE, &
4010  & CMFE_FIELD_U5_VARIABLE_TYPE,CMFE_FIELD_DELU5DELN_VARIABLE_TYPE,CMFE_FIELD_DELU5DELT_VARIABLE_TYPE, &
4011  & CMFE_FIELD_DEL2U5DELT2_VARIABLE_TYPE, &
4012  & CMFE_FIELD_U6_VARIABLE_TYPE,CMFE_FIELD_DELU6DELN_VARIABLE_TYPE,CMFE_FIELD_DELU6DELT_VARIABLE_TYPE, &
4013  & CMFE_FIELD_DEL2U6DELT2_VARIABLE_TYPE, &
4014  & CMFE_FIELD_U7_VARIABLE_TYPE,CMFE_FIELD_DELU7DELN_VARIABLE_TYPE,CMFE_FIELD_DELU7DELT_VARIABLE_TYPE, &
4015  & CMFE_FIELD_DEL2U7DELT2_VARIABLE_TYPE, &
4016  & CMFE_FIELD_U8_VARIABLE_TYPE,CMFE_FIELD_DELU8DELN_VARIABLE_TYPE,CMFE_FIELD_DELU8DELT_VARIABLE_TYPE, &
4017  & CMFE_FIELD_DEL2U8DELT2_VARIABLE_TYPE, &
4018  & CMFE_FIELD_U9_VARIABLE_TYPE,CMFE_FIELD_DELU9DELN_VARIABLE_TYPE,CMFE_FIELD_DELU9DELT_VARIABLE_TYPE, &
4019  & CMFE_FIELD_DEL2U9DELT2_VARIABLE_TYPE, &
4020  & CMFE_FIELD_U10_VARIABLE_TYPE,CMFE_FIELD_DELU10DELN_VARIABLE_TYPE,CMFE_FIELD_DELU10DELT_VARIABLE_TYPE, &
4021  & CMFE_FIELD_DEL2U10DELT2_VARIABLE_TYPE
4022 
4023  PUBLIC CMFE_FIELD_INTG_TYPE,CMFE_FIELD_SP_TYPE,CMFE_FIELD_DP_TYPE,CMFE_FIELD_L_TYPE
4024 
4025  PUBLIC CMFE_FIELD_SEPARATED_COMPONENT_DOF_ORDER,CMFE_FIELD_CONTIGUOUS_COMPONENT_DOF_ORDER
4026 
4027  PUBLIC CMFE_FIELD_VALUES_SET_TYPE,CMFE_FIELD_INITIAL_VALUES_SET_TYPE,CMFE_FIELD_INCREMENTAL_VALUES_SET_TYPE, &
4028  & CMFE_FIELD_BOUNDARY_CONDITIONS_SET_TYPE, &
4029  & CMFE_FIELD_ANALYTIC_VALUES_SET_TYPE, &
4030  & CMFE_FIELD_PREVIOUS_VALUES_SET_TYPE,CMFE_FIELD_MEAN_PREDICTED_DISPLACEMENT_SET_TYPE,CMFE_FIELD_VELOCITY_VALUES_SET_TYPE, &
4031  & CMFE_FIELD_INITIAL_VELOCITY_SET_TYPE,CMFE_FIELD_PREVIOUS_VELOCITY_SET_TYPE,CMFE_FIELD_MEAN_PREDICTED_VELOCITY_SET_TYPE, &
4032  & CMFE_FIELD_ACCELERATION_VALUES_SET_TYPE,CMFE_FIELD_INITIAL_ACCELERATION_SET_TYPE, &
4033  & CMFE_FIELD_PREVIOUS_ACCELERATION_SET_TYPE, &
4034  & CMFE_FIELD_MEAN_PREDICTED_ACCELERATION_SET_TYPE, CMFE_FIELD_PRESSURE_VALUES_SET_TYPE, &
4035  & CMFE_FIELD_PREVIOUS_PRESSURE_SET_TYPE, &
4036  & CMFE_FIELD_IMPERMEABLE_FLAG_VALUES_SET_TYPE,CMFE_FIELD_INTEGRATED_NEUMANN_SET_TYPE, &
4037  & CMFE_FIELD_MESH_DISPLACEMENT_SET_TYPE,CMFE_FIELD_MESH_VELOCITY_SET_TYPE
4038 
4039  PUBLIC CMFE_FIELD_NO_SCALING,CMFE_FIELD_UNIT_SCALING,CMFE_FIELD_ARC_LENGTH_SCALING,CMFE_FIELD_ARITHMETIC_MEAN_SCALING, &
4040  & CMFE_FIELD_GEOMETRIC_MEAN_SCALING,CMFE_FIELD_HARMONIC_MEAN_SCALING
4041 
4042  PUBLIC cmfe_Field_ComponentInterpolationGet,cmfe_Field_ComponentInterpolationSet
4043 
4044  PUBLIC cmfe_Field_ComponentLabelGet,cmfe_Field_ComponentLabelSet
4045 
4046  PUBLIC cmfe_Field_ComponentMeshComponentGet,cmfe_Field_ComponentMeshComponentSet
4047 
4048  PUBLIC cmfe_Field_ComponentValuesInitialise
4049 
4050  PUBLIC cmfe_Field_DataTypeGet,cmfe_Field_DataTypeSet
4051 
4052  PUBLIC cmfe_Field_DOFOrderTypeGet,cmfe_Field_DOFOrderTypeSet
4053 
4054  PUBLIC cmfe_Field_CreateFinish,cmfe_Field_CreateStart
4055 
4056  PUBLIC cmfe_Field_DependentTypeGet,cmfe_Field_DependentTypeSet
4057 
4058  PUBLIC cmfe_Field_Destroy
4059 
4060  PUBLIC cmfe_Field_DimensionGet,cmfe_Field_DimensionSet
4061 
4062  PUBLIC cmfe_Field_GeometricFieldGet,cmfe_Field_GeometricFieldSet
4063 
4064  PUBLIC cmfe_Field_GeometricParametersElementLineLengthGet, cmfe_Field_GeometricParametersElementVolumeGet
4065 
4066  PUBLIC cmfe_Field_LabelGet,cmfe_Field_LabelSet
4067 
4068  PUBLIC cmfe_Field_MeshDecompositionGet,cmfe_Field_MeshDecompositionSet
4069 
4070  PUBLIC cmfe_Field_DataProjectionSet
4071 
4072  PUBLIC cmfe_Field_PositionNormalTangentCalculateNode
4073 
4074  PUBLIC cmfe_Field_NumberOfComponentsGet,cmfe_Field_NumberOfComponentsSet
4075 
4076  PUBLIC cmfe_Field_NumberOfVariablesGet,cmfe_Field_NumberOfVariablesSet
4077 
4078  PUBLIC cmfe_Field_ParameterSetAddConstant,cmfe_Field_ParameterSetAddElement,cmfe_Field_ParameterSetAddNode
4079 
4080  PUBLIC cmfe_Field_ParameterSetCreate
4081 
4082  PUBLIC cmfe_Field_ParameterSetDestroy
4083 
4084  PUBLIC cmfe_Field_ParameterSetDataGet,cmfe_Field_ParameterSetDataRestore
4085 
4086  PUBLIC cmfe_Field_ParameterSetGetConstant,cmfe_Field_ParameterSetGetElement,cmfe_Field_ParameterSetGetNode
4087 
4088  PUBLIC cmfe_Field_ParameterSetGetDataPoint,cmfe_Field_ParameterSetUpdateDataPoint
4089 
4090  PUBLIC cmfe_Field_ParameterSetUpdateConstant,cmfe_Field_ParameterSetUpdateElement,cmfe_Field_ParameterSetUpdateNode
4091 
4092  PUBLIC cmfe_Field_ParameterSetNodeScaleFactorGet,cmfe_Field_ParameterSetNodeScaleFactorSet
4093 
4094  PUBLIC cmfe_Field_ParameterSetNodeScaleFactorsGet,cmfe_Field_ParameterSetNodeScaleFactorsSet
4095 
4096  PUBLIC cmfe_Field_ParameterSetNodeNumberOfScaleFactorDofsGet
4097 
4098  PUBLIC cmfe_Field_ParameterSetUpdateLocalDofs
4099 
4100  PUBLIC cmfe_Field_ParameterSetUpdateGaussPoint,cmfe_Field_ParameterSetGetGaussPoint
4101 
4102  PUBLIC cmfe_Field_ParameterSetInterpolateXi
4103 
4104  PUBLIC cmfe_Field_ParameterSetInterpolateGauss
4105 
4106  PUBLIC cmfe_Field_ParameterSetUpdateElementDataPoint
4107 
4108  PUBLIC cmfe_Field_ParameterSetUpdateFinish,cmfe_Field_ParameterSetUpdateStart
4109 
4110  PUBLIC cmfe_Field_ParametersToFieldParametersComponentCopy
4111 
4112  PUBLIC cmfe_Field_ScalingTypeGet,cmfe_Field_ScalingTypeSet
4113 
4114  PUBLIC cmfe_Field_TypeGet,cmfe_Field_TypeSet
4115 
4116  PUBLIC cmfe_Field_VariableLabelGet,cmfe_Field_VariableLabelSet
4117 
4118  PUBLIC cmfe_Field_VariableTypesGet,cmfe_Field_VariableTypesSet
4119 
4120 !!==================================================================================================================================
4121 !!
4122 !! FIELD_IO_ROUTINES
4123 !!
4124 !!==================================================================================================================================
4125 
4126  !Module parameters
4127 
4128  !Module types
4129 
4130  !Module variables
4131 
4132  !Interfaces
4133 
4134  INTERFACE cmfe_Fields_ElementsExport
4135  MODULE PROCEDURE cmfe_Fields_ElementsExportCCObj
4136  MODULE PROCEDURE cmfe_Fields_ElementsExportVSCObj
4137  MODULE PROCEDURE cmfe_Fields_ElementsExportCVSObj
4138  MODULE PROCEDURE cmfe_Fields_ElementsExportVSVSObj
4139  END INTERFACE cmfe_Fields_ElementsExport
4140 
4141  INTERFACE cmfe_Fields_NodesExport
4142  MODULE PROCEDURE cmfe_Fields_NodesExportCCObj
4143  MODULE PROCEDURE cmfe_Fields_NodesExportVSCObj
4144  MODULE PROCEDURE cmfe_Fields_NodesExportCVSObj
4145  MODULE PROCEDURE cmfe_Fields_NodesExportVSVSObj
4146  END INTERFACE cmfe_Fields_NodesExport
4147 
4148  PUBLIC cmfe_Fields_ElementsExport,cmfe_Fields_NodesExport
4149 
4150 !!==================================================================================================================================
4151 !!
4152 !! GENERATED_MESH_ROUTINES
4153 !!
4154 !!==================================================================================================================================
4155 
4156  !Module parameters
4157 
4158  !> \addtogroup OPENCMISS_GeneratedMeshConstants OPENCMISS::GeneratedMesh::Constants
4159  !> \brief Generated mesh constants.
4160  !>@{
4161  !> \addtogroup OPENCMISS_GeneratedMeshTypes OPENCMISS::GeneratedMesh::Types
4162  !> \brief Generated mesh types.
4163  !> \see OPENCMISS::GeneratedMesh,OPENCMISS
4164  !>@{
4165  INTEGER(INTG), PARAMETER :: CMFE_GENERATED_MESH_REGULAR_MESH_TYPE = GENERATED_MESH_REGULAR_MESH_TYPE !<A regular generated mesh. \see OPENCMISS_GeneratedMeshTypes,OPENCMISS
4166  INTEGER(INTG), PARAMETER :: CMFE_GENERATED_MESH_POLAR_MESH_TYPE = GENERATED_MESH_POLAR_MESH_TYPE !<A polar generated mesh. \see OPENCMISS_GeneratedMeshTypes,OPENCMISS
4167  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
4168  INTEGER(INTG), PARAMETER :: CMFE_GENERATED_MESH_CYLINDER_MESH_TYPE = GENERATED_MESH_CYLINDER_MESH_TYPE !<A cylinder generated mesh. \see OPENCMISS_GeneratedMeshTypes,OPENCMISS
4169  INTEGER(INTG), PARAMETER :: CMFE_GENERATED_MESH_ELLIPSOID_MESH_TYPE = GENERATED_MESH_ELLIPSOID_MESH_TYPE !<An ellipsoid generated mesh. \see OPENCMISS_GeneratedMeshTypes,OPENCMISS
4170  !>@}
4171  !>@}
4172 
4173  !> \addtogroup OPENCMISS_GeneratedMeshConstants OPENCMISS::GeneratedMesh::Constants
4174  !> \brief Generated mesh constants.
4175  !>@{
4176  !> \addtogroup OPENCMISS_GeneratedMeshSurfaceTypes OPENCMISS::GeneratedMesh::SurfaceTypes
4177  !> \brief Generated mesh surface types.
4178  !> \see OPENCMISS::GeneratedMesh,OPENCMISS
4179  !>@{
4180  INTEGER(INTG), PARAMETER :: CMFE_GENERATED_MESH_CYLINDER_INNER_SURFACE = GENERATED_MESH_CYLINDER_INNER_SURFACE !<Cylinder inner surface constant. \see OPENCMISS_GeneratedMeshSurfaceTypes,OPENCMISS
4181  INTEGER(INTG), PARAMETER :: CMFE_GENERATED_MESH_CYLINDER_OUTER_SURFACE = GENERATED_MESH_CYLINDER_OUTER_SURFACE !<Cylinder outer surface. \see OPENCMISS_GeneratedMeshSurfaceTypes,OPENCMISS
4182  INTEGER(INTG), PARAMETER :: CMFE_GENERATED_MESH_CYLINDER_TOP_SURFACE = GENERATED_MESH_CYLINDER_TOP_SURFACE !<Cylinder top surface constant. \see OPENCMISS_GeneratedMeshSurfaceTypes,OPENCMISS
4183  INTEGER(INTG), PARAMETER :: CMFE_GENERATED_MESH_CYLINDER_BOTTOM_SURFACE = GENERATED_MESH_CYLINDER_BOTTOM_SURFACE !<Cylinder bottom surface constant. \see OPENCMISS_GeneratedMeshSurfaceTypes,OPENCMISS
4184  INTEGER(INTG), PARAMETER :: CMFE_GENERATED_MESH_ELLIPSOID_INNER_SURFACE = GENERATED_MESH_ELLIPSOID_INNER_SURFACE !<Ellipsoid inner surface constant. \see OPENCMISS_GeneratedMeshSurfaceTypes,OPENCMISS
4185  INTEGER(INTG), PARAMETER :: CMFE_GENERATED_MESH_ELLIPSOID_OUTER_SURFACE = GENERATED_MESH_ELLIPSOID_OUTER_SURFACE !<Ellipsoid outer surface constant. \see OPENCMISS_GeneratedMeshSurfaceTypes,OPENCMISS
4186  INTEGER(INTG), PARAMETER :: CMFE_GENERATED_MESH_ELLIPSOID_TOP_SURFACE = GENERATED_MESH_ELLIPSOID_TOP_SURFACE !<Ellipsoid top surface constant. \see OPENCMISS_GeneratedMeshSurfaceTypes,OPENCMISS
4187  INTEGER(INTG), PARAMETER :: CMFE_GENERATED_MESH_REGULAR_LEFT_SURFACE = GENERATED_MESH_REGULAR_LEFT_SURFACE !<Regular left surface constant. \see OPENCMISS_GeneratedMeshSurfaceTypes,OPENCMISS
4188  INTEGER(INTG), PARAMETER :: CMFE_GENERATED_MESH_REGULAR_RIGHT_SURFACE = GENERATED_MESH_REGULAR_RIGHT_SURFACE !<Regular right surface constant. \see OPENCMISS_GeneratedMeshSurfaceTypes,OPENCMISS
4189  INTEGER(INTG), PARAMETER :: CMFE_GENERATED_MESH_REGULAR_TOP_SURFACE = GENERATED_MESH_REGULAR_TOP_SURFACE !<Regular top surface constant. \see OPENCMISS_GeneratedMeshSurfaceTypes,OPENCMISS
4190  INTEGER(INTG), PARAMETER :: CMFE_GENERATED_MESH_REGULAR_BOTTOM_SURFACE = GENERATED_MESH_REGULAR_BOTTOM_SURFACE !<Regular bottom surface constant. \see OPENCMISS_GeneratedMeshSurfaceTypes,OPENCMISS
4191  INTEGER(INTG), PARAMETER :: CMFE_GENERATED_MESH_REGULAR_FRONT_SURFACE = GENERATED_MESH_REGULAR_FRONT_SURFACE !<Regular front surface constant. \see OPENCMISS_GeneratedMeshSurfaceTypes,OPENCMISS
4192  INTEGER(INTG), PARAMETER :: CMFE_GENERATED_MESH_REGULAR_BACK_SURFACE = GENERATED_MESH_REGULAR_BACK_SURFACE !<Regular back surface constant. \see OPENCMISS_GeneratedMeshSurfaceTypes,OPENCMISS
4193  !>@}
4194  !>@}
4195 
4196  !Module types
4197 
4198  !Module variables
4199 
4200  !Interfaces
4201 
4202  !>Returns the basis for a generated mesh.
4203  INTERFACE cmfe_GeneratedMesh_BasisGet
4204  MODULE PROCEDURE cmfe_GeneratedMesh_BasisGetNumber
4205  MODULE PROCEDURE cmfe_GeneratedMesh_BasisGetObj
4206  END INTERFACE cmfe_GeneratedMesh_BasisGet
4207 
4208  !>Sets/changes the basis for a generated mesh.
4209  INTERFACE cmfe_GeneratedMesh_BasisSet
4210  MODULE PROCEDURE cmfe_GeneratedMesh_BasisSetNumber0
4211  MODULE PROCEDURE cmfe_GeneratedMesh_BasisSetNumber1
4212  MODULE PROCEDURE cmfe_GeneratedMesh_BasisSetObj0
4213  MODULE PROCEDURE cmfe_GeneratedMesh_BasisSetObj1
4214  END INTERFACE cmfe_GeneratedMesh_BasisSet
4215 
4216  !>Sets/changes the base vectors for a generated mesh.
4217  INTERFACE cmfe_GeneratedMesh_BaseVectorsSet
4218  MODULE PROCEDURE cmfe_GeneratedMesh_BaseVectorsSetNumber
4219  MODULE PROCEDURE cmfe_GeneratedMesh_BaseVectorsSetObj
4220  END INTERFACE cmfe_GeneratedMesh_BaseVectorsSet
4221 
4222  !>Finishes the creation of a generated mesh. \see OpenCMISS::Iron::cmfe_GeneratedMesh_CreateStart
4223  INTERFACE cmfe_GeneratedMesh_CreateFinish
4224  MODULE PROCEDURE cmfe_GeneratedMesh_CreateFinishNumber
4225  MODULE PROCEDURE cmfe_GeneratedMesh_CreateFinishObj
4226  END INTERFACE cmfe_GeneratedMesh_CreateFinish
4227 
4228  !>Starts the creation of a generated mesh. \see OpenCMISS::Iron::cmfe_GeneratedMesh_CreateFinish
4229  INTERFACE cmfe_GeneratedMesh_CreateStart
4230  MODULE PROCEDURE cmfe_GeneratedMesh_CreateStartNumber
4231  MODULE PROCEDURE cmfe_GeneratedMesh_CreateStartInterfaceObj
4232  MODULE PROCEDURE cmfe_GeneratedMesh_CreateStartRegionObj
4233  END INTERFACE cmfe_GeneratedMesh_CreateStart
4234 
4235  !>Destroys a generated mesh.
4236  INTERFACE cmfe_GeneratedMesh_Destroy
4237  MODULE PROCEDURE cmfe_GeneratedMesh_DestroyNumber
4238  MODULE PROCEDURE cmfe_GeneratedMesh_DestroyObj
4239  END INTERFACE cmfe_GeneratedMesh_Destroy
4240 
4241  !>Returns the extent of a generated mesh.
4242  INTERFACE cmfe_GeneratedMesh_ExtentGet
4243  MODULE PROCEDURE cmfe_GeneratedMesh_ExtentGetNumber
4244  MODULE PROCEDURE cmfe_GeneratedMesh_ExtentGetObj
4245  END INTERFACE cmfe_GeneratedMesh_ExtentGet
4246 
4247  !>Sets/changes the extent of a generated mesh.
4248  INTERFACE cmfe_GeneratedMesh_ExtentSet
4249  MODULE PROCEDURE cmfe_GeneratedMesh_ExtentSetNumber
4250  MODULE PROCEDURE cmfe_GeneratedMesh_ExtentSetObj
4251  END INTERFACE cmfe_GeneratedMesh_ExtentSet
4252 
4253  !>Returns the number of elements in a generated mesh.
4254  INTERFACE cmfe_GeneratedMesh_NumberOfElementsGet
4255  MODULE PROCEDURE cmfe_GeneratedMesh_NumberOfElementsGetNumber
4256  MODULE PROCEDURE cmfe_GeneratedMesh_NumberOfElementsGetObj
4257  END INTERFACE cmfe_GeneratedMesh_NumberOfElementsGet
4258 
4259  !>Sets/changes the number of elements in a generated mesh.
4260  INTERFACE cmfe_GeneratedMesh_NumberOfElementsSet
4261  MODULE PROCEDURE cmfe_GeneratedMesh_NumberOfElementsSetNumber
4262  MODULE PROCEDURE cmfe_GeneratedMesh_NumberOfElementsSetObj
4263  END INTERFACE cmfe_GeneratedMesh_NumberOfElementsSet
4264 
4265  !>Returns the origin of a generated mesh.
4266  INTERFACE cmfe_GeneratedMesh_OriginGet
4267  MODULE PROCEDURE cmfe_GeneratedMesh_OriginGetNumber
4268  MODULE PROCEDURE cmfe_GeneratedMesh_OriginGetObj
4269  END INTERFACE cmfe_GeneratedMesh_OriginGet
4270 
4271  !>Sets/changes the origin of a generated mesh.
4272  INTERFACE cmfe_GeneratedMesh_OriginSet
4273  MODULE PROCEDURE cmfe_GeneratedMesh_OriginSetNumber
4274  MODULE PROCEDURE cmfe_GeneratedMesh_OriginSetObj
4275  END INTERFACE cmfe_GeneratedMesh_OriginSet
4276 
4277  !>Returns the type of a generated mesh.
4278  INTERFACE cmfe_GeneratedMesh_TypeGet
4279  MODULE PROCEDURE cmfe_GeneratedMesh_TypeGetNumber
4280  MODULE PROCEDURE cmfe_GeneratedMesh_TypeGetObj
4281  END INTERFACE cmfe_GeneratedMesh_TypeGet
4282 
4283  !>Sets/changes the type of a generated mesh.
4284  INTERFACE cmfe_GeneratedMesh_TypeSet
4285  MODULE PROCEDURE cmfe_GeneratedMesh_TypeSetNumber
4286  MODULE PROCEDURE cmfe_GeneratedMesh_TypeSetObj
4287  END INTERFACE cmfe_GeneratedMesh_TypeSet
4288 
4289  !>Calculates and sets the geometric field parameters for a generated mesh
4290  INTERFACE cmfe_GeneratedMesh_GeometricParametersCalculate
4291  MODULE PROCEDURE cmfe_GeneratedMesh_GeometricParametersCalculateNumber
4292  MODULE PROCEDURE cmfe_GeneratedMesh_GeometricParametersCalculateObj
4293  END INTERFACE cmfe_GeneratedMesh_GeometricParametersCalculate
4294 
4295  !>Returns a list of nodes belonging to a surface of given type
4296  INTERFACE cmfe_GeneratedMesh_SurfaceGet
4297  MODULE PROCEDURE cmfe_GeneratedMesh_SurfaceGetNumber0
4298  MODULE PROCEDURE cmfe_GeneratedMesh_SurfaceGetNumber1
4299  MODULE PROCEDURE cmfe_GeneratedMesh_SurfaceGetObj0
4300  MODULE PROCEDURE cmfe_GeneratedMesh_SurfaceGetObj1
4301  END INTERFACE
4302 
4303 
4304  !>Creates an embedding of one mesh in another
4305  INTERFACE cmfe_MeshEmbedding_Create
4306  MODULE PROCEDURE cmfe_MeshEmbedding_CreateNumber
4307  MODULE PROCEDURE cmfe_MeshEmbedding_CreateObj
4308  END INTERFACE
4309 
4310  !>Sets the embedded nodes for one parent element
4311  INTERFACE cmfe_MeshEmbedding_SetChildNodePosition
4312  MODULE PROCEDURE cmfe_MeshEmbedding_SetChildNodePositionObj
4313  END INTERFACE
4314 
4315 
4316  !>Pushes data from the parent field to the child field
4317  INTERFACE cmfe_MeshEmbedding_PushData
4318  MODULE PROCEDURE cmfe_MeshEmbedding_PushDataObj
4319  END INTERFACE
4320 
4321  INTERFACE cmfe_MeshEmbedding_SetGaussPointData
4322  MODULE PROCEDURE cmfe_MeshEmbedding_SetGaussPointDataObj
4323  END INTERFACE
4324 
4325  INTERFACE cmfe_MeshEmbedding_PullGaussPointData
4326  MODULE PROCEDURE cmfe_MeshEmbedding_PullGaussPointDataObj
4327  END INTERFACE
4328 
4329  INTERFACE cmfe_MeshEmbedding_GetGaussPointCoord
4330  MODULE PROCEDURE cmfe_Field_ParameterSetGetGaussPointCoordObj
4331  END INTERFACE
4332 
4333  PUBLIC cmfe_MeshEmbedding_Create,cmfe_MeshEmbedding_SetChildNodePosition, cmfe_MeshEmbeddingType
4334 
4335  PUBLIC cmfe_MeshEmbedding_Initialise,cmfe_MeshEmbedding_SetGaussPointData
4336 
4337  PUBLIC cmfe_MeshEmbedding_PushData,cmfe_MeshEmbedding_PullGaussPointData
4338 
4339  PUBLIC cmfe_MeshEmbedding_GetGaussPointCoord
4340 
4341  PUBLIC CMFE_GENERATED_MESH_REGULAR_MESH_TYPE,CMFE_GENERATED_MESH_POLAR_MESH_TYPE,CMFE_GENERATED_MESH_FRACTAL_TREE_MESH_TYPE
4342 
4343  PUBLIC CMFE_GENERATED_MESH_CYLINDER_MESH_TYPE, CMFE_GENERATED_MESH_ELLIPSOID_MESH_TYPE
4344 
4345  PUBLIC CMFE_GENERATED_MESH_CYLINDER_INNER_SURFACE,CMFE_GENERATED_MESH_CYLINDER_OUTER_SURFACE
4346 
4347  PUBLIC CMFE_GENERATED_MESH_CYLINDER_TOP_SURFACE, CMFE_GENERATED_MESH_CYLINDER_BOTTOM_SURFACE
4348 
4349  PUBLIC CMFE_GENERATED_MESH_ELLIPSOID_INNER_SURFACE, CMFE_GENERATED_MESH_ELLIPSOID_OUTER_SURFACE
4350 
4351  PUBLIC CMFE_GENERATED_MESH_ELLIPSOID_TOP_SURFACE
4352 
4353  PUBLIC CMFE_GENERATED_MESH_REGULAR_LEFT_SURFACE, CMFE_GENERATED_MESH_REGULAR_RIGHT_SURFACE, &
4354  & CMFE_GENERATED_MESH_REGULAR_TOP_SURFACE
4355 
4356  PUBLIC CMFE_GENERATED_MESH_REGULAR_BOTTOM_SURFACE, CMFE_GENERATED_MESH_REGULAR_FRONT_SURFACE, &
4357  & CMFE_GENERATED_MESH_REGULAR_BACK_SURFACE
4358 
4359  PUBLIC cmfe_GeneratedMesh_BasisGet,cmfe_GeneratedMesh_BasisSet
4360 
4361  PUBLIC cmfe_GeneratedMesh_BaseVectorsSet
4362 
4363  PUBLIC cmfe_GeneratedMesh_CreateFinish,cmfe_GeneratedMesh_CreateStart
4364 
4365  PUBLIC cmfe_GeneratedMesh_Destroy
4366 
4367  PUBLIC cmfe_GeneratedMesh_ExtentGet,cmfe_GeneratedMesh_ExtentSet
4368 
4369  PUBLIC cmfe_GeneratedMesh_NumberOfElementsGet,cmfe_GeneratedMesh_NumberOfElementsSet
4370 
4371  PUBLIC cmfe_GeneratedMesh_OriginGet,cmfe_GeneratedMesh_OriginSet
4372 
4373  PUBLIC cmfe_GeneratedMesh_TypeGet,cmfe_GeneratedMesh_TypeSet
4374 
4375  PUBLIC cmfe_GeneratedMesh_GeometricParametersCalculate
4376 
4377  PUBLIC cmfe_GeneratedMesh_SurfaceGet
4378 
4379 
4380 !!==================================================================================================================================
4381 !!
4382 !! INTERFACE_ROUTINES
4383 !!
4384 !!==================================================================================================================================
4385 
4386  !Module parameters
4387 
4388  !Module types
4389 
4390  !Module variables
4391 
4392  !Interfaces
4393 
4394  !>Adds a mesh to an interface.
4395  INTERFACE cmfe_Interface_MeshAdd
4396  MODULE PROCEDURE cmfe_Interface_MeshAddNumber
4397  MODULE PROCEDURE cmfe_Interface_MeshAddObj
4398  END INTERFACE cmfe_Interface_MeshAdd
4399 
4400  !>Finishes the creation of an interface. \see OpenCMISS::Iron::cmfe_Interface_CreateStart
4401  INTERFACE cmfe_Interface_CreateFinish
4402  MODULE PROCEDURE cmfe_Interface_CreateFinishNumber
4403  MODULE PROCEDURE cmfe_Interface_CreateFinishObj
4404  END INTERFACE cmfe_Interface_CreateFinish
4405 
4406  !>Starts the creation of an interface. \see OpenCMISS::Iron::cmfe_Interface_CreateFinish