## On this page

  

 

 # syscInputVectorDataF

 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 2023 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!

<a id="l00031" name="l00031"></a>[ 31](structfortran_1_1syscinputvectordataf.xhtml)type :: [syscinputvectordataf](structfortran_1_1syscinputvectordataf.xhtml)

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

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

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

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

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

<a id="l00037" name="l00037"></a> 37end type [syscinputvectordataf](structfortran_1_1syscinputvectordataf.xhtml)

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

<a id="l00039" name="l00039"></a> 39!\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a id="l00041" name="l00041"></a> 41!\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a id="l00042" name="l00042"></a>[ 42](interfacefortran_1_1syscgetinputvectordataf.xhtml)interface [syscgetinputvectordataf](interfacefortran_1_1syscgetinputvectordataf.xhtml)

<a id="l00043" name="l00043"></a> 43!

<a id="l00044" name="l00044"></a> 44!\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

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

<a id="l00051" name="l00051"></a>[ 51](interfacefortran_1_1syscgetinputvectordataf.xhtml#aacb50f62f4cdfd7fb3cc871071170db7)function [syscgetinputvectordataf](interfacefortran_1_1syscgetinputvectordataf.xhtml)() result (ret)

<a id="l00052" name="l00052"></a> 52 import :: [syscinputvectordataf](structfortran_1_1syscinputvectordataf.xhtml)

<a id="l00053" name="l00053"></a> 53 type([syscinputvectordataf](structfortran_1_1syscinputvectordataf.xhtml)) :: ret

<a id="l00054" name="l00054"></a> 54!DIR$ IF DEFINED(\_WIN32)

<a id="l00055" name="l00055"></a> 55!DIR$ ATTRIBUTES DLLIMPORT :: syscGetInputVectorDataF

<a id="l00056" name="l00056"></a> 56!DIR$ ENDIF

<a id="l00057" name="l00057"></a> 57end function [syscgetinputvectordataf](interfacefortran_1_1syscgetinputvectordataf.xhtml)

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

<a id="l00059" name="l00059"></a> 59end interface [syscgetinputvectordataf](interfacefortran_1_1syscgetinputvectordataf.xhtml)

<a id="l00060" name="l00060"></a> 60!

<a id="l00061" name="l00061"></a> 61!\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

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

<a id="l00065" name="l00065"></a>[ 65](interfacefortran_1_1syscgetinputvectordatasplitf.xhtml)interface [syscgetinputvectordatasplitf](interfacefortran_1_1syscgetinputvectordatasplitf.xhtml)

<a id="l00066" name="l00066"></a> 66!

<a id="l00067" name="l00067"></a> 67!\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a id="l00074" name="l00074"></a> 74!\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a id="l00075" name="l00075"></a>[ 75](interfacefortran_1_1syscgetinputvectordatasplitf.xhtml#ab81781eff68f8449ad2bc30a8fa450dd)function syscgetinputvectordatasplitf_r43a(&amp;

<a id="l00076" name="l00076"></a> 76 data0, data1, data2, dataSize) result (ret)

<a id="l00077" name="l00077"></a> 77 import :: [syscinputvectordataf](structfortran_1_1syscinputvectordataf.xhtml)

<a id="l00078" name="l00078"></a> 78 integer(kind=8), intent(in) :: datasize 

<a id="l00079" name="l00079"></a> 79 real(kind=4), intent(in), target :: data0(datasize)

<a id="l00080" name="l00080"></a> 80 real(kind=4), intent(in), target :: data1(datasize)

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

<a id="l00082" name="l00082"></a> 82 type([syscinputvectordataf](structfortran_1_1syscinputvectordataf.xhtml)) :: ret

<a id="l00083" name="l00083"></a> 83!DIR$ IF DEFINED(\_WIN32)

<a id="l00084" name="l00084"></a> 84!DIR$ ATTRIBUTES DLLIMPORT :: syscGetInputVectorDataSplitF\_R43A

<a id="l00085" name="l00085"></a> 85!DIR$ ENDIF

<a id="l00086" name="l00086"></a> 86end function syscgetinputvectordatasplitf_r43a

<a id="l00087" name="l00087"></a> 87!

<a id="l00088" name="l00088"></a> 88!\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

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

<a id="l00096" name="l00096"></a>[ 96](interfacefortran_1_1syscgetinputvectordatasplitf.xhtml#a67b8a204cee3ad2e6ab75cc01cf1bf49)function syscgetinputvectordatasplitf_r83a(&amp;

<a id="l00097" name="l00097"></a> 97 data0, data1, data2, dataSize) result (ret)

<a id="l00098" name="l00098"></a> 98 import :: [syscinputvectordataf](structfortran_1_1syscinputvectordataf.xhtml)

<a id="l00099" name="l00099"></a> 99 integer(kind=8), intent(in) :: datasize 

<a id="l00100" name="l00100"></a> 100 real(kind=8), intent(in), target :: data0(datasize)

<a id="l00101" name="l00101"></a> 101 real(kind=8), intent(in), target :: data1(datasize)

<a id="l00102" name="l00102"></a> 102 real(kind=8), intent(in), target :: data2(datasize)

<a id="l00103" name="l00103"></a> 103 type([syscinputvectordataf](structfortran_1_1syscinputvectordataf.xhtml)) :: ret

<a id="l00104" name="l00104"></a> 104!DIR$ IF DEFINED(\_WIN32)

<a id="l00105" name="l00105"></a> 105!DIR$ ATTRIBUTES DLLIMPORT :: syscGetInputVectorDataSplitF\_R83A

<a id="l00106" name="l00106"></a> 106!DIR$ ENDIF

<a id="l00107" name="l00107"></a> 107end function syscgetinputvectordatasplitf_r83a

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

<a id="l00109" name="l00109"></a> 109!\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a id="l00114" name="l00114"></a> 114!\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a id="l00115" name="l00115"></a>[ 115](interfacefortran_1_1syscgetinputvectordatasplitf.xhtml#aad415cc2a63ce6d44c6b9d94f6b3bb33)function syscgetinputvectordatasplitf_r42d(data, dataSize) result(ret)

<a id="l00116" name="l00116"></a> 116 import :: [syscinputvectordataf](structfortran_1_1syscinputvectordataf.xhtml)

<a id="l00117" name="l00117"></a> 117 integer(kind=8), intent(in) :: datasize 

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

<a id="l00119" name="l00119"></a> 119 type([syscinputvectordataf](structfortran_1_1syscinputvectordataf.xhtml)) :: ret

<a id="l00120" name="l00120"></a> 120!DIR$ IF DEFINED(\_WIN32)

<a id="l00121" name="l00121"></a> 121!DIR$ ATTRIBUTES DLLIMPORT :: syscGetInputVectorDataSplitF\_R42D

<a id="l00122" name="l00122"></a> 122!DIR$ ENDIF

<a id="l00123" name="l00123"></a> 123end function syscgetinputvectordatasplitf_r42d

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

<a id="l00125" name="l00125"></a> 125!\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a id="l00130" name="l00130"></a> 130!\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a id="l00131" name="l00131"></a>[ 131](interfacefortran_1_1syscgetinputvectordatasplitf.xhtml#aa71c26494dc42c0e18e4e0feca308012)function syscgetinputvectordatasplitf_r82d(data, dataSize) result(ret)

<a id="l00132" name="l00132"></a> 132 import :: [syscinputvectordataf](structfortran_1_1syscinputvectordataf.xhtml)

<a id="l00133" name="l00133"></a> 133 integer(kind=8), intent(in) :: datasize 

<a id="l00134" name="l00134"></a> 134 real(kind=8), intent(in), target :: data(datasize, 3)

<a id="l00135" name="l00135"></a> 135 type([syscinputvectordataf](structfortran_1_1syscinputvectordataf.xhtml)) :: ret

<a id="l00136" name="l00136"></a> 136!DIR$ IF DEFINED(\_WIN32)

<a id="l00137" name="l00137"></a> 137!DIR$ ATTRIBUTES DLLIMPORT :: syscGetInputVectorDataSplitF\_R82D

<a id="l00138" name="l00138"></a> 138!DIR$ ENDIF

<a id="l00139" name="l00139"></a> 139end function syscgetinputvectordatasplitf_r82d

<a id="l00140" name="l00140"></a> 140!

<a id="l00141" name="l00141"></a> 141end interface [syscgetinputvectordatasplitf](interfacefortran_1_1syscgetinputvectordatasplitf.xhtml)

<a id="l00142" name="l00142"></a> 142!

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

<a id="l00146" name="l00146"></a> 146!\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a id="l00147" name="l00147"></a>[ 147](interfacefortran_1_1syscgetinputvectordatacompactf.xhtml)interface [syscgetinputvectordatacompactf](interfacefortran_1_1syscgetinputvectordatacompactf.xhtml)

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

<a id="l00149" name="l00149"></a> 149!\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

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

<a id="l00155" name="l00155"></a>[ 155](interfacefortran_1_1syscgetinputvectordatacompactf.xhtml#abba0d92f6ea7ac6452bc8af2ca0b5de5)function syscgetinputvectordatacompactf_r41d(data, dataSize)&amp;

<a id="l00156" name="l00156"></a> 156 result(ret)

<a id="l00157" name="l00157"></a> 157 import :: [syscinputvectordataf](structfortran_1_1syscinputvectordataf.xhtml)

<a id="l00158" name="l00158"></a> 158 integer(kind=8), intent(in) :: datasize 

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

<a id="l00160" name="l00160"></a> 160 type([syscinputvectordataf](structfortran_1_1syscinputvectordataf.xhtml)) :: ret

<a id="l00161" name="l00161"></a> 161!DIR$ IF DEFINED(\_WIN32)

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

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

<a id="l00164" name="l00164"></a> 164end function syscgetinputvectordatacompactf_r41d

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

<a id="l00166" name="l00166"></a> 166!\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a id="l00171" name="l00171"></a> 171!\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a id="l00172" name="l00172"></a>[ 172](interfacefortran_1_1syscgetinputvectordatacompactf.xhtml#a61ff5c0acf1426bdb2a2f3632438de88)function syscgetinputvectordatacompactf_r81d(data, dataSize)&amp;

<a id="l00173" name="l00173"></a> 173 result(ret)

<a id="l00174" name="l00174"></a> 174 import :: [syscinputvectordataf](structfortran_1_1syscinputvectordataf.xhtml)

<a id="l00175" name="l00175"></a> 175 integer(kind=8), intent(in) :: datasize 

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

<a id="l00177" name="l00177"></a> 177 type([syscinputvectordataf](structfortran_1_1syscinputvectordataf.xhtml)) :: ret

<a id="l00178" name="l00178"></a> 178!DIR$ IF DEFINED(\_WIN32)

<a id="l00179" name="l00179"></a> 179!DIR$ ATTRIBUTES DLLIMPORT :: syscGetInputVectorDataCompactF\_R81D

<a id="l00180" name="l00180"></a> 180!DIR$ ENDIF

<a id="l00181" name="l00181"></a> 181end function syscgetinputvectordatacompactf_r81d

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

<a id="l00183" name="l00183"></a> 183!\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

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

<a id="l00189" name="l00189"></a>[ 189](interfacefortran_1_1syscgetinputvectordatacompactf.xhtml#af4264f8d072aab82c3ad384e94227cab)function syscgetinputvectordatacompactf_r42d(data, dataSize)&amp;

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

<a id="l00191" name="l00191"></a> 191 import :: [syscinputvectordataf](structfortran_1_1syscinputvectordataf.xhtml)

<a id="l00192" name="l00192"></a> 192 integer(kind=8), intent(in) :: datasize 

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

<a id="l00194" name="l00194"></a> 194 type([syscinputvectordataf](structfortran_1_1syscinputvectordataf.xhtml)) :: ret

<a id="l00195" name="l00195"></a> 195!DIR$ IF DEFINED(\_WIN32)

<a id="l00196" name="l00196"></a> 196!DIR$ ATTRIBUTES DLLIMPORT :: syscGetInputVectorDataCompactF\_R42D

<a id="l00197" name="l00197"></a> 197!DIR$ ENDIF

<a id="l00198" name="l00198"></a> 198end function syscgetinputvectordatacompactf_r42d

<a id="l00199" name="l00199"></a> 199!

<a id="l00200" name="l00200"></a> 200!\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a id="l00205" name="l00205"></a> 205!\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

<a id="l00206" name="l00206"></a>[ 206](interfacefortran_1_1syscgetinputvectordatacompactf.xhtml#a1e742cf1102a13eab00b4488c2174e9d)function syscgetinputvectordatacompactf_r82d(data, dataSize)&amp;

<a id="l00207" name="l00207"></a> 207 result(ret)

<a id="l00208" name="l00208"></a> 208 import :: [syscinputvectordataf](structfortran_1_1syscinputvectordataf.xhtml)

<a id="l00209" name="l00209"></a> 209 integer(kind=8), intent(in) :: datasize 

<a id="l00210" name="l00210"></a> 210 real(kind=8), intent(in), target :: data(3, datasize)

<a id="l00211" name="l00211"></a> 211 type([syscinputvectordataf](structfortran_1_1syscinputvectordataf.xhtml)) :: ret

<a id="l00212" name="l00212"></a> 212!DIR$ IF DEFINED(\_WIN32)

<a id="l00213" name="l00213"></a> 213!DIR$ ATTRIBUTES DLLIMPORT :: syscGetInputVectorDataCompactF\_R82D

<a id="l00214" name="l00214"></a> 214!DIR$ ENDIF

<a id="l00215" name="l00215"></a> 215end function syscgetinputvectordatacompactf_r82d

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

<a id="l00217" name="l00217"></a> 217end interface [syscgetinputvectordatacompactf](interfacefortran_1_1syscgetinputvectordatacompactf.xhtml)

<a id="l00218" name="l00218"></a> 218!

<a id="l00219" name="l00219"></a> 219end module fortran

[fortran::syscgetinputvectordatacompactf](interfacefortran_1_1syscgetinputvectordatacompactf.xhtml)

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

**Definition:** [syscInputVectorDataF.fi:147](syscInputVectorDataF_8fi_source.xhtml#l00147)



[fortran::syscgetinputvectordataf](interfacefortran_1_1syscgetinputvectordataf.xhtml)

Provide an interface to get input vector data.

**Definition:** [syscInputVectorDataF.fi:42](syscInputVectorDataF_8fi_source.xhtml#l00042)



[fortran::syscgetinputvectordatasplitf](interfacefortran_1_1syscgetinputvectordatasplitf.xhtml)

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

**Definition:** [syscInputVectorDataF.fi:65](syscInputVectorDataF_8fi_source.xhtml#l00065)



[fortran::syscinputvectordataf](structfortran_1_1syscinputvectordataf.xhtml)

Create an input vector data access type.

**Definition:** [syscInputVectorDataF.fi:31](syscInputVectorDataF_8fi_source.xhtml#l00031)