program demo_plot7 use M_datapac, only : plot7 implicit none ! call plot7(x,y) end program demo_plot7