scicos_graphics
function graphics=scicos_graphics(v1,v2,v3,v4,v5,v6,v7,v8,v9,v10,...
v11,v12,v13,v14,v15,v16,v17,v18,v19,v20)
// Copyright INRIA
//initialisation de graphics mlist
if exists('orig','local')==0 then orig=[0 0],end
if exists('sz','local')==0 then sz=[20 20],end
if exists('flip','local')==0 then flip=%t,end
if exists('theta','local')==0 then theta=0,end
if exists('exprs','local')==0 then exprs=[],end
if exists('pin','local')==0 then pin=[],end
if exists('pout','local')==0 then pout=[],end
if exists('pein','local')==0 then pein=[],end
if exists('peout','local')==0 then peout=[],end
if exists('gr_i','local')==0 then gr_i=[],end
if exists('id','local')==0 then id='',end
if exists('in_implicit','local')==0 then
I='E';
in_implicit=I(ones(pin(:)));
end
if exists('out_implicit','local')==0 then
I='E';
out_implicit=I(ones(pout(:)));
end
graphics=mlist(['graphics','orig','sz','flip','theta','exprs','pin',..
'pout','pein','peout','gr_i','id','in_implicit','out_implicit'],..
orig,sz,flip,theta,exprs,pin,pout,pein,peout,gr_i,id,in_implicit,out_implicit)
endfunction