wireframe Subroutine

  1. plplotlib.f90
  2. plplotlib_mod
  3. wireframe

public subroutine wireframe(x, y, z, lineColor)

Arguments

Type IntentOptional AttributesName
real(kind=wp), intent(in), dimension(:):: x

x-coordinates of data
real(kind=wp), intent(in), dimension(:):: y

y-coordinates of data
real(kind=wp), intent(in), dimension(:,:):: z

Data for contouring
character(len=*), intent(in), optional :: lineColor

Color of contour lines

Description

Plot a 3d wireframe

Calls

proc~~wireframe~~CallsGraph proc~wireframe wireframe plot3d plot3d proc~wireframe->plot3d
Help

Variables

TypeVisibility AttributesNameInitial
real(kind=pp), public, dimension(:), allocatable:: xl
real(kind=pp), public, dimension(:), allocatable:: yl
real(kind=pp), public, dimension(:,:), allocatable:: zl

Source Code

	subroutine wireframe(x,y,z,lineColor)
		!! Plot a 3d wireframe
		real(wp),dimension(:),intent(in)::x
			!! x-coordinates of data
		real(wp),dimension(:),intent(in)::y
			!! y-coordinates of data
		real(wp),dimension(:,:),intent(in)::z
			!! Data for contouring
		character(*),intent(in),optional::lineColor
			!! Color of contour lines
		
		real(pp),dimension(:),allocatable::xl,yl
		real(pp),dimension(:,:),allocatable::zl
		
		xl = localize(x)
		yl = localize(y)
		zl = localize(z)
		
		if(present(lineColor)) then
			call setColor(lineColor)
			call plot3d(xl,yl,zl,DRAW_LINEXY,.false.)
		else
			call plot3d(xl,yl,zl,ior(DRAW_LINEXY,MAG_COLOR),.false.)
		end if
		
		call resetPen()
	end subroutine wireframe