## On this page

  

 

 # syscOutputVectorDataF

 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="l00031"></a>[ 31](structfortran_1_1syscoutputvectordataf.xhtml) type :: [syscoutputvectordataf](structfortran_1_1syscoutputvectordataf.xhtml)

<a name="l00032"></a>[ 32](structfortran_1_1syscoutputvectordataf.xhtml#a41aa641a12e238b3d8a12707aa047938) integer(kind=8) :: primitivetype

<a name="l00033"></a>[ 33](structfortran_1_1syscoutputvectordataf.xhtml#a9ff86b31b305de4d1722dd390eb413d6) integer(kind=8) :: dataptr1

<a name="l00034"></a>[ 34](structfortran_1_1syscoutputvectordataf.xhtml#a3f77c87d288879c34e8f04f2d1f0e159) integer(kind=8) :: dataptr2

<a name="l00035"></a>[ 35](structfortran_1_1syscoutputvectordataf.xhtml#a59296d314ebb802f9490fe430a0cd3d4) integer(kind=8) :: dataptr3

<a name="l00036"></a>[ 36](structfortran_1_1syscoutputvectordataf.xhtml#ac8d11b0cadefc4f138b1ef4e0ab50b2a) integer(kind=8) :: datasize

<a name="l00037"></a>[ 37](structfortran_1_1syscoutputvectordataf.xhtml#a86ac613c1baf4a60d347742b387bb8e4) integer(kind=8) :: dimension

<a name="l00038"></a> 38 end type [syscoutputvectordataf](structfortran_1_1syscoutputvectordataf.xhtml)

<a name="l00039"></a> 39 !

<a name="l00040"></a> 40 !\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a name="l00042"></a> 42 !\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a name="l00043"></a>[ 43](interfacefortran_1_1syscgetoutputvectordataf.xhtml) interface [syscgetoutputvectordataf](interfacefortran_1_1syscgetoutputvectordataf.xhtml)

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

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

<a name="l00051"></a> 51 !\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a name="l00052"></a>[ 52](interfacefortran_1_1syscgetoutputvectordataf.xhtml#ab48ad870ee7444be74d20c7015b65923) function [syscgetoutputvectordataf](interfacefortran_1_1syscgetoutputvectordataf.xhtml)() result (ret)

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

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

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

<a name="l00056"></a> 56 !DIR$ ATTRIBUTES DLLIMPORT :: syscGetOutputVectorDataF

<a name="l00057"></a> 57 !DIR$ ENDIF

<a name="l00058"></a> 58 end function [syscgetoutputvectordataf](interfacefortran_1_1syscgetoutputvectordataf.xhtml)

<a name="l00059"></a> 59 !

<a name="l00060"></a> 60 end interface [syscgetoutputvectordataf](interfacefortran_1_1syscgetoutputvectordataf.xhtml)

<a name="l00061"></a> 61 !

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

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

<a name="l00066"></a>[ 66](interfacefortran_1_1syscgetoutputvectordatasplitf.xhtml) interface [syscgetoutputvectordatasplitf](interfacefortran_1_1syscgetoutputvectordatasplitf.xhtml)

<a name="l00067"></a> 67 !

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

<a name="l00075"></a> 75 !\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a name="l00076"></a>[ 76](interfacefortran_1_1syscgetoutputvectordatasplitf.xhtml#a7c3c0f6b9e239fdc0ec4258ce854c92f) function syscgetoutputvectordatasplitf_r43a(&amp;

<a name="l00077"></a> 77 data0, data1, data2, dataSize) result (ret)

<a name="l00078"></a> 78 !

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

<a name="l00080"></a> 80 integer(kind=8), intent(in) :: datasize 

<a name="l00081"></a> 81  real(kind=4), intent(in), target :: data0(datasize)

<a name="l00082"></a> 82  real(kind=4), intent(in), target :: data1(datasize)

<a name="l00083"></a> 83  real(kind=4), intent(in), target :: data2(datasize)

<a name="l00084"></a> 84 type([syscoutputvectordataf](structfortran_1_1syscoutputvectordataf.xhtml)) :: ret

<a name="l00085"></a> 85 !

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

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

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

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

<a name="l00090"></a> 90 end function syscgetoutputvectordatasplitf_r43a

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

<a name="l00092"></a> 92 !\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

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

<a name="l00100"></a>[ 100](interfacefortran_1_1syscgetoutputvectordatasplitf.xhtml#a43e775dde9ec32a773813c2704ef7ad7) function syscgetoutputvectordatasplitf_r83a(&amp;

<a name="l00101"></a> 101 data0, data1, data2, dataSize) result (ret)

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

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

<a name="l00104"></a> 104 integer(kind=8), intent(in) :: datasize 

<a name="l00105"></a> 105  real(kind=8), intent(in), target :: data0(datasize)

<a name="l00106"></a> 106  real(kind=8), intent(in), target :: data1(datasize)

<a name="l00107"></a> 107  real(kind=8), intent(in), target :: data2(datasize)

<a name="l00108"></a> 108 type([syscoutputvectordataf](structfortran_1_1syscoutputvectordataf.xhtml)) :: ret

<a name="l00109"></a> 109 !

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

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

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

<a name="l00113"></a> 113 !

<a name="l00114"></a> 114 end function syscgetoutputvectordatasplitf_r83a

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

<a name="l00116"></a> 116 !\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a name="l00121"></a> 121 !\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a name="l00122"></a>[ 122](interfacefortran_1_1syscgetoutputvectordatasplitf.xhtml#adf74c91be8f957f17695d7ce6f0cd283) function syscgetoutputvectordatasplitf_r42d(data, dataSize)&amp;

<a name="l00123"></a> 123 result(ret)

<a name="l00124"></a> 124 !

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

<a name="l00126"></a> 126 integer(kind=8), intent(in) :: datasize

<a name="l00127"></a> 127  real(kind=4), intent(in), target :: data(datasize, 3)

<a name="l00128"></a> 128 type([syscoutputvectordataf](structfortran_1_1syscoutputvectordataf.xhtml)) :: ret

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

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

<a name="l00131"></a> 131 !DIR$ ATTRIBUTES DLLIMPORT :: syscGetOutputVectorDataSplitF\_R42D

<a name="l00132"></a> 132 !DIR$ ENDIF

<a name="l00133"></a> 133 !

<a name="l00134"></a> 134 end function syscgetoutputvectordatasplitf_r42d

<a name="l00135"></a> 135 !

<a name="l00136"></a> 136 !\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

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

<a name="l00142"></a>[ 142](interfacefortran_1_1syscgetoutputvectordatasplitf.xhtml#a5c4fdc29443558a0cdf0341af36eea73) function syscgetoutputvectordatasplitf_r82d(vals, nElems) result (ret)

<a name="l00143"></a> 143 !

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

<a name="l00145"></a> 145 integer(kind=8), intent(in) :: nelems 

<a name="l00146"></a> 146  real(kind=8), intent(in), target :: vals(nelems, 3)

<a name="l00147"></a> 147 type([syscoutputvectordataf](structfortran_1_1syscoutputvectordataf.xhtml)) :: ret

<a name="l00148"></a> 148 !

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

<a name="l00150"></a> 150 !DIR$ ATTRIBUTES DLLIMPORT :: syscGetOutputVectorDataSplitF\_R82D

<a name="l00151"></a> 151 !DIR$ ENDIF

<a name="l00152"></a> 152 !

<a name="l00153"></a> 153 end function syscgetoutputvectordatasplitf_r82d

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

<a name="l00155"></a> 155 end interface [syscgetoutputvectordatasplitf](interfacefortran_1_1syscgetoutputvectordatasplitf.xhtml)

<a name="l00156"></a> 156 !

<a name="l00157"></a> 157 !\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a name="l00160"></a> 160 !\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a name="l00161"></a>[ 161](interfacefortran_1_1syscgetoutput2dvectordatasplitf.xhtml) interface [syscgetoutput2dvectordatasplitf](interfacefortran_1_1syscgetoutput2dvectordatasplitf.xhtml)

<a name="l00162"></a> 162 !

<a name="l00163"></a> 163 !\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a name="l00169"></a> 169 !\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a name="l00170"></a>[ 170](interfacefortran_1_1syscgetoutput2dvectordatasplitf.xhtml#ae1bd1817d8aacbf3a4ad1485fbc30cff) function syscgetoutput2dvectordatasplitf_r43a(&amp;

<a name="l00171"></a> 171 data0, data1, dataSize) result (ret)

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

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

<a name="l00174"></a> 174 integer(kind=8), intent(in) :: datasize 

<a name="l00175"></a> 175  real(kind=4), intent(in), target :: data0(datasize)

<a name="l00176"></a> 176  real(kind=4), intent(in), target :: data1(datasize)

<a name="l00177"></a> 177 type([syscoutputvectordataf](structfortran_1_1syscoutputvectordataf.xhtml)) :: ret

<a name="l00178"></a> 178 !

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

<a name="l00180"></a> 180 !DIR$ ATTRIBUTES DLLIMPORT :: syscGetOutput2DVectorDataSplitF\_R43A

<a name="l00181"></a> 181 !DIR$ ENDIF

<a name="l00182"></a> 182 !

<a name="l00183"></a> 183 end function syscgetoutput2dvectordatasplitf_r43a

<a name="l00184"></a> 184 !

<a name="l00185"></a> 185 !\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

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

<a name="l00192"></a>[ 192](interfacefortran_1_1syscgetoutput2dvectordatasplitf.xhtml#a3c044606dc8a679c2de08682ab149ea0) function syscgetoutput2dvectordatasplitf_r83a(&amp;

<a name="l00193"></a> 193 data0, data1, dataSize) result (ret)

<a name="l00194"></a> 194 !

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

<a name="l00196"></a> 196 integer(kind=8), intent(in) :: datasize 

<a name="l00197"></a> 197  real(kind=8), intent(in), target :: data0(datasize)

<a name="l00198"></a> 198  real(kind=8), intent(in), target :: data1(datasize)

<a name="l00199"></a> 199 type([syscoutputvectordataf](structfortran_1_1syscoutputvectordataf.xhtml)) :: ret

<a name="l00200"></a> 200 !

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

<a name="l00202"></a> 202 !DIR$ ATTRIBUTES DLLIMPORT :: syscGetOutput2DVectorDataSplitF\_R83A

<a name="l00203"></a> 203 !DIR$ ENDIF

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

<a name="l00205"></a> 205 end function syscgetoutput2dvectordatasplitf_r83a

<a name="l00206"></a> 206 !

<a name="l00207"></a> 207 !\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

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

<a name="l00213"></a>[ 213](interfacefortran_1_1syscgetoutput2dvectordatasplitf.xhtml#aae4748249980002e1001566dc31bed22) function syscgetoutput2dvectordatasplitf_r42d(data, dataSize)&amp;

<a name="l00214"></a> 214 result(ret)

<a name="l00215"></a> 215 !

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

<a name="l00217"></a> 217 integer(kind=8), intent(in) :: datasize

<a name="l00218"></a> 218  real(kind=4), intent(in), target :: data(datasize, 2)

<a name="l00219"></a> 219 type([syscoutputvectordataf](structfortran_1_1syscoutputvectordataf.xhtml)) :: ret

<a name="l00220"></a> 220 !

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

<a name="l00222"></a> 222 !DIR$ ATTRIBUTES DLLIMPORT :: syscGetOutput2DVectorDataSplitF\_R42D

<a name="l00223"></a> 223 !DIR$ ENDIF

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

<a name="l00225"></a> 225 end function syscgetoutput2dvectordatasplitf_r42d

<a name="l00226"></a> 226 !

<a name="l00227"></a> 227 !\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a name="l00232"></a> 232 !\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a name="l00233"></a>[ 233](interfacefortran_1_1syscgetoutput2dvectordatasplitf.xhtml#ac99b343b8da6f274dba1f46a447fa20c) function syscgetoutput2dvectordatasplitf_r82d(vals, nElems) result (ret)

<a name="l00234"></a> 234 !

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

<a name="l00236"></a> 236 integer(kind=8), intent(in) :: nelems 

<a name="l00237"></a> 237  real(kind=8), intent(in), target :: vals(nelems, 2)

<a name="l00238"></a> 238 type([syscoutputvectordataf](structfortran_1_1syscoutputvectordataf.xhtml)) :: ret

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

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

<a name="l00241"></a> 241 !DIR$ ATTRIBUTES DLLIMPORT :: syscGetOutput2DVectorDataSplitF\_R82D

<a name="l00242"></a> 242 !DIR$ ENDIF

<a name="l00243"></a> 243 !

<a name="l00244"></a> 244 end function syscgetoutput2dvectordatasplitf_r82d

<a name="l00245"></a> 245 !

<a name="l00246"></a> 246 end interface [syscgetoutput2dvectordatasplitf](interfacefortran_1_1syscgetoutput2dvectordatasplitf.xhtml)

<a name="l00247"></a> 247 !

<a name="l00248"></a> 248 !\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

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

<a name="l00252"></a>[ 252](interfacefortran_1_1syscgetoutputvectordatacompactf.xhtml) interface [syscgetoutputvectordatacompactf](interfacefortran_1_1syscgetoutputvectordatacompactf.xhtml)

<a name="l00253"></a> 253 !

<a name="l00254"></a> 254 !\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a name="l00260"></a> 260 !\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a name="l00261"></a>[ 261](interfacefortran_1_1syscgetoutputvectordatacompactf.xhtml#acdc5b43f5414f5ff41ed4863817f3913) function syscgetoutputvectordatacompactf_r41d(data, dataSize)&amp;

<a name="l00262"></a> 262 result(ret)

<a name="l00263"></a> 263 !

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

<a name="l00265"></a> 265 integer(kind=8), intent(in) :: datasize 

<a name="l00266"></a> 266  real(kind=4), intent(in), target :: data(datasize * 3)

<a name="l00267"></a> 267 type([syscoutputvectordataf](structfortran_1_1syscoutputvectordataf.xhtml)) :: ret

<a name="l00268"></a> 268 !

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

<a name="l00270"></a> 270 !DIR$ ATTRIBUTES DLLIMPORT :: syscGetOutputVectorDataCompactF\_R41D

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

<a name="l00272"></a> 272 !

<a name="l00273"></a> 273 end function syscgetoutputvectordatacompactf_r41d

<a name="l00274"></a> 274 !

<a name="l00275"></a> 275 !\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a name="l00281"></a> 281 !\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a name="l00282"></a>[ 282](interfacefortran_1_1syscgetoutputvectordatacompactf.xhtml#aa40e1e467345db621dc7880c70df817a) function syscgetoutputvectordatacompactf_r81d(data, dataSize)&amp;

<a name="l00283"></a> 283 result(ret)

<a name="l00284"></a> 284 !

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

<a name="l00286"></a> 286 integer(kind=8), intent(in) :: datasize 

<a name="l00287"></a> 287  real(kind=8), intent(in), target :: data(datasize * 3)

<a name="l00288"></a> 288 type([syscoutputvectordataf](structfortran_1_1syscoutputvectordataf.xhtml)) :: ret

<a name="l00289"></a> 289 !

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

<a name="l00291"></a> 291 !DIR$ ATTRIBUTES DLLIMPORT :: syscGetOutputVectorDataCompactF\_R81D

<a name="l00292"></a> 292 !DIR$ ENDIF

<a name="l00293"></a> 293 !

<a name="l00294"></a> 294 end function syscgetoutputvectordatacompactf_r81d

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

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

<a name="l00302"></a> 302 !\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a name="l00303"></a>[ 303](interfacefortran_1_1syscgetoutputvectordatacompactf.xhtml#a8c0cdd231f0e7965e6b8700e7ac6d6d4) function syscgetoutputvectordatacompactf_r42d(vals,nElems) result (ret)

<a name="l00304"></a> 304 !

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

<a name="l00306"></a> 306 integer(kind=8), intent(in) :: nelems 

<a name="l00307"></a> 307  real(kind=4), intent(in), target :: vals(3, nelems)

<a name="l00308"></a> 308 type([syscoutputvectordataf](structfortran_1_1syscoutputvectordataf.xhtml)) :: ret

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

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

<a name="l00311"></a> 311 !DIR$ ATTRIBUTES DLLIMPORT :: syscGetOutputVectorDataCompactF\_R42D

<a name="l00312"></a> 312 !DIR$ ENDIF

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

<a name="l00314"></a> 314 end function syscgetoutputvectordatacompactf_r42d

<a name="l00315"></a> 315 !

<a name="l00316"></a> 316 !\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

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

<a name="l00323"></a>[ 323](interfacefortran_1_1syscgetoutputvectordatacompactf.xhtml#a2ea4f2a47578c24d4e70576ad792840e) function syscgetoutputvectordatacompactf_r82d(vals,nElems) result (ret)

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

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

<a name="l00326"></a> 326 integer(kind=8), intent(in) :: nelems

<a name="l00327"></a> 327  real(kind=8), intent(in), target :: vals(3, nelems)

<a name="l00328"></a> 328 type([syscoutputvectordataf](structfortran_1_1syscoutputvectordataf.xhtml)) :: ret

<a name="l00329"></a> 329 !

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

<a name="l00331"></a> 331 !DIR$ ATTRIBUTES DLLIMPORT :: syscGetOutputVectorDataCompactF\_R82D

<a name="l00332"></a> 332 !DIR$ ENDIF

<a name="l00333"></a> 333 !

<a name="l00334"></a> 334 end function syscgetoutputvectordatacompactf_r82d

<a name="l00335"></a> 335 !

<a name="l00336"></a> 336 end interface [syscgetoutputvectordatacompactf](interfacefortran_1_1syscgetoutputvectordatacompactf.xhtml)

<a name="l00337"></a> 337 !

<a name="l00340"></a> 340 !\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a name="l00341"></a>[ 341](interfacefortran_1_1syscgetoutputvectordatacompactdimf.xhtml) interface [syscgetoutputvectordatacompactdimf](interfacefortran_1_1syscgetoutputvectordatacompactdimf.xhtml)

<a name="l00342"></a> 342 !

<a name="l00343"></a> 343 !\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a name="l00350"></a> 350 !\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a name="l00351"></a>[ 351](interfacefortran_1_1syscgetoutputvectordatacompactdimf.xhtml#aad1f52de474bf1aeec885d57e4bd097d) function syscgetoutputvectordatacompactdimf_r41d(data, dataSize, dimension)&amp;

<a name="l00352"></a> 352 result(ret)

<a name="l00353"></a> 353 !

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

<a name="l00355"></a> 355 integer(kind=8), intent(in) :: datasize 

<a name="l00356"></a> 356 integer(kind=8), intent(in) :: dimension 

<a name="l00357"></a> 357  real(kind=4), intent(in), target :: data(datasize * dimension)

<a name="l00358"></a> 358 type([syscoutputvectordataf](structfortran_1_1syscoutputvectordataf.xhtml)) :: ret

<a name="l00359"></a> 359 !

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

<a name="l00361"></a> 361 !DIR$ ATTRIBUTES DLLIMPORT :: syscGetOutputVectorDataCompactDimF\_R41D

<a name="l00362"></a> 362 !DIR$ ENDIF

<a name="l00363"></a> 363 !

<a name="l00364"></a> 364 end function syscgetoutputvectordatacompactdimf_r41d

<a name="l00365"></a> 365 !

<a name="l00366"></a> 366 !\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a name="l00373"></a> 373 !\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a name="l00374"></a>[ 374](interfacefortran_1_1syscgetoutputvectordatacompactdimf.xhtml#ae280ff8ac7fd97c342989d70030340ef) function syscgetoutputvectordatacompactdimf_r81d(data, dataSize, dimension)&amp;

<a name="l00375"></a> 375 result(ret)

<a name="l00376"></a> 376 !

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

<a name="l00378"></a> 378 integer(kind=8), intent(in) :: datasize 

<a name="l00379"></a> 379 integer(kind=8), intent(in) :: dimension 

<a name="l00380"></a> 380  real(kind=8), intent(in), target :: data(datasize * dimension)

<a name="l00381"></a> 381 type([syscoutputvectordataf](structfortran_1_1syscoutputvectordataf.xhtml)) :: ret

<a name="l00382"></a> 382 !

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

<a name="l00384"></a> 384 !DIR$ ATTRIBUTES DLLIMPORT :: syscGetOutputVectorDataCompactDimF\_R81D

<a name="l00385"></a> 385 !DIR$ ENDIF

<a name="l00386"></a> 386 !

<a name="l00387"></a> 387 end function syscgetoutputvectordatacompactdimf_r81d

<a name="l00388"></a> 388 !

<a name="l00389"></a> 389 !\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a name="l00396"></a> 396 !\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a name="l00397"></a>[ 397](interfacefortran_1_1syscgetoutputvectordatacompactdimf.xhtml#ac97fc60c227f8db5e1a65611003247ee) function syscgetoutputvectordatacompactdimf_r42d(vals,nElems, dimension) result (ret)

<a name="l00398"></a> 398 !

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

<a name="l00400"></a> 400 integer(kind=8), intent(in) :: nelems 

<a name="l00401"></a> 401 integer(kind=8), intent(in) :: dimension 

<a name="l00402"></a> 402  real(kind=4), intent(in), target :: vals(dimension, nelems)

<a name="l00403"></a> 403 type([syscoutputvectordataf](structfortran_1_1syscoutputvectordataf.xhtml)) :: ret

<a name="l00404"></a> 404 !

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

<a name="l00406"></a> 406 !DIR$ ATTRIBUTES DLLIMPORT :: syscGetOutputVectorDataCompactDimF\_R42D

<a name="l00407"></a> 407 !DIR$ ENDIF

<a name="l00408"></a> 408 !

<a name="l00409"></a> 409 end function syscgetoutputvectordatacompactdimf_r42d

<a name="l00410"></a> 410 !

<a name="l00411"></a> 411 !\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a name="l00418"></a> 418 !\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a name="l00419"></a>[ 419](interfacefortran_1_1syscgetoutputvectordatacompactdimf.xhtml#aa55a92ae3afcc6aeb3bc18a86fd654a5) function syscgetoutputvectordatacompactdimf_r82d(vals,nElems, dimension) result (ret)

<a name="l00420"></a> 420 !

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

<a name="l00422"></a> 422 integer(kind=8), intent(in) :: nelems

<a name="l00423"></a> 423 integer(kind=8), intent(in) :: dimension 

<a name="l00424"></a> 424  real(kind=8), intent(in), target :: vals(dimension, nelems)

<a name="l00425"></a> 425 type([syscoutputvectordataf](structfortran_1_1syscoutputvectordataf.xhtml)) :: ret

<a name="l00426"></a> 426 !

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

<a name="l00428"></a> 428 !DIR$ ATTRIBUTES DLLIMPORT :: syscGetOutputVectorDataCompactDimF\_R82D

<a name="l00429"></a> 429 !DIR$ ENDIF

<a name="l00430"></a> 430 !

<a name="l00431"></a> 431 end function syscgetoutputvectordatacompactdimf_r82d

<a name="l00432"></a> 432 !

<a name="l00433"></a> 433 end interface [syscgetoutputvectordatacompactdimf](interfacefortran_1_1syscgetoutputvectordatacompactdimf.xhtml)

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

<a name="l00435"></a> 435 end module fortran

[fortran::syscgetoutput2dvectordatasplitf](interfacefortran_1_1syscgetoutput2dvectordatasplitf.xhtml)

Provide an interface to get 2D output vector data with split storage.

**Definition:** [syscOutputVectorDataF.fi:161](syscOutputVectorDataF_8fi_source.xhtml#l00161)



[fortran::syscgetoutputvectordatacompactdimf](interfacefortran_1_1syscgetoutputvectordatacompactdimf.xhtml)

Provide an interface to get output vector data with compact storage based on dimension.

**Definition:** [syscOutputVectorDataF.fi:341](syscOutputVectorDataF_8fi_source.xhtml#l00341)



[fortran::syscgetoutputvectordatacompactf](interfacefortran_1_1syscgetoutputvectordatacompactf.xhtml)

Provide an interface to get output vector data with compact storage.

**Definition:** [syscOutputVectorDataF.fi:252](syscOutputVectorDataF_8fi_source.xhtml#l00252)



[fortran::syscgetoutputvectordataf](interfacefortran_1_1syscgetoutputvectordataf.xhtml)

Provide an interface to get output vector data.

**Definition:** [syscOutputVectorDataF.fi:43](syscOutputVectorDataF_8fi_source.xhtml#l00043)



[fortran::syscgetoutputvectordatasplitf](interfacefortran_1_1syscgetoutputvectordatasplitf.xhtml)

Provide an interface to get output vector data with split storage.

**Definition:** [syscOutputVectorDataF.fi:66](syscOutputVectorDataF_8fi_source.xhtml#l00066)



[fortran::syscoutputvectordataf](structfortran_1_1syscoutputvectordataf.xhtml)

Create an output vector data access type.

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