C gfortran -fPIC -c mvnprodcorrprb.f C f2py -m mvnprdmod -c mvnprodcorrprb.o mvnprodcorrprb_interface.f --fcompiler=gnu95 --compiler=mingw32 -lmsvcr71 C module mvnprdmod C contains subroutine prbnormndpc(prb,abserr,IFT,rho,a,b,N,abseps,releps, & useBreakPoints, useSimpson) use mvnProdCorrPrbMod, ONLY : mvnprodcorrprb integer :: N double precision,dimension(N),intent(in) :: rho,a,b double precision,intent(in) :: abseps double precision,intent(in) :: releps logical, intent(in) :: useBreakPoints logical, intent(in) :: useSimpson double precision,intent(out) :: abserr,prb integer, intent(out) :: IFT Cf2py integer, intent(hide), depend(rho) :: N = len(rho) Cf2py depend(N) a Cf2py depend(N) b Cf2py double precision, optional :: abseps = 0.001 Cf2py double precision, optional :: releps = 0.001 Cf2py logical, optional :: useBreakPoints =1 Cf2py logical, optional :: useSimpson = 1 CALL mvnprodcorrprb(rho,a,b,abseps,releps,useBreakPoints, & useSimpson,abserr,IFT,prb) end subroutine prbnormndpc C end module mvnprdmod