Set the limits of the y-axis
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
real(kind=wp), | intent(in) | :: | yl | |||
real(kind=wp), | intent(in) | :: | yh |
Nodes of different colours represent the following:
Solid arrows point from a procedure to one which it calls. Dashed arrows point from an interface to procedures which implement that interface. This could include the module procedures in a generic interface or the implementation in a submodule of an interface in a parent module.
subroutine ylim(yl,yh)
!! Set the limits of the y-axis
real(wp),intent(in)::yl,yh
real(pp)::x1,x2,y1,y2
call plgvpw(x1,x2,y1,y2)
call plwind(x1,x2,real(yl,pp),real(yh,pp))
end subroutine ylim