Plot functions¶
Plot¶
Update plot:
call spex%plot(ier)
Interface:
module subroutine spex_plot(this, ier)
class(sapi), intent(inout) :: this
integer,intent(out) :: ier
end subroutine
Plot ascdump¶
Write plot data to QDP file:
call spex%plot_adump(qdpfile,overwrite)
Interface:
module subroutine spex_plot_adump(this, qdpfile, overwrite)
class(sapi), intent(inout) :: this
character*(*), intent(in) :: qdpfile
logical, intent(in) :: overwrite
end subroutine
Plot frame¶
New frame:
call spex%plot_frame_new()
Interface:
module subroutine spex_plot_frame_new(this)
class(sapi), intent(inout) :: this
end subroutine
Set current frame number to manipulate:
call spex%plot_frame_set(i,ier)
Interface:
module subroutine spex_plot_frame_set(this, i, ier)
class(sapi), intent(inout) :: this
integer,intent(in) :: i
integer,intent(out) :: ier
end subroutine
Delete frame (range):
call spex%plot_frame_del(i1,i2,ier)
Interface:
module subroutine spex_plot_frame_del(this, i1, i2, ier)
class(sapi), intent(inout) :: this
integer,intent(in) :: i1
integer,intent(in) :: i2
integer,intent(out) :: ier
end subroutine
Plot devices¶
Set plot device:
call spex%plot_device(dev,file,ier)
Interface:
module subroutine spex_plot_device(this,dev,file,ier)
class(sapi), intent(inout) :: this
character*(*), intent(in) :: dev ! Device name
character*(*), optional :: file ! Filename (optional, for PS output)
integer, intent(out) :: ier
end subroutine
Close plot device:
call spex%plot_device_close(in,ier)
Interface:
module subroutine spex_plot_device_close(this,in,ier)
class(sapi), intent(inout) :: this
integer, intent(in) :: in
integer, intent(inout) :: ier
end subroutine
Plot properties¶
Set font height:
call spex%plot_fh(fonth)
Interface:
module subroutine spex_plot_set_fh(this,fonth)
class(sapi), intent(inout) :: this
real(dp), intent(in) :: fonth !! Font number (integer)
end subroutine
Set font type:
call spex%plot_font(ifont)
Interface:
module subroutine spex_plot_set_font(this,ifont)
class(sapi), intent(inout) :: this
integer, intent(in) :: ifont !! Font number (integer)
end subroutine
Set linetype:
call spex%plot_lt(ltype)
Interface:
module subroutine spex_plot_set_lt(this,ltype)
class(sapi), intent(inout) :: this
integer, intent(in) :: ltype !! Line type (integer)
end subroutine
Set linewidth:
call spex%plot_lw(lwidth)
Interface:
module subroutine spex_plot_set_lw(this,lwidth)
class(sapi), intent(inout) :: this
integer, intent(in) :: lwidth !! Line type (integer)
end subroutine
Set plot orientation in hardcopy:
call spex%plot_hard(mode,ier)
Interface:
module subroutine spex_plot_hard(this, mode, ier)
class(sapi), intent(inout) :: this
character*(*), intent(in) :: mode !! orientation (landscape/potrait)
integer, intent(out) :: ier !! Error status
end subroutine
Plot information:
call spex%plot_info(ier)
Interface:
module subroutine spex_plot_info(this, ier)
class(sapi), intent(inout) :: this
integer, intent(out) :: ier
end subroutine
Set axis to logarithmic/linear:
call spex%plot_log(axis,scale,inr1,inr2,ier)
Interface:
module subroutine spex_plot_log(this, axis, scale, inr1, inr2, ier)
class(sapi), intent(inout) :: this
character(len=1), intent(in) :: axis !! axis
character(len=3), intent(in) :: scale !! scaling type (lin/log)
real(dp), intent(in) :: inr1 !! lower range of scaling
real(dp), intent(in) :: inr2 !! upper range of scaling
integer, intent(out) :: ier !! Error status
end subroutine
Plot rescale:
call spex%plot_rescale(raxis,inr1,inr2,ier)
Interface:
module subroutine spex_plot_rescale(this, raxis, inr1, inr2, ier)
class(sapi), intent(inout) :: this
character*2, intent(in) :: raxis !! axis (rx,ry,rz)
real(dp), intent(in) :: inr1 !! low end of range
real(dp), intent(in) :: inr2 !! high end of range
integer, intent(out) :: ier !! Error status
end subroutine
Plot set:
call spex%plot_set(all, in1, in2)
Interface:
module subroutine spex_plot_set(this, all, in1, in2)
class(sapi), intent(inout) :: this
logical, intent(in) :: all
integer, intent(in) :: in1,in2
end subroutine
Plot new string and delete it:
call spex%plot_string_new(x,y,text)
call spex%plot_string_del(i1,i2)
call spex%plot_string(prop,i1,i2,boxprop,ini,inr,inl,ina,ier)
Interfaces:
module subroutine spex_plot_string_new(this,x,y,text)
class(sapi), intent(inout) :: this
real(dp), intent(in) :: x !! X coordinate for the string
real(dp), intent(in) :: y !! Y coordinate for the string
character*(*), intent(in) :: text !! The string text
end subroutine
module subroutine spex_plot_string_del(this, i1, i2)
class(sapi), intent(inout) :: this
integer, intent(in) :: i1 !! Lower string ID
integer, intent(in) :: i2 !! Upper string ID
end subroutine
module subroutine spex_plot_string(this, prop, i1, i2, boxprop, ini, inr, inl, ina, ier)
class(sapi), intent(inout) :: this
character*(*), intent(in) :: prop !! Property to change
integer, intent(in) :: i1 !! Lower string number
integer, intent(in) :: i2 !! Upper string number
character*(*), intent(in) :: boxprop !! If property is 'box', select subproperty ('lt','lw','col')
integer, intent(in) :: ini !! Integer input value
real(dp), intent(in) :: inr !! Real input value
logical, intent(in) :: inl !! Logical input value
character*(*), intent(in) :: ina !! Text input value
integer, intent(out) :: ier
end subroutine
Set plot type:
call spex%plot_type(ptype,ier)
Interface:
module subroutine spex_plot_type(this, ptype, ier)
class(sapi), intent(inout) :: this
character*(*), intent(in) :: ptype !! The plot type
integer, intent(out) :: ier !! Error status
end subroutine
Example:
call spex%plot_type('data',ier)
Plot unit:
call spex%plot_unit(uaxis,raxis,runit,inr,ier)
Interface:
module subroutine spex_plot_unit(this, uaxis, raxis, runit, inr, ier)
class(sapi), intent(inout) :: this
character*(*), intent(in) :: uaxis !! Unit axis (ux;uy;uz)
character*(*), intent(in) :: raxis !! ref axis
character*(*), intent(in), optional :: runit !! ref unit
real, optional, intent(in) :: inr !! Unit energy
integer, intent(out) :: ier !! Error status
end subroutine
Plot set viewport:
call spex%plot_view(iview,back_col,range_low,range_high,status,ier)
Interface:
module subroutine spex_plot_set_view(this, iview, back_col, range_low, range_high, status, ier)
class(sapi), intent(inout) :: this
character*(*), intent(in) :: iview !! View property to change ('x', 'y', 'back', 'transp','default')
integer, intent(in) :: back_col !! Background color number
real(dp), intent(in) :: range_low !! Low end of range (for 'x' and 'y')
real(dp), intent(in) :: range_high !! High end of range (for 'x' and 'y')
logical, intent(in) :: status !! Switch transparency or default on or off.
integer, intent(out) :: ier
end subroutine