codekingpro/portable-devtools

1module foo_free
2contains
3  subroutine bar13(a)
4    !f2py intent(out) a
5    integer a
6    a = 13
7  end subroutine bar13
8end module foo_free
9