Navigation

Operators and Keywords

Function List:

C++ API

__go_draw_figure__.m File Reference


Functions

function __go_draw_figure__ (h, plot_stream, enhanced, mono, output_to_paper, implicit_margin) if(nargin< 5) output_to_paper
 elseif (nargin< 6) implicit_margin=0
endif if (nargin >=4 &&nargin<=6) htype
 if (strcmp(htype,"figure")) if(output_to_paper) orig_paper_units
unwind_protect_cleanup set (h,"paperunits", orig_paper_units)
end_unwind_protect if (strcmp(gpval_term,"postscript")&&!isempty(strfind(gpval_termoptions,"landscape"))) implicit_margin(2)
 if (nkids > 0) fputs(plot_stream
 fputs (plot_stream,"set autoscale keepfix;\n")
 fputs (plot_stream,"set origin 0, 0\n")
 fputs (plot_stream,"set size 1, 1\n")
 switch (type) case"axes"orig_axes_units
unwind_protect set (kids(i),"units","normalized")
 if (output_to_paper) axes_position_on_page
 axes_position_on_page (1:2)
 set (kids(i),"position", axes_position_on_page)
 __go_draw_axes__ (kids(i), plot_stream, enhanced, mono, implicit_margin)
endif unwind_protect_cleanup set (kids(i),"units", orig_axes_units)
 set (kids(i),"position", orig_axes_position)
end_unwind_protect otherwise error ("__go_draw_figure__: unknown object class, %s", type)
endswitch endfor else fputs (plot_stream,"\nreset; clear;\n")
 fflush (plot_stream)
endif else error ("__go_draw_figure__: expecting figure object, found `%s'", htype)
endif else print_usage ()

Variables

 gpval_term = __gnuplot_get_var__ (h, "GPVAL_TERM")
 gpval_termoptions = __gnuplot_get_var__ (h, "GPVAL_TERMOPTIONS")
unwind_protect set (h,"paperunits","inches")
 paper_size = get (h, "papersize")
 paper_position = get (h, "paperposition")
 implicit_margin = implicit_margin ./ paper_size
endif kids = allchild (h)
 nkids = length (kids)
 nreset
 n
for i
 orig_axes_position = get (kids(i), "position")

Function Documentation

else __go_draw_axes__ ( kids(i)  ,
plot_stream  ,
enhanced  ,
mono  ,
implicit_margin   
)

function __go_draw_figure__ ( ,
plot_stream  ,
enhanced  ,
mono  ,
output_to_paper  ,
implicit_margin   
)

axes_position_on_page ( 1:2   ) 

elseif (  )  [pure virtual]

endif else error ( "__go_draw_figure__: expecting figure   object,
found`%s'"  ,
htype   
)

end_unwind_protect otherwise error ( "__go_draw_figure__: unknown object   class,
%s"  ,
type   
)

fflush ( plot_stream   ) 

endswitch endfor else fputs ( plot_stream  ,
"\nreset; clear;\n"   
)

fputs ( plot_stream  ,
"set size   1,
1\n"   
)

fputs ( plot_stream  ,
"set origin   0,
0\n"   
)

fputs ( plot_stream  ,
"set autoscale keepfix;\n"   
)

if ( output_to_paper   ) 

if ( nkids  ,
 
)

end_unwind_protect if ( strcmp(gpval_term,"postscript")&&!isempty(strfind(gpval_termoptions,"landscape"))   ) 

if ( strcmp(htype,"figure")   ) 

endif if ( nargin >=4 &&nargin<=  6  ) 

endif else print_usage (  ) 

set ( kids(i)  ,
"position"  ,
orig_axes_position   
)

endif unwind_protect_cleanup set ( kids(i)  ,
"units"  ,
orig_axes_units   
)

set ( kids(i)  ,
"position"  ,
axes_position_on_page   
)

unwind_protect set ( kids(i)  ,
"units"  ,
"normalized"   
)

unwind_protect_cleanup set ( ,
"paperunits"  ,
orig_paper_units   
)

switch ( type   ) 


Variable Documentation

gpval_term = __gnuplot_get_var__ (h, "GPVAL_TERM")

gpval_termoptions = __gnuplot_get_var__ (h, "GPVAL_TERMOPTIONS")

for i

Initial value:

 1:nkids
          type = get (kids(i), "type")

endif kids = allchild (h)

n

nkids = length (kids)

orig_axes_position = get (kids(i), "position")

paper_position = get (h, "paperposition")

paper_size = get (h, "papersize")

unwind_protect set(kids(i),"units","normalized") ( ,
"paperunits"  ,
"inches"   
)