## On this page

  

 

 # syscPointCloudF

 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="l00011"></a> 11 ! \*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a name="l00012"></a>[ 12](structfortran_1_1syscpointcloudf.xhtml) type :: [syscpointcloudf](structfortran_1_1syscpointcloudf.xhtml)

<a name="l00013"></a>[ 13](structfortran_1_1syscpointcloudf.xhtml#a34207f80097afcc6f7e37b61187e604e) type([syscoutputintegerdataf](structfortran_1_1syscoutputintegerdataf.xhtml)) :: nodeids

<a name="l00014"></a>[ 14](structfortran_1_1syscpointcloudf.xhtml#ada1acb5d25c5ab0e62ade22161a73b14) type([syscoutputvectordataf](structfortran_1_1syscoutputvectordataf.xhtml)) :: nodecoords

<a name="l00015"></a> 15 end type [syscpointcloudf](structfortran_1_1syscpointcloudf.xhtml)

<a name="l00016"></a> 16 !

<a name="l00017"></a> 17 !\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a name="l00019"></a> 19 !\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a name="l00020"></a>[ 20](interfacefortran_1_1syscgetpointcloudf.xhtml) interface [syscgetpointcloudf](interfacefortran_1_1syscgetpointcloudf.xhtml)

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

<a name="l00022"></a> 22 !\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a name="l00024"></a> 24 !\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a name="l00025"></a>[ 25](interfacefortran_1_1syscgetpointcloudf.xhtml#a6b35486af7700d2b1882bc3999ee6532) function syscgetpointcloudf_empty() result (ret)

<a name="l00026"></a> 26 import :: [syscpointcloudf](structfortran_1_1syscpointcloudf.xhtml)

<a name="l00027"></a> 27 type([syscpointcloudf](structfortran_1_1syscpointcloudf.xhtml)) :: ret

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

<a name="l00029"></a> 29 !DIR$ ATTRIBUTES DLLIMPORT :: syscGetPointCloudF\_Empty

<a name="l00030"></a> 30 !DIR$ ENDIF

<a name="l00031"></a> 31 end function syscgetpointcloudf_empty

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

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

<a name="l00043"></a> 43 !\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a name="l00044"></a>[ 44](interfacefortran_1_1syscgetpointcloudf.xhtml#a9c8dc2d4d850a43b30daa744c6a58b9d) function [syscgetpointcloudf](interfacefortran_1_1syscgetpointcloudf.xhtml)(nodeIds, nodeCoords) result (ret)

<a name="l00045"></a> 45 import :: [syscpointcloudf](structfortran_1_1syscpointcloudf.xhtml), [syscoutputintegerdataf](structfortran_1_1syscoutputintegerdataf.xhtml), &amp;

<a name="l00046"></a> 46 [syscoutputvectordataf](structfortran_1_1syscoutputvectordataf.xhtml)

<a name="l00047"></a> 47 type([syscoutputintegerdataf](structfortran_1_1syscoutputintegerdataf.xhtml)), intent(in) :: nodeids

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

<a name="l00049"></a> 49 type([syscpointcloudf](structfortran_1_1syscpointcloudf.xhtml)) :: ret

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

<a name="l00051"></a> 51 !DIR$ ATTRIBUTES DLLIMPORT :: syscGetPointCloudF

<a name="l00052"></a> 52 !DIR$ ENDIF

<a name="l00053"></a> 53 end function [syscgetpointcloudf](interfacefortran_1_1syscgetpointcloudf.xhtml)

<a name="l00054"></a> 54 !

<a name="l00055"></a> 55 end interface [syscgetpointcloudf](interfacefortran_1_1syscgetpointcloudf.xhtml)

<a name="l00056"></a> 56 !

<a name="l00057"></a> 57 end module fortran

[fortran::syscgetpointcloudf](interfacefortran_1_1syscgetpointcloudf.xhtml)

Provide an interface to get point cloud.

**Definition:** [syscPointCloudF.fi:20](syscPointCloudF_8fi_source.xhtml#l00020)



[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)



[fortran::syscpointcloudf](structfortran_1_1syscpointcloudf.xhtml)

Provide a point cloud access type.

**Definition:** [syscPointCloudF.fi:12](syscPointCloudF_8fi_source.xhtml#l00012)