program demo_plot9 use M_datapac, only : plot9 implicit none ! call plot9(x,y) end program demo_plot9