fortran modules' subroutine name conflict

前端 未结 1 1983
不知归路
不知归路 2021-01-13 12:35

I have two different modules each one has the same subroutine. main program will call one of them based on a certain condition. I want to avoid renaming each of these subrou

1条回答
  •  北恋
    北恋 (楼主)
    2021-01-13 12:59

    If you have two modules A and B containing the same method foo() then first you can create a local alias with

    program SOModNames
    use A, fooA => foo
    use B, fooB => foo
    implicit none
    
    ! Variables
    real X(10), Y(10)
    
    call fooA(X,10)
    call fooB(Y,10)
    
    end program SOModNames
    

    Unofrtunatelty you cannot scope to a module with call A::foo(X,10) for example.

    0 讨论(0)
提交回复
热议问题