정밀도와 전역 변수 유형을위한 포트란 링크 모듈

Question

저는 Fortran을 처음 접하고 다음과 같은 것이 가능한지 이해하려고합니다. 프로그램을 구조화하기위한 나의 아이디어는 하나의 모듈에 정밀도와 변수 타입을 선언하는 것이다. 그런 다음 다른 모듈 또는 주 프로그램의 유형을 다시 선언하지 않고 이러한 변수를 사용하십시오.

gfortran -c mod_pre.f90 
gfortran -c mod_hon.f90 

:

module hon 
use pre 
implicit none 

contains 
    function KE(H,M) result(KR) 
     KR = 2*PI/H/M 
    end function KE 
end module hon 

가 그럼 난 순서로 gfortran을 사용

module pre 
implicit none 

    INTEGER, PARAMETER  :: sp=SELECTED_REAL_KIND(6,37) 
    INTEGER, PARAMETER  :: dp=SELECTED_REAL_KIND(15,307) 
    INTEGER, PARAMETER  :: qp=SELECTED_REAL_KIND(33,4931) 

    REAL(dp), PARAMETER  :: pi = 4.*ATAN(1.) 
    REAL(dp)    :: H        
    REAL(dp)    :: M 
    REAL(dp)    :: KR 

end module pre 

는 지금과 같은 하나 개 이상의 기능을 포함하는 다른 모듈에있는 모든 변수의 사용을 만들고 싶어

'module pre'는 'module hon'의 일부이므로 순서대로 컴파일하지만 gfortran은 오류를 표시합니다.

위의 코드를 사용하면 변수 유형 및 매개 변수가 USE에 포함되어야한다는 것을 알았습니다. 그러나 내가받은 메시지는 gfortran에서 'module hon'를 컴파일하려고 할 때 내 변수 중 IMPLICIT 타입이 없다는 것입니다.

누군가가 문제를 명확히하거나 해결책을 제안 할 수 있습니까? 내 변수가 여러 모듈에 분산되는 것을 피하고 싶습니다.

감사합니다.

Answer 1

function 문에서 result(kr)은 함수 결과의 이름이 kr이라고 말합니다. 이 함수 결과는 모듈 변수 kr과 같은 결과가 아닙니다. 특히이 함수 결과는 모듈 변수에 액세스 할 수 없게 만듭니다.

함수 결과는 함수 자체에 고유하며 해당 특성은 함수 서브 프로그램 내에서 선언되어야합니다.

마찬가지로 함수의 더미 인수 (H 및 M)는 모듈 변수와 구별되며 함수 서브 프로그램에서 선언해야합니다.

그 외에도 아마도 other question과 비슷한 문제가있을 수 있습니다.

명확하게 말하면 "kr이라는 모든 함수 결과 및 H 또는 M이라는 모든 가짜 인수는 이러한 특성을 가지고 있습니다"와 같은 것을 말할 수 없습니다. 각 개별 객체에는 속성이 제공되어야합니다. 파일이 선언을 가지고

function ke(H, M) result (kr) 
    include 'resdummydecls' 
    ... 
end function 

:

그러나, 나는이 추천하지 않지만,이 문자 텍스트 포함 (파일 프리 프로세서를 사용하거나 포함)이 당신을 도울 수있는 상황이다.