2023-03-04 22:48:05 +11:00
|
|
|
program plplotting
|
|
|
|
|
use plplot
|
|
|
|
|
implicit none
|
|
|
|
|
|
2023-03-21 10:16:54 +11:00
|
|
|
! Initializing the plotting package with a lot of
|
|
|
|
|
! default (and pertinent) values.
|
2023-03-04 22:48:05 +11:00
|
|
|
call plinit ()
|
2023-03-21 10:16:54 +11:00
|
|
|
|
|
|
|
|
! Sets up plotter environment for simple graphs
|
|
|
|
|
call plenv (-2.1, 2.1, -2.1, 2.1, 0, 0)
|
|
|
|
|
|
|
|
|
|
! Ends a plotting session, tidies up all the output
|
|
|
|
|
! files,switches interactive devices back into text
|
|
|
|
|
! mode and frees up any memory that was allocated.
|
|
|
|
|
call plend ()
|
|
|
|
|
|
2023-03-04 22:48:05 +11:00
|
|
|
end program
|
