Из модуля используйте только некоторые компоненты производного типа данных - PullRequest
0 голосов
/ 02 декабря 2019

Рассмотрим этот простой модуль:

module mod1
implicit none
    type namespace
        integer :: int1
        real    :: real1
    endtype
    type(namespace)        :: namespace1
end module mod1

Теперь я хочу импортировать только int1 из этой производной структуры данных namspace1, чтобы отслеживать, откуда и откуда пришла переменная.

Следующая программа выдает ошибку:

program tmp
    use mod1, only: int1 => namespace1%int1
    implicit none
    print *, int1
end program tmp

Я получаю следующую ошибку

Ошибка: синтаксическая ошибка в операторе USE в (1)

IsЕсть ли какой-то способ использовать только необходимые компоненты из производного типа данных? или мне нужно сделать use mod1, only: nm => namespace1 с последующим только nm%int1?

...