ANEW -simple_plot

DOC
(*

  Python prototype:

	from pylab import *

	t = arange(0.0, 2.0, 0.01)
	s = sin(2*pi*t)
	plot(t, s, linewidth=1.0)

	xlabel('time (s)')
	ylabel('voltage (mV)')
	title('About as simple as it gets, folks')
	grid(True)
	show()
*)
ENDDOC

NEEDS -gnuplot

: sin(2*pi*t) PI*2 F* FSIN ;

: simple_plot ( -- )
	0 FIGURE CLF  TRUE GRID
	S" time (s)" XLABEL
	S" voltage (mV)" YLABEL
	S" About as simple as it gets, folks" TITLE
	0e 2e S" blue" ['] sin(2*pi*t) #100 FPLOT ;