subplot Subroutine

  1. plplotlib.f90
  2. plplotlib_mod
  3. subplot

public subroutine subplot(ny, nx, i, aspect, is3d)

Arguments

Type IntentOptional AttributesName
integer, intent(in) :: ny

Number of subplot rows
integer, intent(in) :: nx

Number of subplot columns
integer, intent(in) :: i

Subplot to use
real(kind=wp), intent(in), optional :: aspect

Aspect ratio of the axes
logical, intent(in), optional :: is3d

Description

Create a set of axes on a figure

Calls

proc~~subplot~~CallsGraph proc~subplot subplot plvasp plvasp proc~subplot->plvasp pladv pladv proc~subplot->pladv plvsta plvsta proc~subplot->plvsta plssub plssub proc~subplot->plssub plvpor plvpor proc~subplot->plvpor
Help

Called By

proc~~subplot~~CalledByGraph proc~subplot subplot proc~dobar doBar proc~dobar->proc~subplot proc~doplot doPlot proc~doplot->proc~subplot proc~docontour doContour proc~docontour->proc~subplot proc~dohist doHist proc~dohist->proc~subplot proc~dolegend doLegend proc~dolegend->proc~subplot proc~makelogo makeLogo proc~makelogo->proc~subplot program~animate_prg animate_prg program~animate_prg->proc~subplot proc~doerror doError proc~doerror->proc~subplot proc~doquiver doQuiver proc~doquiver->proc~subplot proc~dosurface doSurface proc~dosurface->proc~subplot proc~dofillbetween doFillBetween proc~dofillbetween->proc~subplot program~basic_prg basic_prg program~basic_prg->proc~subplot proc~doscatter doScatter proc~doscatter->proc~subplot proc~dologplot doLogPlot proc~dologplot->proc~subplot program~examples_prg examples_prg program~examples_prg->proc~dobar program~examples_prg->proc~doplot program~examples_prg->proc~docontour program~examples_prg->proc~dohist program~examples_prg->proc~dolegend program~examples_prg->proc~doerror program~examples_prg->proc~doquiver program~examples_prg->proc~dosurface program~examples_prg->proc~dofillbetween program~examples_prg->proc~doscatter program~examples_prg->proc~dologplot program~logo_prg logo_prg program~logo_prg->proc~makelogo
Help

Variables

TypeVisibility AttributesNameInitial
logical, public :: is3dl

Source Code

	subroutine subplot(ny,nx,i,aspect,is3d)
		!! Create a set of axes on a figure
		integer,intent(in)::nx
			!! Number of subplot columns
		integer,intent(in)::ny
			!! Number of subplot rows
		integer,intent(in)::i
			!! Subplot to use
		real(wp),intent(in),optional::aspect
			!! Aspect ratio of the axes
		logical,intent(in),optional::is3d
		
		logical::is3dl
		
		call plssub(nx,ny)
		call pladv(i)
		call resetPen()
		
		is3dl = .false.
		if(present(is3d)) is3dl = is3d
		
		if(is3dl) then
			call plvpor(0.0_pp,1.0_pp,0.0_pp,1.0_pp)
		else
			if(present(aspect)) then
				call plvasp(real(aspect,pp))
			else
				call plvsta()
			end if
		end if
		
		call defaultLim()
	end subroutine subplot