demo_plotxt Program

     program demo_plotxt
     use M_datapac, only : plotxt
     implicit none
     ! call plotxt(x,y)
     end program demo_plotxt