测试1111

hyb

2025-12-23 10f3a1daddfbc7fa3dd2069197d83e8b6ef19176

1
2
3
4
5
6
7
8
9
10
python module subrout ! in
    interface  ! in :subrout
        subroutine subrout_default(a,b,c) ! in :subrout:subrout.f
            fortranname subrout
            real*8 :: a
            real*8 :: b
            real*8, intent(out) :: c
        end subroutine subrout_default
    end interface
end python module subrout