doLogPlot Subroutine

  1. examples.f90
  2. examples_prg
  3. doLogPlot

subroutine doLogPlot()

Arguments

None

Description

logPlot

Calls

proc~~dologplot~~CallsGraph proc~dologplot doLogPlot proc~plot plot proc~dologplot->proc~plot proc~ticks ticks proc~dologplot->proc~ticks proc~xylim xylim proc~dologplot->proc~xylim proc~labels labels proc~dologplot->proc~labels proc~linspace linspace proc~dologplot->proc~linspace interface~mixval mixval proc~dologplot->interface~mixval proc~figure figure proc~dologplot->proc~figure proc~subplot subplot proc~dologplot->proc~subplot plline plline proc~plot->plline plssym plssym proc~plot->plssym plptex plptex proc~plot->plptex plbox plbox proc~ticks->plbox plwind plwind proc~xylim->plwind pllab pllab proc~labels->pllab pleop pleop proc~figure->pleop plbop plbop proc~figure->plbop pladv pladv proc~figure->pladv plssub plssub proc~figure->plssub proc~subplot->pladv proc~subplot->plssub plvasp plvasp proc~subplot->plvasp plvsta plvsta proc~subplot->plvsta plvpor plvpor proc~subplot->plvpor
Help

Called By

proc~~dologplot~~CalledByGraph proc~dologplot doLogPlot program~examples_prg examples_prg program~examples_prg->proc~dologplot
Help

Variables

TypeVisibility AttributesNameInitial
integer, public, parameter:: N =25
real(kind=wp), public, dimension(N):: x
real(kind=wp), public, dimension(N):: y
real(kind=wp), public, dimension(N):: yl

Source Code

	subroutine doLogPlot
		!! ![logPlot](|media|/example-11.svg)
		
		integer,parameter::N = 25
		real(wp),dimension(N)::x,y,yl
		
		x = linspace(0.0_wp,5.0_wp,N)
		y = exp(-x**2)
		yl = log10(y)
		
		call figure()
		call subplot(1,1,1)
		call xylim(mixval(x),mixval(yl))
		call plot(x,yl,lineColor='r',lineWidth=2.0_wp)
		call ticks(logy=.true.)
		call labels('x [linear]','y [log]','exp(-x#u2#d)')
	end subroutine doLogPlot