Consider this fortran module (example.f90)
module mod implicit none contains subroutine test(a,b) double precision, intent(in) :: a double precisi
