18 lines
311 B
Fortran
18 lines
311 B
Fortran
!
|
|
! TESTBED FOR GENPLOTTING90
|
|
!
|
|
! this crapware is released by tTh under the
|
|
! DO WHAT THE FUCK YOU WANT TO PUBLIC LICENSE
|
|
!
|
|
|
|
program testbed
|
|
use genplotting
|
|
use genp_tests
|
|
implicit none
|
|
|
|
call genp_init(0, "foo.scratch")
|
|
call genp_test_rotation()
|
|
call genp_end(0)
|
|
|
|
end program
|