program demo_plot8 use M_datapac, only : plot8 implicit none ! call plot8(x,y) end program demo_plot8