## On this page

  

 

 # syscSurfaceMeshF

 Last update: 17.07.2025 

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

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

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

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

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

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

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

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

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

<a name="l00010"></a> 10 !

<a name="l00015"></a>[ 15](structfortran_1_1syscsurfacemeshf.xhtml) type :: [syscsurfacemeshf](structfortran_1_1syscsurfacemeshf.xhtml)

<a name="l00016"></a>[ 16](structfortran_1_1syscsurfacemeshf.xhtml#a9ce996d7ce626bd972c2fe728972b2bd) type([syscnodedataf](structfortran_1_1syscnodedataf.xhtml)) :: nodes

<a name="l00017"></a> 17 

<a name="l00018"></a>[ 18](structfortran_1_1syscsurfacemeshf.xhtml#aa4c13b40a8b3c4dc57890e2f7d16e18d) type([syscelementtypedataf](structfortran_1_1syscelementtypedataf.xhtml)) :: elemtypes

<a name="l00019"></a> 19 

<a name="l00020"></a>[ 20](structfortran_1_1syscsurfacemeshf.xhtml#a3b72f19f2839c6e886262e06169bd7a6) type([syscelementnodecountdataf](structfortran_1_1syscelementnodecountdataf.xhtml)) :: elemnodecounts

<a name="l00021"></a> 21 

<a name="l00022"></a>[ 22](structfortran_1_1syscsurfacemeshf.xhtml#a9290f7f869ea24a59042049afd7ec878) type([syscelementnodeconnectivitydataf](structfortran_1_1syscelementnodeconnectivitydataf.xhtml)) :: elemnodeconnectivity

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

<a name="l00024"></a> 24 end type [syscsurfacemeshf](structfortran_1_1syscsurfacemeshf.xhtml)

<a name="l00025"></a> 25 !

<a name="l00026"></a> 26 !\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a name="l00028"></a> 28 !\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a name="l00029"></a>[ 29](interfacefortran_1_1syscgetsurfacemeshf.xhtml) interface [syscgetsurfacemeshf](interfacefortran_1_1syscgetsurfacemeshf.xhtml)

<a name="l00030"></a> 30 !

<a name="l00031"></a> 31 !\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a name="l00036"></a> 36 !\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a name="l00037"></a>[ 37](interfacefortran_1_1syscgetsurfacemeshf.xhtml#a4ef0ff3b7efc57e9ae1f8e79dbd65838) function [syscgetsurfacemeshf](interfacefortran_1_1syscgetsurfacemeshf.xhtml)() result (ret)

<a name="l00038"></a> 38 import :: [syscsurfacemeshf](structfortran_1_1syscsurfacemeshf.xhtml)

<a name="l00039"></a> 39 type([syscsurfacemeshf](structfortran_1_1syscsurfacemeshf.xhtml)) :: ret

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

<a name="l00041"></a> 41 !DIR$ ATTRIBUTES DLLIMPORT :: syscGetSurfaceMeshF

<a name="l00042"></a> 42 !DIR$ ENDIF

<a name="l00043"></a> 43 end function [syscgetsurfacemeshf](interfacefortran_1_1syscgetsurfacemeshf.xhtml)

<a name="l00044"></a> 44 !

<a name="l00045"></a> 45 !\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a name="l00052"></a> 52 !\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a name="l00053"></a>[ 53](interfacefortran_1_1syscgetsurfacemeshf.xhtml#abe50f734fb16ce0550b03bb673c96e9d) function syscgetsurfacemeshf_nf(nodes, faces) result (ret)

<a name="l00054"></a> 54 import :: [syscsurfacemeshf](structfortran_1_1syscsurfacemeshf.xhtml), [syscnodedataf](structfortran_1_1syscnodedataf.xhtml), [syscfacedataf](structfortran_1_1syscfacedataf.xhtml)

<a name="l00055"></a> 55 type([syscnodedataf](structfortran_1_1syscnodedataf.xhtml)), intent(in) :: nodes

<a name="l00056"></a> 56 type([syscfacedataf](structfortran_1_1syscfacedataf.xhtml)), intent(in) :: faces

<a name="l00057"></a> 57 type([syscsurfacemeshf](structfortran_1_1syscsurfacemeshf.xhtml)) :: ret

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

<a name="l00059"></a> 59 !DIR$ ATTRIBUTES DLLIMPORT :: syscGetSurfaceMeshF\_NF

<a name="l00060"></a> 60 !DIR$ ENDIF

<a name="l00061"></a> 61 end function syscgetsurfacemeshf_nf

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

<a name="l00063"></a> 63 !\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a name="l00073"></a> 73 !\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a name="l00074"></a>[ 74](interfacefortran_1_1syscgetsurfacemeshf.xhtml#ade13fcbec56cc5825f733dbd7e95dc83) function syscgetsurfacemeshf_ntci(&amp;

<a name="l00075"></a> 75 nodes,&amp;

<a name="l00076"></a> 76 elemTypes,&amp;

<a name="l00077"></a> 77 elemNodeCounts,&amp;

<a name="l00078"></a> 78 elemNodeConn) result (ret)

<a name="l00079"></a> 79 import :: [syscsurfacemeshf](structfortran_1_1syscsurfacemeshf.xhtml), [syscnodedataf](structfortran_1_1syscnodedataf.xhtml), [syscelementtypedataf](structfortran_1_1syscelementtypedataf.xhtml), &amp;

<a name="l00080"></a> 80 [syscelementnodecountdataf](structfortran_1_1syscelementnodecountdataf.xhtml), [syscelementnodeconnectivitydataf](structfortran_1_1syscelementnodeconnectivitydataf.xhtml)

<a name="l00081"></a> 81 type([syscnodedataf](structfortran_1_1syscnodedataf.xhtml)), intent(in) :: nodes

<a name="l00082"></a> 82 type([syscelementtypedataf](structfortran_1_1syscelementtypedataf.xhtml)), intent(in) :: elemtypes

<a name="l00083"></a> 83 type([syscelementnodecountdataf](structfortran_1_1syscelementnodecountdataf.xhtml)), intent(in) :: elemnodecounts

<a name="l00084"></a> 84 type([syscelementnodeconnectivitydataf](structfortran_1_1syscelementnodeconnectivitydataf.xhtml)), intent(in) :: elemnodeconn

<a name="l00085"></a> 85 type([syscsurfacemeshf](structfortran_1_1syscsurfacemeshf.xhtml)) :: ret

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

<a name="l00087"></a> 87 !DIR$ ATTRIBUTES DLLIMPORT :: syscGetSurfaceMeshF\_NTCI

<a name="l00088"></a> 88 !DIR$ ENDIF

<a name="l00089"></a> 89 end function syscgetsurfacemeshf_ntci

<a name="l00090"></a> 90 !

<a name="l00091"></a> 91 !\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a name="l00099"></a> 99 !\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a name="l00100"></a>[ 100](interfacefortran_1_1syscgetsurfacemeshf.xhtml#a6a21b652341e9634fb6792178b9497be) function syscgetsurfacemeshf_nci(&amp;

<a name="l00101"></a> 101 nodes,&amp;

<a name="l00102"></a> 102 elemNodeCounts,&amp;

<a name="l00103"></a> 103 elemNodeConn) result (ret)

<a name="l00104"></a> 104 import :: [syscsurfacemeshf](structfortran_1_1syscsurfacemeshf.xhtml), [syscnodedataf](structfortran_1_1syscnodedataf.xhtml), &amp;

<a name="l00105"></a> 105 [syscelementnodecountdataf](structfortran_1_1syscelementnodecountdataf.xhtml), [syscelementnodeconnectivitydataf](structfortran_1_1syscelementnodeconnectivitydataf.xhtml)

<a name="l00106"></a> 106 type([syscnodedataf](structfortran_1_1syscnodedataf.xhtml)), intent(in) :: nodes

<a name="l00107"></a> 107 type([syscelementnodecountdataf](structfortran_1_1syscelementnodecountdataf.xhtml)), intent(in) :: elemnodecounts

<a name="l00108"></a> 108 type([syscelementnodeconnectivitydataf](structfortran_1_1syscelementnodeconnectivitydataf.xhtml)), intent(in) :: elemnodeconn

<a name="l00109"></a> 109 type([syscsurfacemeshf](structfortran_1_1syscsurfacemeshf.xhtml)) :: ret

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

<a name="l00111"></a> 111 !DIR$ ATTRIBUTES DLLIMPORT :: syscGetSurfaceMeshF\_NCI

<a name="l00112"></a> 112 !DIR$ ENDIF

<a name="l00113"></a> 113 end function syscgetsurfacemeshf_nci

<a name="l00114"></a> 114 !

<a name="l00115"></a> 115 !\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a name="l00123"></a> 123 !\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a name="l00124"></a>[ 124](interfacefortran_1_1syscgetsurfacemeshf.xhtml#aa2aeb30b4effcd2ce4ef38dd87499f0f) function syscgetsurfacemeshf_nti(&amp;

<a name="l00125"></a> 125 nodes,&amp;

<a name="l00126"></a> 126 elemTypes,&amp;

<a name="l00127"></a> 127 elemNodeConn) result (ret)

<a name="l00128"></a> 128 import :: [syscsurfacemeshf](structfortran_1_1syscsurfacemeshf.xhtml), [syscnodedataf](structfortran_1_1syscnodedataf.xhtml), [syscelementtypedataf](structfortran_1_1syscelementtypedataf.xhtml), &amp;

<a name="l00129"></a> 129 [syscelementnodeconnectivitydataf](structfortran_1_1syscelementnodeconnectivitydataf.xhtml)

<a name="l00130"></a> 130 type([syscnodedataf](structfortran_1_1syscnodedataf.xhtml)), intent(in) :: nodes

<a name="l00131"></a> 131 type([syscelementtypedataf](structfortran_1_1syscelementtypedataf.xhtml)), intent(in) :: elemtypes

<a name="l00132"></a> 132 type([syscelementnodeconnectivitydataf](structfortran_1_1syscelementnodeconnectivitydataf.xhtml)), intent(in) :: elemnodeconn

<a name="l00133"></a> 133 type([syscsurfacemeshf](structfortran_1_1syscsurfacemeshf.xhtml)) :: ret

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

<a name="l00135"></a> 135 !DIR$ ATTRIBUTES DLLIMPORT :: syscGetSurfaceMeshF\_NTI

<a name="l00136"></a> 136 !DIR$ ENDIF

<a name="l00137"></a> 137 end function syscgetsurfacemeshf_nti

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

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

<a name="l00154"></a> 154 !\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a name="l00155"></a>[ 155](interfacefortran_1_1syscgetsurfacemeshf.xhtml#ab5f9ab028c6786eb0912d0818a4cb23b) function syscgetsurfacemeshf_a(&amp;

<a name="l00156"></a> 156 nodeIds,&amp;

<a name="l00157"></a> 157 nodeCoords,&amp;

<a name="l00158"></a> 158 elemNodeCounts,&amp;

<a name="l00159"></a> 159 elemNodeIds) result (ret)

<a name="l00160"></a> 160 import :: [syscsurfacemeshf](structfortran_1_1syscsurfacemeshf.xhtml)

<a name="l00161"></a> 161 import :: [syscoutputscalardataf](structfortran_1_1syscoutputscalardataf.xhtml)

<a name="l00162"></a> 162 import :: [syscoutputvectordataf](structfortran_1_1syscoutputvectordataf.xhtml)

<a name="l00163"></a> 163 type([syscoutputscalardataf](structfortran_1_1syscoutputscalardataf.xhtml)), intent(in) :: nodeids

<a name="l00164"></a> 164 type([syscoutputvectordataf](structfortran_1_1syscoutputvectordataf.xhtml)), intent(in) :: nodecoords

<a name="l00165"></a> 165 type([syscoutputscalardataf](structfortran_1_1syscoutputscalardataf.xhtml)), intent(in) :: elemnodecounts

<a name="l00166"></a> 166 type([syscoutputscalardataf](structfortran_1_1syscoutputscalardataf.xhtml)), intent(in) :: elemnodeids

<a name="l00167"></a> 167 type([syscsurfacemeshf](structfortran_1_1syscsurfacemeshf.xhtml)) :: ret

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

<a name="l00169"></a> 169 !DIR$ ATTRIBUTES DLLIMPORT :: syscGetSurfaceMeshF\_A

<a name="l00170"></a> 170 !DIR$ ENDIF

<a name="l00171"></a> 171 end function syscgetsurfacemeshf_a

<a name="l00172"></a> 172 !

<a name="l00173"></a> 173 !\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a name="l00186"></a> 186 !\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a name="l00187"></a>[ 187](interfacefortran_1_1syscgetsurfacemeshf.xhtml#a7182edb45db6be1686ec89ac95eb16cd) function syscgetsurfacemeshf_b(&amp;

<a name="l00188"></a> 188 nodeCoords,&amp;

<a name="l00189"></a> 189 elemNodeCounts,&amp;

<a name="l00190"></a> 190 elemNodeIds) result (ret)

<a name="l00191"></a> 191 import :: [syscsurfacemeshf](structfortran_1_1syscsurfacemeshf.xhtml)

<a name="l00192"></a> 192 import :: [syscoutputscalardataf](structfortran_1_1syscoutputscalardataf.xhtml)

<a name="l00193"></a> 193 import :: [syscoutputvectordataf](structfortran_1_1syscoutputvectordataf.xhtml)

<a name="l00194"></a> 194 type([syscoutputvectordataf](structfortran_1_1syscoutputvectordataf.xhtml)), intent(in) :: nodecoords

<a name="l00195"></a> 195 type([syscoutputscalardataf](structfortran_1_1syscoutputscalardataf.xhtml)), intent(in) :: elemnodecounts

<a name="l00196"></a> 196 type([syscoutputscalardataf](structfortran_1_1syscoutputscalardataf.xhtml)), intent(in) :: elemnodeids

<a name="l00197"></a> 197 type([syscsurfacemeshf](structfortran_1_1syscsurfacemeshf.xhtml)) :: ret

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

<a name="l00199"></a> 199 !DIR$ ATTRIBUTES DLLIMPORT :: syscGetSurfaceMeshF\_B

<a name="l00200"></a> 200 !DIR$ ENDIF

<a name="l00201"></a> 201 end function syscgetsurfacemeshf_b

<a name="l00202"></a> 202 !

<a name="l00203"></a> 203 end interface [syscgetsurfacemeshf](interfacefortran_1_1syscgetsurfacemeshf.xhtml)

<a name="l00204"></a> 204 !

<a name="l00205"></a> 205 end module fortran

[fortran::syscgetsurfacemeshf](interfacefortran_1_1syscgetsurfacemeshf.xhtml)

Provide an interface to get surface mesh.

**Definition:** [syscSurfaceMeshF.fi:29](syscSurfaceMeshF_8fi_source.xhtml#l00029)



[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::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::syscoutputscalardataf](structfortran_1_1syscoutputscalardataf.xhtml)

Provide an output scalar data access type.

**Definition:** [syscOutputScalarDataF.fi:25](syscOutputScalarDataF_8fi_source.xhtml#l00025)



[fortran::syscoutputvectordataf](structfortran_1_1syscoutputvectordataf.xhtml)

Create an output vector data access type.

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



[fortran::syscsurfacemeshf](structfortran_1_1syscsurfacemeshf.xhtml)

Provide a surface mesh access type.

**Definition:** [syscSurfaceMeshF.fi:15](syscSurfaceMeshF_8fi_source.xhtml#l00015)