program testbed use genplotting implicit none call genp_init(0, "foo.scratch") call plot_axes(13.37) call genp_end(0) call genp_do_render("foo.scratch", "foo.tga", 512, 512) end program