GNUPLOT_PLOT3D

• INPUTS :
  • ptr_gctrl : Pointer to structure of type gnuplot_ctrl.
  • n : Integer (number of points along x axis to be plotted).
  • m : Integer (number of points along y axis to be plotted).
  • x : Real, dimension(n) (abcissae).
  • y : Real, dimension(m) (abcissae).
  • z1 : Real, dimension(n X m) (first surface).
  • z1title : Character string (title for z1) (optional).
  • z2 : Real, dimension(n X m) (second surface) (optional).
  • z2title : Character string (title for z2) (optional).
  • z3 : Real, dimension(n X m) (third surface) (optional).
  • z3title : Character string (title for z3) (optional).
  • z4 : Real, dimension(n X m) (fourth surface) (optional).
  • z4title :Character string (title for z4) (optional).
• OUTPUTS :
  • status :Integer (error flag)
• PURPOSE :

  Plots x,y,z1,z2,z3,z4 together(max. of 4 surface plots possible).

• DIAGNOSTICS :
  • status = 0 : Success.
  • status = BAD_SIGNAL : Called with a dissociated pointer.
  • status = -3 : Called with less than one point.
  • status = -1 : Impossible error.
  • status = -2 : Cannot create temporary file.
  • status = 22 : Failed to delete temporary file.
  • status = -4 : Failed to write to temporary file.
  • status = 24 : Failed to unset previously set acknowledgement string.
  • status = 23 : Failed to set acknowledgement string.
  • status = -5 : Failed to open temporary file in temporary directory.
  • status = -6 : Failed to execute the splot / replot command.
• INTERFACE :

  interface integer function gnuplot_plot3d(ptr_gctrl,n,m,x,y,z1,z1title,& z2,z2title,z3,z3title,z4,z4title) result(status) type(gnuplot_ctrl), pointer :: ptr_gctrl real(dp), dimension(:), intent(in) :: x,y real(dp), dimension(:,:), intent(in) :: z1 real(dp), dimension(:,:), intent(in), optional :: z2,z3,z4 integer(i4b), intent(in) :: n.m character(len=*), intent(in), optional :: z1title,z2title,& z3title,z4title end function gnuplot_plot3d end interface