## On this page

  

 

 # participantLibraryF

 Last update: 17.07.2025 

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

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

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

<a name="l00006"></a> 6 !

<a name="l00007"></a>[ 7](interfacefortran_1_1syscloadlibraryf.xhtml) interface [syscloadlibraryf](interfacefortran_1_1syscloadlibraryf.xhtml)

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

<a name="l00019"></a>[ 19](interfacefortran_1_1syscloadlibraryf.xhtml#ac333d28ca182a3fc6efa1ad1543c78d0) logical function [syscloadlibraryf](interfacefortran_1_1syscloadlibraryf.xhtml)(syscPartLibPath, mpiWrapperPath)

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

<a name="l00021"></a> 21 character(\*), intent(in) :: syscpartlibpath

<a name="l00022"></a> 22 character(\*), intent(in) :: mpiwrapperpath

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

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

<a name="l00025"></a> 25 !DIR$ ATTRIBUTES DLLIMPORT :: syscLoadLibraryF

<a name="l00026"></a> 26 !DIR$ ENDIF

<a name="l00027"></a> 27 !

<a name="l00028"></a> 28 end function [syscloadlibraryf](interfacefortran_1_1syscloadlibraryf.xhtml)

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

<a name="l00030"></a> 30 end interface [syscloadlibraryf](interfacefortran_1_1syscloadlibraryf.xhtml)

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

<a name="l00032"></a> 32 end module fortran

[fortran::syscloadlibraryf](interfacefortran_1_1syscloadlibraryf.xhtml)

Provide an interface to load system coupling participant library path and mpi wrapper path to system ...

**Definition:** [participantLibraryF.fi:7](participantLibraryF_8fi_source.xhtml#l00007)