1#@!#!123s

: / opt / cloudlinux / venv / lib / python3.11 / site-packages / numpy / f2py / tests / src / crackfortran /

Filename : privatemod.f90

back

module foo
  private
  integer :: a
  public :: setA
  integer :: b
contains
  subroutine setA(v)
    integer, intent(in) :: v
    a = v
  end subroutine setA
end module foo