demo_plotx Program

     program demo_plotx
     use M_datapac, only : plotx
     implicit none
     ! call plotx(x,y)
     end program demo_plotx