demo_bincdf Program

     program demo_bincdf
     use M_datapac, only : bincdf
     implicit none
     !call BINCDF(X,P,N,Cdf)
     end program demo_bincdf