11 lines
200 B
Fortran
11 lines
200 B
Fortran
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
|