
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