## On this page

  

 

 # syscMeshDefinitionF

 Last update: 17.07.2025 

<a id="l00001" name="l00001"></a> 1module fortran

<a id="l00002" name="l00002"></a> 2!

<a id="l00003" name="l00003"></a> 3! Copyright ANSYS, Inc. 

<a id="l00004" name="l00004"></a> 4! Unauthorized use, distribution, or duplication is prohibited.

<a id="l00005" name="l00005"></a> 5!

<a id="l00006" name="l00006"></a> 6! Provide free-form Fortran interface for

<a id="l00007" name="l00007"></a> 7! System Coupling Participant Library.

<a id="l00008" name="l00008"></a> 8!

<a id="l00009" name="l00009"></a> 9! \*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a id="l00010" name="l00010"></a> 10!! \\brief Node data access struct, provides read-only access to the 

<a id="l00011" name="l00011"></a> 11!! mesh nodes.

<a id="l00012" name="l00012"></a> 12!!

<a id="l00013" name="l00013"></a> 13!! To create and/or initialize SyscNodeDataF, it is highly

<a id="l00014" name="l00014"></a> 14!! recommended to use one of the functions within 

<a id="l00015" name="l00015"></a> 15!! `syscGetNodeDataF` interface. These functions will

<a id="l00016" name="l00016"></a> 16!! initialize all members to the correct values and will help to 

<a id="l00017" name="l00017"></a> 17!! avoid back-compatibility issues in the future. For example:

<a id="l00018" name="l00018"></a> 18!!

<a id="l00019" name="l00019"></a> 19!! \\code

<a id="l00020" name="l00020"></a> 20!!

<a id="l00021" name="l00021"></a> 21!! SyscNodeDataF nodeData

<a id="l00022" name="l00022"></a> 22!! nodeData = syscGetNodeDataF(nodeCoords)

<a id="l00023" name="l00023"></a> 23!!

<a id="l00024" name="l00024"></a> 24!! \\endcode

<a id="l00025" name="l00025"></a>[ 25](structfortran_1_1syscnodedataf.xhtml)type :: [syscnodedataf](structfortran_1_1syscnodedataf.xhtml)

<a id="l00026" name="l00026"></a>[ 26](structfortran_1_1syscnodedataf.xhtml#a34207f80097afcc6f7e37b61187e604e) type([syscoutputintegerdataf](structfortran_1_1syscoutputintegerdataf.xhtml)) :: nodeids

<a id="l00027" name="l00027"></a>[ 27](structfortran_1_1syscnodedataf.xhtml#ada1acb5d25c5ab0e62ade22161a73b14) type([syscoutputvectordataf](structfortran_1_1syscoutputvectordataf.xhtml)) :: nodecoords

<a id="l00028" name="l00028"></a> 28end type [syscnodedataf](structfortran_1_1syscnodedataf.xhtml)



<a id="l00029" name="l00029"></a> 29!

<a id="l00030" name="l00030"></a> 30!\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a id="l00031" name="l00031"></a>[ 31](interfacefortran_1_1syscgetnodedataf.xhtml)interface [syscgetnodedataf](interfacefortran_1_1syscgetnodedataf.xhtml)

<a id="l00032" name="l00032"></a> 32!

<a id="l00033" name="l00033"></a> 33!\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a id="l00034" name="l00034"></a> 34!! \\brief Create a mesh node data access struct.

<a id="l00035" name="l00035"></a> 35!!

<a id="l00036" name="l00036"></a> 36!! Returns an empty mesh node data access struct.

<a id="l00037" name="l00037"></a> 37!! All members will be assigned default values.

<a id="l00038" name="l00038"></a> 38!\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a id="l00039" name="l00039"></a> 39function [syscgetnodedataf](interfacefortran_1_1syscgetnodedataf.xhtml)() result (ret)

<a id="l00040" name="l00040"></a> 40 import :: [syscnodedataf](structfortran_1_1syscnodedataf.xhtml)

<a id="l00041" name="l00041"></a> 41 type(SyscNodeDataF) :: ret

<a id="l00042" name="l00042"></a> 42!DIR$ IF DEFINED(\_WIN32) .and. ( .not. DEFINED(SYSTEM\_COUPLING\_PARTICIPANT\_PROXY))

<a id="l00043" name="l00043"></a> 43!DIR$ ATTRIBUTES DLLIMPORT :: syscGetNodeDataF

<a id="l00044" name="l00044"></a> 44!DIR$ ENDIF

<a id="l00045" name="l00045"></a> 45end function [syscgetnodedataf](interfacefortran_1_1syscgetnodedataf.xhtml)

<a id="l00046" name="l00046"></a> 46!

<a id="l00047" name="l00047"></a> 47!\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a id="l00048" name="l00048"></a> 48!! \\brief Create a mesh node data access struct, given node ids and 

<a id="l00049" name="l00049"></a> 49!! node coords in same order.

<a id="l00050" name="l00050"></a> 50!\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a id="l00051" name="l00051"></a> 51function syscgetnodedataf_ic(nodeIds, nodeCoords) result (ret)

<a id="l00052" name="l00052"></a> 52!

<a id="l00053" name="l00053"></a> 53 import :: [syscnodedataf](structfortran_1_1syscnodedataf.xhtml), [syscoutputintegerdataf](structfortran_1_1syscoutputintegerdataf.xhtml), &amp;

<a id="l00054" name="l00054"></a> 54 [syscoutputvectordataf](structfortran_1_1syscoutputvectordataf.xhtml)

<a id="l00055" name="l00055"></a> 55 type(SyscOutputIntegerDataF), intent(in) :: nodeIds 

<a id="l00056" name="l00056"></a> 56 type(SyscOutputVectorDataF), intent(in) :: nodeCoords

<a id="l00057" name="l00057"></a> 57 type(SyscNodeDataF) :: ret

<a id="l00058" name="l00058"></a> 58!

<a id="l00059" name="l00059"></a> 59!DIR$ IF DEFINED(\_WIN32) .and. ( .not. DEFINED(SYSTEM\_COUPLING\_PARTICIPANT\_PROXY))

<a id="l00060" name="l00060"></a> 60!DIR$ ATTRIBUTES DLLIMPORT :: syscGetNodeDataF\_IC

<a id="l00061" name="l00061"></a> 61!DIR$ ENDIF

<a id="l00062" name="l00062"></a> 62!

<a id="l00063" name="l00063"></a> 63end function syscgetnodedataf_ic

<a id="l00064" name="l00064"></a> 64!

<a id="l00065" name="l00065"></a> 65!\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a id="l00066" name="l00066"></a> 66!! \\brief Creates a mesh node data access struct, given node 

<a id="l00067" name="l00067"></a> 67!! coordinates in ascending node ids order.

<a id="l00068" name="l00068"></a> 68!\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a id="l00069" name="l00069"></a> 69function syscgetnodedataf_c(nodeCoords) result (ret)

<a id="l00070" name="l00070"></a> 70 import :: [syscnodedataf](structfortran_1_1syscnodedataf.xhtml), [syscoutputvectordataf](structfortran_1_1syscoutputvectordataf.xhtml)

<a id="l00071" name="l00071"></a> 71 type(SyscOutputVectorDataF), intent(in) :: nodeCoords

<a id="l00072" name="l00072"></a> 72 type(SyscNodeDataF) :: ret

<a id="l00073" name="l00073"></a> 73!DIR$ IF DEFINED(\_WIN32) .and. ( .not. DEFINED(SYSTEM\_COUPLING\_PARTICIPANT\_PROXY))

<a id="l00074" name="l00074"></a> 74!DIR$ ATTRIBUTES DLLIMPORT :: syscGetNodeDataF\_C

<a id="l00075" name="l00075"></a> 75!DIR$ ENDIF

<a id="l00076" name="l00076"></a> 76 end function syscgetnodedataf_c

<a id="l00077" name="l00077"></a> 77!



<a id="l00078" name="l00078"></a> 78end interface [syscgetnodedataf](interfacefortran_1_1syscgetnodedataf.xhtml)

<a id="l00079" name="l00079"></a> 79!

<a id="l00080" name="l00080"></a> 80! \*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a id="l00081" name="l00081"></a> 81!! \\brief Element types access struct, provides read-only access to 

<a id="l00082" name="l00082"></a> 82!! the mesh element types.

<a id="l00083" name="l00083"></a> 83!!

<a id="l00084" name="l00084"></a> 84!! To create and/or initialize SyscElementTypeDataF, it is highly

<a id="l00085" name="l00085"></a> 85!! recommended to use one of the functions within 

<a id="l00086" name="l00086"></a> 86!! `syscGetElementTypeDataF` interface. These functions will

<a id="l00087" name="l00087"></a> 87!! initialize all members to the correct values and will help to 

<a id="l00088" name="l00088"></a> 88!! avoid back-compatibility issues in the future. For example:

<a id="l00089" name="l00089"></a> 89!!

<a id="l00090" name="l00090"></a> 90!! \\code

<a id="l00091" name="l00091"></a> 91!!

<a id="l00092" name="l00092"></a> 92!! SyscElementTypeDataF eTypeData

<a id="l00093" name="l00093"></a> 93!! eTypeData = syscGetElementTypeDataF(elementTypes)

<a id="l00094" name="l00094"></a> 94!!

<a id="l00095" name="l00095"></a> 95!! \\endcode

<a id="l00096" name="l00096"></a>[ 96](structfortran_1_1syscelementtypedataf.xhtml)type :: [syscelementtypedataf](structfortran_1_1syscelementtypedataf.xhtml)

<a id="l00097" name="l00097"></a>[ 97](structfortran_1_1syscelementtypedataf.xhtml#ab30d5095d187917aee011f47cd4e18c6) type([syscoutputintegerdataf](structfortran_1_1syscoutputintegerdataf.xhtml)) :: elementtypes

<a id="l00098" name="l00098"></a> 98end type [syscelementtypedataf](structfortran_1_1syscelementtypedataf.xhtml)



<a id="l00099" name="l00099"></a> 99!

<a id="l00100" name="l00100"></a> 100!\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a id="l00101" name="l00101"></a>[ 101](interfacefortran_1_1syscgetelementtypedataf.xhtml)interface [syscgetelementtypedataf](interfacefortran_1_1syscgetelementtypedataf.xhtml)

<a id="l00102" name="l00102"></a> 102!

<a id="l00103" name="l00103"></a> 103!\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a id="l00104" name="l00104"></a> 104!! \\brief Create a mesh node data access struct.

<a id="l00105" name="l00105"></a> 105!!

<a id="l00106" name="l00106"></a> 106!! Returns an empty mesh node data access struct. Element types integer

<a id="l00107" name="l00107"></a> 107!! array access will be set to empty.

<a id="l00108" name="l00108"></a> 108!\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a id="l00109" name="l00109"></a> 109function syscgetelementtypedataf_empty() result (ret)

<a id="l00110" name="l00110"></a> 110 import :: [syscelementtypedataf](structfortran_1_1syscelementtypedataf.xhtml)

<a id="l00111" name="l00111"></a> 111 type(SyscElementTypeDataF) :: ret

<a id="l00112" name="l00112"></a> 112!DIR$ IF DEFINED(\_WIN32) .and. ( .not. DEFINED(SYSTEM\_COUPLING\_PARTICIPANT\_PROXY))

<a id="l00113" name="l00113"></a> 113!DIR$ ATTRIBUTES DLLIMPORT :: syscGetElementTypeDataF\_Empty

<a id="l00114" name="l00114"></a> 114!DIR$ ENDIF

<a id="l00115" name="l00115"></a> 115end function syscgetelementtypedataf_empty

<a id="l00116" name="l00116"></a> 116!

<a id="l00117" name="l00117"></a> 117!\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a id="l00118" name="l00118"></a> 118!! \\brief Create a mesh node data access struct, given node ids and 

<a id="l00119" name="l00119"></a> 119!! node coords in same order.

<a id="l00120" name="l00120"></a> 120!\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a id="l00121" name="l00121"></a> 121function [syscgetelementtypedataf](interfacefortran_1_1syscgetelementtypedataf.xhtml)(elementTypes) result (ret)

<a id="l00122" name="l00122"></a> 122 import :: [syscelementtypedataf](structfortran_1_1syscelementtypedataf.xhtml), [syscoutputintegerdataf](structfortran_1_1syscoutputintegerdataf.xhtml)

<a id="l00123" name="l00123"></a> 123 type(SyscOutputIntegerDataF), intent(in) :: elementTypes

<a id="l00124" name="l00124"></a> 124 type(SyscElementTypeDataF) :: ret

<a id="l00125" name="l00125"></a> 125!DIR$ IF DEFINED(\_WIN32) .and. ( .not. DEFINED(SYSTEM\_COUPLING\_PARTICIPANT\_PROXY))

<a id="l00126" name="l00126"></a> 126!DIR$ ATTRIBUTES DLLIMPORT :: syscGetElementTypeDataF

<a id="l00127" name="l00127"></a> 127!DIR$ ENDIF

<a id="l00128" name="l00128"></a> 128end function [syscgetelementtypedataf](interfacefortran_1_1syscgetelementtypedataf.xhtml)

<a id="l00129" name="l00129"></a> 129!



<a id="l00130" name="l00130"></a> 130end interface [syscgetelementtypedataf](interfacefortran_1_1syscgetelementtypedataf.xhtml)

<a id="l00131" name="l00131"></a> 131!

<a id="l00132" name="l00132"></a> 132! \*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a id="l00133" name="l00133"></a> 133!! \\brief Element node count access struct.

<a id="l00134" name="l00134"></a> 134! \*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a id="l00135" name="l00135"></a>[ 135](structfortran_1_1syscelementnodecountdataf.xhtml)type :: [syscelementnodecountdataf](structfortran_1_1syscelementnodecountdataf.xhtml)

<a id="l00136" name="l00136"></a> 136 type(SyscOutputIntegerDataF) :: elementNodeCounts

<a id="l00137" name="l00137"></a> 137end type [syscelementnodecountdataf](structfortran_1_1syscelementnodecountdataf.xhtml)



<a id="l00138" name="l00138"></a> 138!

<a id="l00139" name="l00139"></a> 139!\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a id="l00140" name="l00140"></a>[ 140](interfacefortran_1_1syscgetelementnodecountdataf.xhtml)interface [syscgetelementnodecountdataf](interfacefortran_1_1syscgetelementnodecountdataf.xhtml)

<a id="l00141" name="l00141"></a> 141!\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a id="l00142" name="l00142"></a> 142!! \\brief Returns an empty element node count data access struct.

<a id="l00143" name="l00143"></a> 143!\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a id="l00144" name="l00144"></a> 144function syscgetelementnodecountdataf_empty() result (ret)

<a id="l00145" name="l00145"></a> 145 import :: [syscelementnodecountdataf](structfortran_1_1syscelementnodecountdataf.xhtml)

<a id="l00146" name="l00146"></a> 146 type(SyscElementNodeCountDataF) :: ret

<a id="l00147" name="l00147"></a> 147!DIR$ IF DEFINED(\_WIN32) .and. ( .not. DEFINED(SYSTEM\_COUPLING\_PARTICIPANT\_PROXY))

<a id="l00148" name="l00148"></a> 148!DIR$ ATTRIBUTES DLLIMPORT :: syscGetElementNodeCountDataF\_Empty

<a id="l00149" name="l00149"></a> 149!DIR$ ENDIF

<a id="l00150" name="l00150"></a> 150end function syscgetelementnodecountdataf_empty

<a id="l00151" name="l00151"></a> 151!

<a id="l00152" name="l00152"></a> 152!\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a id="l00153" name="l00153"></a> 153!! \\brief Create an element node count node data access struct, given

<a id="l00154" name="l00154"></a> 154!! element node counts array.

<a id="l00155" name="l00155"></a> 155!\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a id="l00156" name="l00156"></a> 156function [syscgetelementnodecountdataf](interfacefortran_1_1syscgetelementnodecountdataf.xhtml)(elemNodeCounts) &amp;

<a id="l00157" name="l00157"></a> 157 result(ret)

<a id="l00158" name="l00158"></a> 158 import :: [syscelementnodecountdataf](structfortran_1_1syscelementnodecountdataf.xhtml), [syscoutputintegerdataf](structfortran_1_1syscoutputintegerdataf.xhtml)

<a id="l00159" name="l00159"></a> 159 type(SyscOutputIntegerDataF), intent(in) :: elemNodeCounts

<a id="l00160" name="l00160"></a> 160 type(SyscElementNodeCountDataF) :: ret

<a id="l00161" name="l00161"></a> 161!DIR$ IF DEFINED(\_WIN32) .and. ( .not. DEFINED(SYSTEM\_COUPLING\_PARTICIPANT\_PROXY))

<a id="l00162" name="l00162"></a> 162!DIR$ ATTRIBUTES DLLIMPORT :: syscGetElementNodeCountDataF

<a id="l00163" name="l00163"></a> 163!DIR$ ENDIF

<a id="l00164" name="l00164"></a> 164end function [syscgetelementnodecountdataf](interfacefortran_1_1syscgetelementnodecountdataf.xhtml)

<a id="l00165" name="l00165"></a> 165!



<a id="l00166" name="l00166"></a> 166end interface [syscgetelementnodecountdataf](interfacefortran_1_1syscgetelementnodecountdataf.xhtml)

<a id="l00167" name="l00167"></a> 167!

<a id="l00168" name="l00168"></a> 168! \*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a id="l00169" name="l00169"></a> 169!! \\brief Element-to-node connectivity struct.

<a id="l00170" name="l00170"></a> 170! \*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a id="l00171" name="l00171"></a>[ 171](structfortran_1_1syscelementnodeconnectivitydataf.xhtml)type :: [syscelementnodeconnectivitydataf](structfortran_1_1syscelementnodeconnectivitydataf.xhtml)

<a id="l00172" name="l00172"></a> 172 type(SyscOutputIntegerDataF) :: elemNodeIds

<a id="l00173" name="l00173"></a> 173end type [syscelementnodeconnectivitydataf](structfortran_1_1syscelementnodeconnectivitydataf.xhtml)



<a id="l00174" name="l00174"></a> 174!

<a id="l00175" name="l00175"></a> 175!\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a id="l00176" name="l00176"></a>[ 176](interfacefortran_1_1syscgetelementnodeconnectivitydataf.xhtml)interface [syscgetelementnodeconnectivitydataf](interfacefortran_1_1syscgetelementnodeconnectivitydataf.xhtml)

<a id="l00177" name="l00177"></a> 177!\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a id="l00178" name="l00178"></a> 178!! \\brief Returns an empty element-to-node connectivity struct.

<a id="l00179" name="l00179"></a> 179!\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a id="l00180" name="l00180"></a> 180function syscgetelementnodeconnectivitydataf_empty() result (ret)

<a id="l00181" name="l00181"></a> 181 import :: [syscelementnodeconnectivitydataf](structfortran_1_1syscelementnodeconnectivitydataf.xhtml)

<a id="l00182" name="l00182"></a> 182 type(SyscElementNodeConnectivityDataF) :: ret

<a id="l00183" name="l00183"></a> 183!DIR$ IF DEFINED(\_WIN32) .and. ( .not. DEFINED(SYSTEM\_COUPLING\_PARTICIPANT\_PROXY))

<a id="l00184" name="l00184"></a> 184!DIR$ ATTRIBUTES DLLIMPORT :: syscGetElementNodeConnectivityDataF\_Empty

<a id="l00185" name="l00185"></a> 185!DIR$ ENDIF

<a id="l00186" name="l00186"></a> 186end function syscgetelementnodeconnectivitydataf_empty

<a id="l00187" name="l00187"></a> 187!

<a id="l00188" name="l00188"></a> 188!\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a id="l00189" name="l00189"></a> 189!! \\brief Create an element-to-node connectivity struct, given

<a id="l00190" name="l00190"></a> 190!! element node ids array.

<a id="l00191" name="l00191"></a> 191!\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a id="l00192" name="l00192"></a> 192function [syscgetelementnodeconnectivitydataf](interfacefortran_1_1syscgetelementnodeconnectivitydataf.xhtml)(elemNodeConn) &amp;

<a id="l00193" name="l00193"></a> 193 result(ret)

<a id="l00194" name="l00194"></a> 194 import :: [syscelementnodeconnectivitydataf](structfortran_1_1syscelementnodeconnectivitydataf.xhtml), [syscoutputintegerdataf](structfortran_1_1syscoutputintegerdataf.xhtml)

<a id="l00195" name="l00195"></a> 195 type(SyscOutputIntegerDataF), intent(in) :: elemNodeConn

<a id="l00196" name="l00196"></a> 196 type(SyscElementNodeConnectivityDataF) :: ret

<a id="l00197" name="l00197"></a> 197!DIR$ IF DEFINED(\_WIN32) .and. ( .not. DEFINED(SYSTEM\_COUPLING\_PARTICIPANT\_PROXY))

<a id="l00198" name="l00198"></a> 198!DIR$ ATTRIBUTES DLLIMPORT :: syscGetElementNodeConnectivityDataF

<a id="l00199" name="l00199"></a> 199!DIR$ ENDIF

<a id="l00200" name="l00200"></a> 200end function [syscgetelementnodeconnectivitydataf](interfacefortran_1_1syscgetelementnodeconnectivitydataf.xhtml)

<a id="l00201" name="l00201"></a> 201!



<a id="l00202" name="l00202"></a> 202end interface [syscgetelementnodeconnectivitydataf](interfacefortran_1_1syscgetelementnodeconnectivitydataf.xhtml)

<a id="l00203" name="l00203"></a> 203!

<a id="l00204" name="l00204"></a> 204! \*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a id="l00205" name="l00205"></a> 205!! \\brief Face-to-cell connectivity struct.

<a id="l00206" name="l00206"></a> 206! \*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a id="l00207" name="l00207"></a>[ 207](structfortran_1_1syscfacecellconnectivitydataf.xhtml)type :: [syscfacecellconnectivitydataf](structfortran_1_1syscfacecellconnectivitydataf.xhtml)

<a id="l00208" name="l00208"></a> 208 type(SyscOutputIntegerDataF) :: cell0Ids

<a id="l00209" name="l00209"></a> 209 type(SyscOutputIntegerDataF) :: cell1Ids

<a id="l00210" name="l00210"></a> 210end type [syscfacecellconnectivitydataf](structfortran_1_1syscfacecellconnectivitydataf.xhtml)



<a id="l00211" name="l00211"></a> 211!

<a id="l00212" name="l00212"></a> 212!\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a id="l00213" name="l00213"></a>[ 213](interfacefortran_1_1syscgetfacecellconnectivitydataf.xhtml)interface [syscgetfacecellconnectivitydataf](interfacefortran_1_1syscgetfacecellconnectivitydataf.xhtml)

<a id="l00214" name="l00214"></a> 214!\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a id="l00215" name="l00215"></a> 215!! \\brief Returns an empty face-to-cell connectivity struct.

<a id="l00216" name="l00216"></a> 216!\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a id="l00217" name="l00217"></a> 217function syscgetfacecellconnectivitydataf_empty() result (ret)

<a id="l00218" name="l00218"></a> 218 import :: [syscfacecellconnectivitydataf](structfortran_1_1syscfacecellconnectivitydataf.xhtml)

<a id="l00219" name="l00219"></a> 219 type(SyscFaceCellConnectivityDataF) :: ret

<a id="l00220" name="l00220"></a> 220!DIR$ IF DEFINED(\_WIN32) .and. ( .not. DEFINED(SYSTEM\_COUPLING\_PARTICIPANT\_PROXY))

<a id="l00221" name="l00221"></a> 221!DIR$ ATTRIBUTES DLLIMPORT :: syscGetFaceCellConnectivityDataF\_Empty

<a id="l00222" name="l00222"></a> 222!DIR$ ENDIF

<a id="l00223" name="l00223"></a> 223end function syscgetfacecellconnectivitydataf_empty

<a id="l00224" name="l00224"></a> 224!

<a id="l00225" name="l00225"></a> 225!\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a id="l00226" name="l00226"></a> 226!! \\brief Create a face-to-cell connectivity struct, given cell0Ids

<a id="l00227" name="l00227"></a> 227!! and cell1Ids arrays.

<a id="l00228" name="l00228"></a> 228!\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a id="l00229" name="l00229"></a> 229function [syscgetfacecellconnectivitydataf](interfacefortran_1_1syscgetfacecellconnectivitydataf.xhtml)(cell0Ids, cell1Ids) &amp;

<a id="l00230" name="l00230"></a> 230 result(ret)

<a id="l00231" name="l00231"></a> 231 import :: [syscfacecellconnectivitydataf](structfortran_1_1syscfacecellconnectivitydataf.xhtml), [syscoutputintegerdataf](structfortran_1_1syscoutputintegerdataf.xhtml)

<a id="l00232" name="l00232"></a> 232 type(SyscOutputIntegerDataF), intent(in) :: cell0Ids

<a id="l00233" name="l00233"></a> 233 type(SyscOutputIntegerDataF), intent(in) :: cell1Ids

<a id="l00234" name="l00234"></a> 234 type(SyscFaceCellConnectivityDataF) :: ret

<a id="l00235" name="l00235"></a> 235!DIR$ IF DEFINED(\_WIN32) .and. ( .not. DEFINED(SYSTEM\_COUPLING\_PARTICIPANT\_PROXY))

<a id="l00236" name="l00236"></a> 236!DIR$ ATTRIBUTES DLLIMPORT :: syscGetFaceCellConnectivityDataF

<a id="l00237" name="l00237"></a> 237!DIR$ ENDIF

<a id="l00238" name="l00238"></a> 238end function [syscgetfacecellconnectivitydataf](interfacefortran_1_1syscgetfacecellconnectivitydataf.xhtml)

<a id="l00239" name="l00239"></a> 239!



<a id="l00240" name="l00240"></a> 240end interface [syscgetfacecellconnectivitydataf](interfacefortran_1_1syscgetfacecellconnectivitydataf.xhtml)

<a id="l00241" name="l00241"></a> 241!

<a id="l00242" name="l00242"></a> 242! \*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a id="l00243" name="l00243"></a> 243!! \\brief Cell id data struct.

<a id="l00244" name="l00244"></a> 244! \*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a id="l00245" name="l00245"></a>[ 245](structfortran_1_1sysccelliddataf.xhtml)type :: [sysccelliddataf](structfortran_1_1sysccelliddataf.xhtml)

<a id="l00246" name="l00246"></a> 246 type(SyscOutputIntegerDataF) :: cellIds

<a id="l00247" name="l00247"></a> 247end type [sysccelliddataf](structfortran_1_1sysccelliddataf.xhtml)



<a id="l00248" name="l00248"></a> 248!

<a id="l00249" name="l00249"></a> 249!\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a id="l00250" name="l00250"></a>[ 250](interfacefortran_1_1syscgetcelliddataf.xhtml)interface [syscgetcelliddataf](interfacefortran_1_1syscgetcelliddataf.xhtml)

<a id="l00251" name="l00251"></a> 251!\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a id="l00252" name="l00252"></a> 252!! \\brief Returns an empty cell id data struct.

<a id="l00253" name="l00253"></a> 253!\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a id="l00254" name="l00254"></a> 254function syscgetcelliddataf_empty() result (ret)

<a id="l00255" name="l00255"></a> 255 import :: [sysccelliddataf](structfortran_1_1sysccelliddataf.xhtml)

<a id="l00256" name="l00256"></a> 256 type(SyscCellIdDataF) :: ret

<a id="l00257" name="l00257"></a> 257!DIR$ IF DEFINED(\_WIN32) .and. ( .not. DEFINED(SYSTEM\_COUPLING\_PARTICIPANT\_PROXY))

<a id="l00258" name="l00258"></a> 258!DIR$ ATTRIBUTES DLLIMPORT :: syscGetCellIdDataF\_Empty

<a id="l00259" name="l00259"></a> 259!DIR$ ENDIF

<a id="l00260" name="l00260"></a> 260end function syscgetcelliddataf_empty

<a id="l00261" name="l00261"></a> 261!

<a id="l00262" name="l00262"></a> 262!\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a id="l00263" name="l00263"></a> 263!! \\brief Create a cell id data struct, given cell ids array.

<a id="l00264" name="l00264"></a> 264!\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a id="l00265" name="l00265"></a> 265function [syscgetcelliddataf](interfacefortran_1_1syscgetcelliddataf.xhtml)(cellIds) result (ret)

<a id="l00266" name="l00266"></a> 266 import :: [sysccelliddataf](structfortran_1_1sysccelliddataf.xhtml), [syscoutputintegerdataf](structfortran_1_1syscoutputintegerdataf.xhtml)

<a id="l00267" name="l00267"></a> 267 type(SyscOutputIntegerDataF), intent(in) :: cellIds

<a id="l00268" name="l00268"></a> 268 type(SyscCellIdDataF) :: ret

<a id="l00269" name="l00269"></a> 269!DIR$ IF DEFINED(\_WIN32) .and. ( .not. DEFINED(SYSTEM\_COUPLING\_PARTICIPANT\_PROXY))

<a id="l00270" name="l00270"></a> 270!DIR$ ATTRIBUTES DLLIMPORT :: syscGetCellIdDataF

<a id="l00271" name="l00271"></a> 271!DIR$ ENDIF

<a id="l00272" name="l00272"></a> 272end function [syscgetcelliddataf](interfacefortran_1_1syscgetcelliddataf.xhtml)

<a id="l00273" name="l00273"></a> 273!



<a id="l00274" name="l00274"></a> 274end interface [syscgetcelliddataf](interfacefortran_1_1syscgetcelliddataf.xhtml)

<a id="l00275" name="l00275"></a> 275!

<a id="l00276" name="l00276"></a> 276! \*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a id="l00277" name="l00277"></a> 277!! \\brief Element id data struct.

<a id="l00278" name="l00278"></a> 278! \*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a id="l00279" name="l00279"></a>[ 279](structfortran_1_1syscelementiddataf.xhtml)type :: [syscelementiddataf](structfortran_1_1syscelementiddataf.xhtml)

<a id="l00280" name="l00280"></a> 280 type(SyscOutputIntegerDataF) :: elementIds

<a id="l00281" name="l00281"></a> 281end type [syscelementiddataf](structfortran_1_1syscelementiddataf.xhtml)



<a id="l00282" name="l00282"></a> 282!

<a id="l00283" name="l00283"></a> 283!\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a id="l00284" name="l00284"></a>[ 284](interfacefortran_1_1syscgetelementiddataf.xhtml)interface [syscgetelementiddataf](interfacefortran_1_1syscgetelementiddataf.xhtml)

<a id="l00285" name="l00285"></a> 285!\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a id="l00286" name="l00286"></a> 286!! \\brief Returns an empty element id data struct.

<a id="l00287" name="l00287"></a> 287!\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a id="l00288" name="l00288"></a> 288function syscgetelementiddataf_empty() result (ret)

<a id="l00289" name="l00289"></a> 289 import :: [syscelementiddataf](structfortran_1_1syscelementiddataf.xhtml)

<a id="l00290" name="l00290"></a> 290 type(SyscElementIdDataF) :: ret

<a id="l00291" name="l00291"></a> 291!DIR$ IF DEFINED(\_WIN32) .and. ( .not. DEFINED(SYSTEM\_COUPLING\_PARTICIPANT\_PROXY))

<a id="l00292" name="l00292"></a> 292!DIR$ ATTRIBUTES DLLIMPORT :: syscGetElementIdDataF\_Empty

<a id="l00293" name="l00293"></a> 293!DIR$ ENDIF

<a id="l00294" name="l00294"></a> 294end function syscgetelementiddataf_empty

<a id="l00295" name="l00295"></a> 295!

<a id="l00296" name="l00296"></a> 296!\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a id="l00297" name="l00297"></a> 297!! \\brief Create a element id data struct, given element ids array.

<a id="l00298" name="l00298"></a> 298!\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a id="l00299" name="l00299"></a> 299function [syscgetelementiddataf](interfacefortran_1_1syscgetelementiddataf.xhtml)(elementIds) result (ret)

<a id="l00300" name="l00300"></a> 300 import :: [syscelementiddataf](structfortran_1_1syscelementiddataf.xhtml), [syscoutputintegerdataf](structfortran_1_1syscoutputintegerdataf.xhtml)

<a id="l00301" name="l00301"></a> 301 type(SyscOutputIntegerDataF), intent(in) :: elementIds

<a id="l00302" name="l00302"></a> 302 type(SyscElementIdDataF) :: ret

<a id="l00303" name="l00303"></a> 303!DIR$ IF DEFINED(\_WIN32) .and. ( .not. DEFINED(SYSTEM\_COUPLING\_PARTICIPANT\_PROXY))

<a id="l00304" name="l00304"></a> 304!DIR$ ATTRIBUTES DLLIMPORT :: syscGetElementIdDataF

<a id="l00305" name="l00305"></a> 305!DIR$ ENDIF

<a id="l00306" name="l00306"></a> 306end function [syscgetelementiddataf](interfacefortran_1_1syscgetelementiddataf.xhtml)

<a id="l00307" name="l00307"></a> 307!



<a id="l00308" name="l00308"></a> 308end interface [syscgetelementiddataf](interfacefortran_1_1syscgetelementiddataf.xhtml)

<a id="l00309" name="l00309"></a> 309!

<a id="l00310" name="l00310"></a> 310! \*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a id="l00311" name="l00311"></a> 311!! \\brief Face data access struct, provides read-only access to the 

<a id="l00312" name="l00312"></a> 312!! mesh faces.

<a id="l00313" name="l00313"></a> 313!

<a id="l00314" name="l00314"></a>[ 314](structfortran_1_1syscfacedataf.xhtml)type :: [syscfacedataf](structfortran_1_1syscfacedataf.xhtml)

<a id="l00315" name="l00315"></a>[ 315](structfortran_1_1syscfacedataf.xhtml#ac15be376d8a7d00e486707ac0269056e) type([syscelementiddataf](structfortran_1_1syscelementiddataf.xhtml)) :: faceids

<a id="l00316" name="l00316"></a>[ 316](structfortran_1_1syscfacedataf.xhtml#acb27a555d3934aa9aac98ece4c77b167) type([syscelementtypedataf](structfortran_1_1syscelementtypedataf.xhtml)) :: facetypes

<a id="l00317" name="l00317"></a>[ 317](structfortran_1_1syscfacedataf.xhtml#a2abe8c3dbc5763c1d6a59c79a2e14e79) type([syscelementnodecountdataf](structfortran_1_1syscelementnodecountdataf.xhtml)) :: facenodecounts

<a id="l00318" name="l00318"></a> 318 type([syscelementnodeconnectivitydataf](structfortran_1_1syscelementnodeconnectivitydataf.xhtml)) :: facenodeconnectivity

<a id="l00319" name="l00319"></a> 319 type([syscfacecellconnectivitydataf](structfortran_1_1syscfacecellconnectivitydataf.xhtml)) :: facecellconnectivity

<a id="l00320" name="l00320"></a> 320end type [syscfacedataf](structfortran_1_1syscfacedataf.xhtml)



<a id="l00321" name="l00321"></a> 321!

<a id="l00322" name="l00322"></a> 322!\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a id="l00323" name="l00323"></a>[ 323](interfacefortran_1_1syscgetfacedataf.xhtml)interface [syscgetfacedataf](interfacefortran_1_1syscgetfacedataf.xhtml)

<a id="l00324" name="l00324"></a> 324!

<a id="l00325" name="l00325"></a> 325!\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a id="l00326" name="l00326"></a> 326!! \\brief Create a mesh face data access struct.

<a id="l00327" name="l00327"></a> 327!!

<a id="l00328" name="l00328"></a> 328!! Returns an empty mesh face data access struct.

<a id="l00329" name="l00329"></a> 329!! All members will be assigned default values.

<a id="l00330" name="l00330"></a> 330!\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a id="l00331" name="l00331"></a> 331function [syscgetfacedataf](interfacefortran_1_1syscgetfacedataf.xhtml)() result (ret)

<a id="l00332" name="l00332"></a> 332 import :: [syscfacedataf](structfortran_1_1syscfacedataf.xhtml)

<a id="l00333" name="l00333"></a> 333 type(SyscFaceDataF) :: ret

<a id="l00334" name="l00334"></a> 334!DIR$ IF DEFINED(\_WIN32) .and. ( .not. DEFINED(SYSTEM\_COUPLING\_PARTICIPANT\_PROXY))

<a id="l00335" name="l00335"></a> 335!DIR$ ATTRIBUTES DLLIMPORT :: syscGetFaceDataF

<a id="l00336" name="l00336"></a> 336!DIR$ ENDIF

<a id="l00337" name="l00337"></a> 337end function [syscgetfacedataf](interfacefortran_1_1syscgetfacedataf.xhtml)

<a id="l00338" name="l00338"></a> 338!

<a id="l00339" name="l00339"></a> 339!\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a id="l00340" name="l00340"></a> 340!! \\brief Create a mesh face data access struct.

<a id="l00341" name="l00341"></a> 341!\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a id="l00342" name="l00342"></a> 342function syscgetfacedataf_itn(faceIds, faceTypes, &amp;

<a id="l00343" name="l00343"></a> 343 faceNodeConnectivity) result (ret)

<a id="l00344" name="l00344"></a> 344!

<a id="l00345" name="l00345"></a> 345 import :: [syscfacedataf](structfortran_1_1syscfacedataf.xhtml), [syscelementiddataf](structfortran_1_1syscelementiddataf.xhtml), &amp;

<a id="l00346" name="l00346"></a> 346 [syscelementtypedataf](structfortran_1_1syscelementtypedataf.xhtml), [syscelementnodeconnectivitydataf](structfortran_1_1syscelementnodeconnectivitydataf.xhtml)

<a id="l00347" name="l00347"></a> 347 type(SyscElementIdDataF), intent(in) :: faceIds 

<a id="l00348" name="l00348"></a> 348 type(SyscElementTypeDataF), intent(in) :: faceTypes 

<a id="l00349" name="l00349"></a> 349 type(SyscElementNodeConnectivityDataF), intent(in) :: &amp;

<a id="l00350" name="l00350"></a> 350 faceNodeConnectivity

<a id="l00351" name="l00351"></a> 351 type(SyscFaceDataF) :: ret

<a id="l00352" name="l00352"></a> 352!

<a id="l00353" name="l00353"></a> 353!DIR$ IF DEFINED(\_WIN32) .and. ( .not. DEFINED(SYSTEM\_COUPLING\_PARTICIPANT\_PROXY))

<a id="l00354" name="l00354"></a> 354!DIR$ ATTRIBUTES DLLIMPORT :: syscGetFaceDataF\_ITN

<a id="l00355" name="l00355"></a> 355!DIR$ ENDIF

<a id="l00356" name="l00356"></a> 356!

<a id="l00357" name="l00357"></a> 357end function syscgetfacedataf_itn

<a id="l00358" name="l00358"></a> 358!

<a id="l00359" name="l00359"></a> 359!\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a id="l00360" name="l00360"></a> 360!! \\brief Create a mesh face data access struct.

<a id="l00361" name="l00361"></a> 361!\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a id="l00362" name="l00362"></a> 362function syscgetfacedataf_cn(faceNodeCounts, faceNodeConnectivity) &amp;

<a id="l00363" name="l00363"></a> 363 result(ret)

<a id="l00364" name="l00364"></a> 364!

<a id="l00365" name="l00365"></a> 365 import :: [syscfacedataf](structfortran_1_1syscfacedataf.xhtml), [syscelementnodecountdataf](structfortran_1_1syscelementnodecountdataf.xhtml), &amp;

<a id="l00366" name="l00366"></a> 366 [syscelementnodeconnectivitydataf](structfortran_1_1syscelementnodeconnectivitydataf.xhtml)

<a id="l00367" name="l00367"></a> 367 type(SyscElementNodeCountDataF), intent(in) :: faceNodeCounts 

<a id="l00368" name="l00368"></a> 368 type(SyscElementNodeConnectivityDataF), intent(in) :: &amp;

<a id="l00369" name="l00369"></a> 369 faceNodeConnectivity

<a id="l00370" name="l00370"></a> 370 type(SyscFaceDataF) :: ret

<a id="l00371" name="l00371"></a> 371!

<a id="l00372" name="l00372"></a> 372!DIR$ IF DEFINED(\_WIN32) .and. ( .not. DEFINED(SYSTEM\_COUPLING\_PARTICIPANT\_PROXY))

<a id="l00373" name="l00373"></a> 373!DIR$ ATTRIBUTES DLLIMPORT :: syscGetFaceDataF\_CN

<a id="l00374" name="l00374"></a> 374!DIR$ ENDIF

<a id="l00375" name="l00375"></a> 375!

<a id="l00376" name="l00376"></a> 376end function syscgetfacedataf_cn

<a id="l00377" name="l00377"></a> 377!



<a id="l00378" name="l00378"></a> 378end interface [syscgetfacedataf](interfacefortran_1_1syscgetfacedataf.xhtml)

<a id="l00379" name="l00379"></a> 379!

<a id="l00380" name="l00380"></a> 380! \*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a id="l00381" name="l00381"></a> 381!! \\brief Cell data access struct, provides read-only access to the 

<a id="l00382" name="l00382"></a> 382!! mesh cells.

<a id="l00383" name="l00383"></a> 383!

<a id="l00384" name="l00384"></a>[ 384](structfortran_1_1sysccelldataf.xhtml)type :: [sysccelldataf](structfortran_1_1sysccelldataf.xhtml)

<a id="l00385" name="l00385"></a>[ 385](structfortran_1_1sysccelldataf.xhtml#a3a35fd70e9583f7dc1e01a7e1fac2c3a) type([syscelementiddataf](structfortran_1_1syscelementiddataf.xhtml)) :: cellids

<a id="l00386" name="l00386"></a>[ 386](structfortran_1_1sysccelldataf.xhtml#a53b9beb7b95f41d2958d1ad46365475b) type([syscelementtypedataf](structfortran_1_1syscelementtypedataf.xhtml)) :: celltypes

<a id="l00387" name="l00387"></a> 387 type([syscelementnodeconnectivitydataf](structfortran_1_1syscelementnodeconnectivitydataf.xhtml)) :: cellnodeconnectivity

<a id="l00388" name="l00388"></a> 388end type [sysccelldataf](structfortran_1_1sysccelldataf.xhtml)



<a id="l00389" name="l00389"></a> 389!

<a id="l00390" name="l00390"></a> 390!\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a id="l00391" name="l00391"></a>[ 391](interfacefortran_1_1syscgetcelldataf.xhtml)interface [syscgetcelldataf](interfacefortran_1_1syscgetcelldataf.xhtml)

<a id="l00392" name="l00392"></a> 392!

<a id="l00393" name="l00393"></a> 393!\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a id="l00394" name="l00394"></a> 394!! \\brief Create a mesh cell data access struct.

<a id="l00395" name="l00395"></a> 395!!

<a id="l00396" name="l00396"></a> 396!! Returns an empty mesh cell data access struct.

<a id="l00397" name="l00397"></a> 397!! All members will be assigned default values.

<a id="l00398" name="l00398"></a> 398!\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a id="l00399" name="l00399"></a> 399function [syscgetcelldataf](interfacefortran_1_1syscgetcelldataf.xhtml)() result (ret)

<a id="l00400" name="l00400"></a> 400 import :: [sysccelldataf](structfortran_1_1sysccelldataf.xhtml)

<a id="l00401" name="l00401"></a> 401 type(SyscCellDataF) :: ret

<a id="l00402" name="l00402"></a> 402!DIR$ IF DEFINED(\_WIN32) .and. ( .not. DEFINED(SYSTEM\_COUPLING\_PARTICIPANT\_PROXY))

<a id="l00403" name="l00403"></a> 403!DIR$ ATTRIBUTES DLLIMPORT :: syscGetCellDataF

<a id="l00404" name="l00404"></a> 404!DIR$ ENDIF

<a id="l00405" name="l00405"></a> 405end function [syscgetcelldataf](interfacefortran_1_1syscgetcelldataf.xhtml)

<a id="l00406" name="l00406"></a> 406!

<a id="l00407" name="l00407"></a> 407!\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a id="l00408" name="l00408"></a> 408!! \\brief Create a mesh cell data access struct.

<a id="l00409" name="l00409"></a> 409!\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a id="l00410" name="l00410"></a> 410function syscgetfacedataf_i(cellIds) result (ret)

<a id="l00411" name="l00411"></a> 411!

<a id="l00412" name="l00412"></a> 412 import :: [sysccelldataf](structfortran_1_1sysccelldataf.xhtml), [syscelementiddataf](structfortran_1_1syscelementiddataf.xhtml)

<a id="l00413" name="l00413"></a> 413 type(SyscElementIdDataF), intent(in) :: cellIds

<a id="l00414" name="l00414"></a> 414 type(SyscCellDataF) :: ret

<a id="l00415" name="l00415"></a> 415!

<a id="l00416" name="l00416"></a> 416!DIR$ IF DEFINED(\_WIN32) .and. ( .not. DEFINED(SYSTEM\_COUPLING\_PARTICIPANT\_PROXY))

<a id="l00417" name="l00417"></a> 417!DIR$ ATTRIBUTES DLLIMPORT :: syscGetFaceDataF\_I

<a id="l00418" name="l00418"></a> 418!DIR$ ENDIF

<a id="l00419" name="l00419"></a> 419!

<a id="l00420" name="l00420"></a> 420end function syscgetfacedataf_i

<a id="l00421" name="l00421"></a> 421!

<a id="l00422" name="l00422"></a> 422!\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a id="l00423" name="l00423"></a> 423!! \\brief Create a mesh cell data access struct.

<a id="l00424" name="l00424"></a> 424!\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a id="l00425" name="l00425"></a> 425function syscgetfacedataf_tn(cellTypes, &amp;

<a id="l00426" name="l00426"></a> 426 cellNodeConnectivity) result (ret)

<a id="l00427" name="l00427"></a> 427!

<a id="l00428" name="l00428"></a> 428 import :: [sysccelldataf](structfortran_1_1sysccelldataf.xhtml), [syscelementtypedataf](structfortran_1_1syscelementtypedataf.xhtml), &amp;

<a id="l00429" name="l00429"></a> 429 [syscelementnodeconnectivitydataf](structfortran_1_1syscelementnodeconnectivitydataf.xhtml)

<a id="l00430" name="l00430"></a> 430 type(SyscElementTypeDataF), intent(in) :: cellTypes

<a id="l00431" name="l00431"></a> 431 type(SyscElementNodeConnectivityDataF), intent(in) :: &amp;

<a id="l00432" name="l00432"></a> 432 cellNodeConnectivity

<a id="l00433" name="l00433"></a> 433 type(SyscCellDataF) :: ret

<a id="l00434" name="l00434"></a> 434!

<a id="l00435" name="l00435"></a> 435!DIR$ IF DEFINED(\_WIN32) .and. ( .not. DEFINED(SYSTEM\_COUPLING\_PARTICIPANT\_PROXY))

<a id="l00436" name="l00436"></a> 436!DIR$ ATTRIBUTES DLLIMPORT :: syscGetFaceDataF\_TN

<a id="l00437" name="l00437"></a> 437!DIR$ ENDIF

<a id="l00438" name="l00438"></a> 438!

<a id="l00439" name="l00439"></a> 439end function syscgetfacedataf_tn

<a id="l00440" name="l00440"></a> 440!



<a id="l00441" name="l00441"></a> 441end interface [syscgetcelldataf](interfacefortran_1_1syscgetcelldataf.xhtml)

<a id="l00442" name="l00442"></a> 442!

<a id="l00443" name="l00443"></a> 443end module fortran

[fortran::syscgetcelldataf](interfacefortran_1_1syscgetcelldataf.xhtml)

**Definition** [syscMeshDefinitionF.fi:391](syscMeshDefinitionF_8fi_source.xhtml#l00391)



[fortran::syscgetcelliddataf](interfacefortran_1_1syscgetcelliddataf.xhtml)

**Definition** [syscMeshDefinitionF.fi:250](syscMeshDefinitionF_8fi_source.xhtml#l00250)



[fortran::syscgetelementiddataf](interfacefortran_1_1syscgetelementiddataf.xhtml)

**Definition** [syscMeshDefinitionF.fi:284](syscMeshDefinitionF_8fi_source.xhtml#l00284)



[fortran::syscgetelementnodeconnectivitydataf](interfacefortran_1_1syscgetelementnodeconnectivitydataf.xhtml)

**Definition** [syscMeshDefinitionF.fi:176](syscMeshDefinitionF_8fi_source.xhtml#l00176)



[fortran::syscgetelementnodecountdataf](interfacefortran_1_1syscgetelementnodecountdataf.xhtml)

**Definition** [syscMeshDefinitionF.fi:140](syscMeshDefinitionF_8fi_source.xhtml#l00140)



[fortran::syscgetelementtypedataf](interfacefortran_1_1syscgetelementtypedataf.xhtml)

**Definition** [syscMeshDefinitionF.fi:101](syscMeshDefinitionF_8fi_source.xhtml#l00101)



[fortran::syscgetfacecellconnectivitydataf](interfacefortran_1_1syscgetfacecellconnectivitydataf.xhtml)

**Definition** [syscMeshDefinitionF.fi:213](syscMeshDefinitionF_8fi_source.xhtml#l00213)



[fortran::syscgetfacedataf](interfacefortran_1_1syscgetfacedataf.xhtml)

**Definition** [syscMeshDefinitionF.fi:323](syscMeshDefinitionF_8fi_source.xhtml#l00323)



[fortran::syscgetnodedataf](interfacefortran_1_1syscgetnodedataf.xhtml)

**Definition** [syscMeshDefinitionF.fi:31](syscMeshDefinitionF_8fi_source.xhtml#l00031)



[fortran::sysccelldataf](structfortran_1_1sysccelldataf.xhtml)

**Definition** [syscMeshDefinitionF.fi:384](syscMeshDefinitionF_8fi_source.xhtml#l00384)



[fortran::sysccelliddataf](structfortran_1_1sysccelliddataf.xhtml)

**Definition** [syscMeshDefinitionF.fi:245](syscMeshDefinitionF_8fi_source.xhtml#l00245)



[fortran::syscelementiddataf](structfortran_1_1syscelementiddataf.xhtml)

**Definition** [syscMeshDefinitionF.fi:279](syscMeshDefinitionF_8fi_source.xhtml#l00279)



[fortran::syscelementnodeconnectivitydataf](structfortran_1_1syscelementnodeconnectivitydataf.xhtml)

**Definition** [syscMeshDefinitionF.fi:171](syscMeshDefinitionF_8fi_source.xhtml#l00171)



[fortran::syscelementnodecountdataf](structfortran_1_1syscelementnodecountdataf.xhtml)

**Definition** [syscMeshDefinitionF.fi:135](syscMeshDefinitionF_8fi_source.xhtml#l00135)



[fortran::syscelementtypedataf](structfortran_1_1syscelementtypedataf.xhtml)

**Definition** [syscMeshDefinitionF.fi:96](syscMeshDefinitionF_8fi_source.xhtml#l00096)



[fortran::syscfacecellconnectivitydataf](structfortran_1_1syscfacecellconnectivitydataf.xhtml)

**Definition** [syscMeshDefinitionF.fi:207](syscMeshDefinitionF_8fi_source.xhtml#l00207)



[fortran::syscfacedataf](structfortran_1_1syscfacedataf.xhtml)

**Definition** [syscMeshDefinitionF.fi:314](syscMeshDefinitionF_8fi_source.xhtml#l00314)



[fortran::syscnodedataf](structfortran_1_1syscnodedataf.xhtml)

**Definition** [syscMeshDefinitionF.fi:25](syscMeshDefinitionF_8fi_source.xhtml#l00025)



[fortran::syscoutputintegerdataf](structfortran_1_1syscoutputintegerdataf.xhtml)

Provide an output integer data access type.

**Definition** [syscOutputIntegerDataF.fi:29](syscOutputIntegerDataF_8fi_source.xhtml#l00029)



[fortran::syscoutputvectordataf](structfortran_1_1syscoutputvectordataf.xhtml)

Create an output vector data access type.

**Definition** [syscOutputVectorDataF.fi:31](syscOutputVectorDataF_8fi_source.xhtml#l00031)