syscDataTransferF Last update: 17.07.2025 1module fortran 2! 3! Copyright 2023 ANSYS, Inc. 4! Unauthorized use, distribution, or duplication is prohibited. 5! 6! Provide free-form Fortran interface for 7! System Coupling Participant Library. 8! 9! ********************************************************************* 11! ********************************************************************* 12type :: syscdatatransferf 13 type(syscvariablef) :: sourcevariable 14 type(syscvariablef) :: targetvariable 15 integer(kind=4) :: targetside 16end type syscdatatransferf 17! 18!********************************************************************** 19! 21interface syscgetdatatransferf 22! 23!********************************************************************** 31!********************************************************************** 32function syscgetdatatransferf(sourceVariable, targetVariable, & 33 targetSide) result(ret) 34! 35 import :: syscdatatransferf, syscvariablef 36 type(syscvariablef), intent(in) :: sourcevariable 37 type(syscvariablef), intent(in) :: targetvariable 38 integer(kind=4), intent(in) :: targetside 39 type(syscdatatransferf) :: ret 40! 41!DIR$ IF DEFINED(_WIN32) 42!DIR$ ATTRIBUTES DLLIMPORT :: syscGetDataTransferF 43!DIR$ ENDIF 44! 45end function syscgetdatatransferf 46! 47!********************************************************************** 48! 49end interface syscgetdatatransferf 50! 51 52end module fortran fortran::syscgetdatatransferfProvide an interface to get a data transfer.Definition: syscDataTransferF.fi:21 fortran::syscdatatransferfProvide a struct for a data transfer.Definition: syscDataTransferF.fi:12 fortran::syscvariablefProvide a struct for a System Coupling variable.Definition: syscVariableF.fi:23