포트란.관련한 질문입니다.
안녕하세요
포트란을 갑자기 하게되어 질문이 있어서 글을 올리게 되었습니다.
어떠한 내용인가하면
포트란 으로 작성된 프로그램이 있는데 그 내용을 DLL로 만들어서 C++에서 사용하도록 하는 것입니다.
포트란 안에 함수들이 있다고 하는데 파라메타로 값을 받고 계산하여 결과를 건내주는 DLL을 만드는 것이지요
LF 포트란 이라는 프로그램을 이용해서 스튜디오에서 작업을 하는데
DLL프로젝트를 생성했는데
이런내용이 기본적으로 뜨더라구요.. 그런데 도통..무슨내용인지..
subroutine MySub (Ivar, Rvar)
implicit none
dll_export :: MySub ! export subroutine name
!
! variable declarations
!
integer, intent (in out) :: Ivar
real, intent (in out) :: Rvar
!
! executable statements
!
end subroutine MySub
function MyFun (Ivar, Rvar) result (Ires)
implicit none
dll_export :: MyFun ! export function name
!
! variable declarations
!
integer :: Ires
integer, intent (in out) :: Ivar
real, intent (in out) :: Rvar
!
! executable statements
!
Ires = 0 ! Assign function result
end function
혹시 알 수 있을지 궁굼하여 이렇게 글을 남기게 되었습니다. 혹시 아신다면 답변 꼭 부탁드립니다~^^
댓글 달기