Removed references to the xbasc function
Pierre MARECHAL [Wed, 23 Sep 2009 07:19:16 +0000 (09:19 +0200)]
Conflicts:

scilab/modules/cacsd/help/en_US/csim.xml
scilab/modules/cacsd/help/en_US/findABCD.xml
scilab/modules/cacsd/help/en_US/findBD.xml
scilab/modules/cacsd/help/en_US/findBDK.xml
scilab/modules/cacsd/help/en_US/findx0BD.xml
scilab/modules/cacsd/help/en_US/frep2tf.xml
scilab/modules/cacsd/help/en_US/m_circle.xml
scilab/modules/cacsd/help/en_US/sident.xml
scilab/modules/graphics/demos/fec/fec.ex1
scilab/modules/graphics/help/en_US/graduate.xml
scilab/modules/graphics/help/en_US/grayplot_properties.xml
scilab/modules/graphics/help/en_US/plot2d_old_version.xml
scilab/modules/graphics/help/en_US/plot3d_old_version.xml
scilab/modules/graphics/help/fr_FR/graduate.xml
scilab/modules/graphics/macros/contourf.sci
scilab/modules/special_functions/help/en_US/bessel.xml
scilab/modules/special_functions/help/en_US/oldbessel.xml

130 files changed:
scilab/modules/cacsd/demos/flat/car.sci
scilab/modules/cacsd/demos/lqg/lqg.dem
scilab/modules/cacsd/demos/lqg/lqg2.dem
scilab/modules/cacsd/demos/mixed.dem
scilab/modules/cacsd/demos/pid.dem
scilab/modules/cacsd/help/en_US/arl2.xml
scilab/modules/cacsd/help/en_US/csim.xml
scilab/modules/cacsd/help/en_US/findABCD.xml
scilab/modules/cacsd/help/en_US/findBD.xml
scilab/modules/cacsd/help/en_US/findBDK.xml
scilab/modules/cacsd/help/en_US/findx0BD.xml
scilab/modules/cacsd/help/en_US/frep2tf.xml
scilab/modules/cacsd/help/en_US/kpure.xml
scilab/modules/cacsd/help/en_US/krac2.xml
scilab/modules/cacsd/help/en_US/m_circle.xml
scilab/modules/cacsd/help/en_US/sident.xml
scilab/modules/cacsd/help/en_US/svplot.xml
scilab/modules/core/demos/intro/dem01.dem
scilab/modules/demo_tools/help/en_US/demo_function_choice.xml
scilab/modules/demo_tools/help/fr_FR/demo_function_choice.xml
scilab/modules/demo_tools/macros/demo_folder_choice.sci
scilab/modules/elementary_functions/help/en_US/binomial.xml
scilab/modules/elementary_functions/help/en_US/dsearch.xml
scilab/modules/elementary_functions/help/en_US/interp2d.xml
scilab/modules/elementary_functions/help/en_US/ndgrid.xml
scilab/modules/elementary_functions/help/en_US/splin2d.xml
scilab/modules/graphic_export/help/en_US/driver.xml
scilab/modules/graphic_export/tests/nonreg_tests/bug_1248.dia.ref
scilab/modules/graphic_export/tests/nonreg_tests/bug_1248.tst
scilab/modules/graphics/demos/bike.dem
scilab/modules/graphics/demos/contourf.dem
scilab/modules/graphics/demos/fec/fec.ex1
scilab/modules/graphics/demos/fec/fec.ex2
scilab/modules/graphics/demos/misc/misc.dem
scilab/modules/graphics/demos/misc/oscil.dem
scilab/modules/graphics/demos/misc/point.dem
scilab/modules/graphics/demos/portrait.dem
scilab/modules/graphics/demos/surface/surfaces.dem
scilab/modules/graphics/demos/xsetechfig.sce
scilab/modules/graphics/help/en_US/Sfgrayplot.xml
scilab/modules/graphics/help/en_US/colorbar.xml
scilab/modules/graphics/help/en_US/contour.xml
scilab/modules/graphics/help/en_US/contourf.xml
scilab/modules/graphics/help/en_US/fec.xml
scilab/modules/graphics/help/en_US/graduate.xml
scilab/modules/graphics/help/en_US/grayplot_properties.xml
scilab/modules/graphics/help/en_US/histplot.xml
scilab/modules/graphics/help/en_US/isoview.xml
scilab/modules/graphics/help/en_US/oldplot.xml
scilab/modules/graphics/help/en_US/plot2d_old_version.xml
scilab/modules/graphics/help/en_US/plot3d_old_version.xml
scilab/modules/graphics/help/en_US/replot.xml
scilab/modules/graphics/help/en_US/square.xml
scilab/modules/graphics/help/en_US/xbasc.xml
scilab/modules/graphics/help/en_US/xclear.xml
scilab/modules/graphics/help/en_US/xgetech.xml
scilab/modules/graphics/help/en_US/xset.xml
scilab/modules/graphics/help/en_US/xsetech.xml
scilab/modules/graphics/help/en_US/xstring.xml
scilab/modules/graphics/help/fr_FR/contourf.xml
scilab/modules/graphics/help/fr_FR/fec.xml
scilab/modules/graphics/help/fr_FR/graduate.xml
scilab/modules/graphics/help/fr_FR/histplot.xml
scilab/modules/graphics/help/fr_FR/replot.xml
scilab/modules/graphics/help/fr_FR/square.xml
scilab/modules/graphics/help/fr_FR/xbasc.xml
scilab/modules/graphics/help/fr_FR/xclear.xml
scilab/modules/graphics/help/fr_FR/xgetech.xml
scilab/modules/graphics/help/fr_FR/xset.xml
scilab/modules/graphics/help/fr_FR/xsetech.xml
scilab/modules/graphics/help/fr_FR/xstring.xml
scilab/modules/graphics/macros/contour.sci
scilab/modules/graphics/macros/contour2d.sci
scilab/modules/graphics/macros/graduate.sci
scilab/modules/graphics/macros/graypolarplot.sci
scilab/modules/graphics/macros/oldplot.sci
scilab/modules/graphics/macros/paramfplot2d.sci
scilab/modules/graphics/macros/polarplot.sci
scilab/modules/graphics/macros/xbasc.sci
scilab/modules/graphics/macros/xclear.sci
scilab/modules/graphics/sci_gateway/c/sci_delete.c
scilab/modules/graphics/sci_gateway/c/sci_xset.c
scilab/modules/graphics/src/c/DestroyObjects.c
scilab/modules/graphics/src/c/DrawObjects.c
scilab/modules/graphics/tests/nonreg_tests/bug_232.dia.ref
scilab/modules/graphics/tests/nonreg_tests/bug_232.tst
scilab/modules/graphics/tests/nonreg_tests/bug_313.dia.ref
scilab/modules/graphics/tests/nonreg_tests/bug_313.tst
scilab/modules/graphics/tests/nonreg_tests/bug_367.tst
scilab/modules/graphics/tests/nonreg_tests/bug_954.dia.ref
scilab/modules/graphics/tests/nonreg_tests/bug_954.tst
scilab/modules/gui/help/en_US/uimenu.xml
scilab/modules/gui/tests/nonreg_tests/bug_148.dia.ref
scilab/modules/gui/tests/nonreg_tests/bug_148.tst
scilab/modules/gui/tests/nonreg_tests/bug_3339.dia.ref
scilab/modules/gui/tests/nonreg_tests/bug_3339.tst
scilab/modules/helptools/macros/extract_help_examples.sci
scilab/modules/interpolation/help/en_US/cshep2d.xml
scilab/modules/interpolation/help/en_US/eval_cshep2d.xml
scilab/modules/interpolation/help/en_US/interp.xml
scilab/modules/interpolation/help/en_US/linear_interpn.xml
scilab/modules/interpolation/help/en_US/lsq_splin.xml
scilab/modules/interpolation/help/en_US/splin.xml
scilab/modules/interpolation/help/en_US/splin3d.xml
scilab/modules/metanet/help/en_US/mesh2d.xml
scilab/modules/metanet/tests/unit_tests/mesh2d.dia.ref
scilab/modules/metanet/tests/unit_tests/mesh2d.tst
scilab/modules/metanet/tests/unit_tests/plot_graphbug.tst
scilab/modules/optimization/help/en_US/fit_dat.xml
scilab/modules/optimization/help/en_US/leastsq.xml
scilab/modules/optimization/macros/datafit.sci
scilab/modules/optimization/macros/fit_dat.sci
scilab/modules/optimization/tests/nonreg_tests/bug_244.dia.ref
scilab/modules/optimization/tests/nonreg_tests/bug_244.tst
scilab/modules/randlib/tests/unit_tests/grand.dia.ref
scilab/modules/randlib/tests/unit_tests/grand.tst
scilab/modules/signal_processing/help/en_US/detrend.xml
scilab/modules/signal_processing/help/en_US/fftshift.xml
scilab/modules/signal_processing/help/en_US/percentsn.xml
scilab/modules/signal_processing/help/en_US/yulewalk.xml
scilab/modules/signal_processing/macros/yulewalk.sci
scilab/modules/special_functions/help/en_US/bessel.xml
scilab/modules/special_functions/help/en_US/beta.xml
scilab/modules/special_functions/help/en_US/gamma.xml
scilab/modules/special_functions/help/en_US/legendre.xml
scilab/modules/special_functions/help/en_US/oldbessel.xml
scilab/modules/statistics/help/en_US/tabul.xml
scilab/modules/umfpack/help/en_US/taucs_chget.xml
scilab/modules/umfpack/tests/unit_tests/taucs_chget.dia.ref
scilab/modules/umfpack/tests/unit_tests/taucs_chget.tst

index 200fc37..d39e6da 100644 (file)
@@ -74,7 +74,7 @@ endfunction
 
 function display_car_trajectory(state)
   bigL=1
-  set figure_style new;xbasc();xselect()
+  set figure_style new;clf();xselect()
   a=gca()
   drawlater()
   a.isoview="on"
index 1e618f2..1276962 100644 (file)
@@ -21,7 +21,7 @@ xstring(28,30,'K');xstring(56,30,'Plant');xstring(12,28.80,'-');
 xtitle('PLANT   and   CONTROLLER')
 
 
-// xset("window",0);xbasc();xselect();
+// xset("window",0);clf();xselect();
 // plot2d(xx,yy,ones(1,16),'022');
 // xstring(28,30,'K');xstring(56,30,'Plant');xstring(12,28.80,'-');
 // xtitle('PLANT   and   CONTROLLER')
index e4cde98..f7b8604 100644 (file)
@@ -19,7 +19,7 @@ spec(h_cl(Plqg,r,Klqg))    //Check internal stability
 [Slqg,Rlqg,Tlqg]=sensi(P22,Klqg);  //Sensitivity functions
 frq=logspace(-3,3);     //10^-3  to 10^3 
 y=svplot(Slqg);       //Computes singular values;
-xbasc();xset("window",0);gainplot(frq,y)   //Plot sing. values
+clf();xset("window",0);gainplot(frq,y)   //Plot sing. values
 w1=1/(s+1);
 w2=100;
 [Ptmp,r]=augment(P22,'SR');         //"S/KS" problem
@@ -29,7 +29,7 @@ Pinf=sysdiag(w1,w2,1)*Ptmp;        //Weighting functions
 y=svplot(Sinf);       //Computes singular values;
 xset("window",1);xselect();gainplot(frq,y)   //Plot sing. values
 
-xbasc();t=0:0.01:30;u=sin(t);
+clf();t=0:0.01:30;u=sin(t);
 plot2d([t',t'],[u',(flts(u,dscr(Tlqg,0.1))')])
 
 clear s  n  Plant P22 ny nu nx Qx Qu bigQ Rx Ry bigR bigQ  Plqg r 
index 72af879..08bfb57 100644 (file)
@@ -14,7 +14,7 @@ y=[22,28,30,32];ymin=12;ymax=40;
 xx=[xmin,xmin,x([1 2 2 7 4 6 3 4 5 6 3 3 5 5]);xmax,xmax,x([3,2,7,7,5,8,3,4,5,6,4,4,6,6])];
 yy=[ymin,ymax,y([3,1,1,1,3,3,2,2,2,2,2,4,2,4]);ymin,ymax,y([3,3,1,3,3,3,4,4,4,4,2,4,2,4])];
     
-xset("window",0);xbasc();xselect();
+xset("window",0);clf();xselect();
 plot2d(xx,yy,ones(1,16),'022');
 xstring(28,30,'K');xstring(56,30,'Plant');xstring(12,28.80,'-');
 xtitle('PLANT   and   CONTROLLER')
index 1e202d1..73f91a9 100644 (file)
@@ -14,7 +14,7 @@ y=[22,28,30,32];ymin=12;ymax=40;
 xx=[xmin,xmin,x([1 2 2 7 4 6 3 4 5 6 3 3 5 5]);xmax,xmax,x([3,2,7,7,5,8,3,4,5,6,4,4,6,6])];
 yy=[ymin,ymax,y([3,1,1,1,3,3,2,2,2,2,2,4,2,4]);ymin,ymax,y([3,3,1,3,3,3,4,4,4,4,2,4,2,4])];
     
-xset("window",0);xbasc();xselect();
+xset("window",0);clf();xselect();
 plot2d(xx,yy,ones(1,16),'022');
 xstring(28,30,'K');xstring(56,30,'Plant');xstring(12,28.80,'-');
 xtitle('PLANT   and   CONTROLLER')
@@ -103,7 +103,7 @@ while %t do
     break
   case 1
     mode(1)
-    xbasc(1);xset("window",1);xselect();bode(Tpid);
+    clf(1);xset("window",1);xselect();bode(Tpid);
     mode(-1)
   case 2
     if Plant(4)=='c' then
@@ -120,11 +120,11 @@ while %t do
        warning('Demo stops!');return;
       end
       if n1==1 then 
-       xbasc(1);xset("window",1);xselect();
+       clf(1);xset("window",1);xselect();
        plot2d([t',t'],[(csim('step',t,Tpid))',ones(t')])
       end
       if n1==2 then
-       xbasc(1);xset("window",1);xselect();
+       clf(1);xset("window",1);xselect();
        plot2d([t',t'],[(csim('impul',t,Tpid))',0*t'])
       end
       mode(-1)
@@ -144,14 +144,14 @@ while %t do
        case 1 then
          mode(1)
          u=ones(1,Tmax);u(1)=0;
-         xbasc(1);xset("window",1);xselect();
+         clf(1);xset("window",1);xselect();
          plot2d([(1:Tmax)',(1:Tmax)'],[(dsimul(Tpid,u))',(ones(1:Tmax)')])
          
          mode(-1)
        case 2 then
          mode(1)
          u=zeros(1,Tmax);u(1)=1;
-         xbasc(1);xset("window",1);xselect();
+         clf(1);xset("window",1);xselect();
          plot2d((1:Tmax)',(dsimul(Tpid,u))')
          mode(-1)
        end
index fe58753..7185026 100644 (file)
@@ -105,7 +105,7 @@ h=arl2(y,den0,n [,imp],'all')
     <title>Examples</title>
     <programlisting role="example"><![CDATA[ 
 v=ones(1,20);
-xbasc();
+clf();
 plot2d1('enn',0,[v';zeros(80,1)],2,'051',' ',[1,-0.5,100,1.5])
 
 [d,n,e]=arl2(v,poly(1,'z','c'),1)
index 7112cb1..386a745 100644 (file)
 s=poly(0,'s');rand('seed',0);w=ssrand(1,1,3);w('A')=w('A')-2*eye();
 t=0:0.05:5;
 //impulse(w) = step (s * w)
-xbasc(0);xset("window",0);xselect();
+clf(0);xset("window",0);xselect();
 plot2d([t',t'],[(csim('step',t,tf2ss(s)*w))',0*t'])
-xbasc(1);xset("window",1);xselect();
+clf(1);xset("window",1);xselect();
 plot2d([t',t'],[(csim('impulse',t,w))',0*t'])
 //step(w) = impulse (s^-1 * w)
-xbasc(3);xset("window",3);xselect();
+clf(3);xset("window",3);xselect();
 plot2d([t',t'],[(csim('step',t,w))',0*t'])
-xbasc(4);xset("window",4);xselect();
+clf(4);xset("window",4);xselect();
 plot2d([t',t'],[(csim('impulse',t,tf2ss(1/s)*w))',0*t'])
 
 //input defined by a time function
 deff('u=input(t)','u=abs(sin(t))')
-xbasc();plot2d([t',t'],[(csim(input,t,w))',0*t'])
- ]]></programlisting>
+clf();plot2d([t',t'],[(csim(input,t,w))',0*t'])
+]]></programlisting>
   </refsection>
   <refsection>
     <title>See Also</title>
index 2c3a4fd..6076b05 100644 (file)
@@ -211,8 +211,8 @@ SYS1 = findABCD(S,N,1,R) ;SYS1.dt=0.1;
 SYS1.X0 = inistate(SYS1,Y',U');
 
 Y1=flts(U,SYS1);
-xbasc();plot2d((1:nsmp)',[Y',Y1'])
- ]]></programlisting>
+clf();plot2d((1:nsmp)',[Y',Y1'])
+]]></programlisting>
   </refsection>
   <refsection>
     <title>See Also</title>
index 7a2030b..629cfdf 100644 (file)
@@ -306,8 +306,8 @@ METH=3;TOL=-1;
 SYS1=syslin(1,A,B,C,D,X0);
 
 Y1=flts(U,SYS1);
-xbasc();plot2d((1:nsmp)',[Y',Y1'])
- ]]></programlisting>
+clf();plot2d((1:nsmp)',[Y',Y1'])
+]]></programlisting>
   </refsection>
   <refsection>
     <title>See Also</title>
index 1c77e04..fc71158 100644 (file)
@@ -249,8 +249,8 @@ SYS1=syslin(1,A,B,C,D);
 SYS1.X0 = inistate(SYS1,Y',U');
 
 Y1=flts(U,SYS1);
-xbasc();plot2d((1:nsmp)',[Y',Y1'])
- ]]></programlisting>
+clf();plot2d((1:nsmp)',[Y',Y1'])
+]]></programlisting>
   </refsection>
   <refsection>
     <title>See Also</title>
index 0740c9e..a0ad757 100644 (file)
@@ -212,8 +212,8 @@ METH=3;TOL=-1;
 SYS1=syslin(1,A,B,C,D,X0);
 
 Y1=flts(U,SYS1);
-xbasc();plot2d((1:nsmp)',[Y',Y1'])
- ]]></programlisting>
+clf();plot2d((1:nsmp)',[Y',Y1'])
+]]></programlisting>
   </refsection>
   <refsection>
     <title>See Also</title>
index 7bef3db..6ab159f 100644 (file)
@@ -103,7 +103,7 @@ frq=logspace(-3,2,200);
 [frq,rep]=repfreq(Sys,frq);  //Frequency response of Sys
 [Sys2,err]=frep2tf(frq,rep,10);Sys2=clean(Sys2)//Sys2 obtained from freq. resp of Sys
 [frq,rep2]=repfreq(Sys2,frq); //Frequency response of Sys2
-xbasc();bode(frq,[rep;rep2])   //Responses of Sys and Sys2
+clf();bode(frq,[rep;rep2])   //Responses of Sys and Sys2
 [sort(spec(Sys('A'))),sort(roots(Sys2('den')))] //poles
 
 dom=1/1000; // Sampling time 
@@ -112,8 +112,8 @@ h=syslin(dom,(z^2+0.5)/(z^3+0.1*z^2-0.5*z+0.08))
 frq=(0:0.01:0.5)/dom;repf=repfreq(h,frq);
 [Sys2,err]=frep2tf(frq,repf,3,dom);
 [frq,rep2]=repfreq(Sys2,frq); //Frequency response of Sys2
-xbasc();plot2d1("onn",frq',abs([repf;rep2])');
- ]]></programlisting>
+clf();plot2d1("onn",frq',abs([repf;rep2])');
+]]></programlisting>
   </refsection>
   <refsection>
     <title>See Also</title>
index 1670aa1..fa74ae2 100644 (file)
@@ -64,7 +64,7 @@
     <programlisting role="example"><![CDATA[ 
 s=poly(0,'s');
 h=syslin('c',(s-1)/(1+5*s+s^2+s^3))
-xbasc();evans(h)
+clf();evans(h)
 K=kpure(h)
 hf=h/.K(1)
 roots(denom(hf))
index 021ab88..ac58297 100644 (file)
@@ -48,7 +48,7 @@
     <title>Examples</title>
     <programlisting role="example"><![CDATA[ 
 h=syslin('c',352*poly(-5,'s')/poly([0,0,2000,200,25,1],'s','c'));
-xbasc();evans(h,100)
+clf();evans(h,100)
 g=krac2(h)
 hf1=h/.g(1);roots(denom(hf1))
 hf2=h/.g(2);roots(denom(hf2))
index 12863bd..8a86d2a 100644 (file)
@@ -62,11 +62,11 @@ h=syslin('c',(s^2+2*0.9*10*s+100)/(s^2+2*0.3*10.1*s+102.01))
 nyquist(h,0.01,100,'(s^2+2*0.9*10*s+100)/(s^2+2*0.3*10.1*s+102.01)')
 m_circle();
 //Example 2:
-xbasc();
+clf();
 h1=h*syslin('c',(s^2+2*0.1*15.1*s+228.01)/(s^2+2*0.9*15*s+225))
 nyquist([h1;h],0.01,100,['h1';'h'])
 m_circle([-8 -6 -4]);
- ]]></programlisting>
+]]></programlisting>
   </refsection>
   <refsection>
     <title>See Also</title>
index cd02e4b..d3ae192 100644 (file)
@@ -284,7 +284,7 @@ SYS1=syslin(1,A,B,C,D);
 SYS1.X0 = inistate(SYS1,Y',U');
 
 Y1=flts(U,SYS1);
-xbasc();plot2d((1:nsmp)',[Y',Y1'])
+clf();plot2d((1:nsmp)',[Y',Y1'])
 
 METH = 2;
 [R,N1,SVAL] = findR(S,Y',U',METH);
@@ -296,8 +296,8 @@ SYS1=syslin(1,A,B,C,D)
 SYS1.X0 = inistate(SYS1,Y',U');
 
 Y1=flts(U,SYS1);
-xbasc();plot2d((1:nsmp)',[Y',Y1'])
- ]]></programlisting>
+clf();plot2d((1:nsmp)',[Y',Y1'])
+]]></programlisting>
   </refsection>
   <refsection>
     <title>See Also</title>
index 19cd36e..98cd555 100644 (file)
@@ -77,7 +77,7 @@ SVM = svplot(sl,logspace(-3,%pi)) (discrete)
     <programlisting role="example"><![CDATA[ 
 x=logspace(-3,3);
 y=svplot(ssrand(2,2,4),x);
-xbasc();plot2d1("oln",x',20*log(y')/log(10));
+clf();plot2d1("oln",x',20*log(y')/log(10));
 xgrid(12)
 xtitle("Singular values plot","(Rd/sec)", "Db");
  ]]></programlisting>
index 029e29d..46853d5 100644 (file)
@@ -109,7 +109,7 @@ deff('[in]=u(t)','if t<3 then in=0;else in=1;end');
 y1=csim(u,instants,sl);plot2d(instants',y1');
 clear u;
 //             Impulse response;
-yi=csim('imp',instants,sl);xbasc();plot2d(instants',yi');
+yi=csim('imp',instants,sl);clf();plot2d(instants',yi');
 yi1=csim('step',instants,s*sl);plot2d(instants',yi1');
 
 //              Discretization
@@ -220,4 +220,4 @@ end
 
 //5+7 by C function
 call('foo',5,1,'d',7,2,'d','out',[1,1],3,'d')
-end
\ No newline at end of file
+end
index 2472820..c443eff 100644 (file)
     <title>Examples</title>
     <programlisting role="example"><![CDATA[ 
 demolist=[
-       'Simulation of a binomial random variable','set figure_style new;xbasc();BinomialT();';
-       'Simulation of a discrete random variable','set figure_style new;xbasc();RndDiscT();';
-       'Simulation of a geometric random variable','set figure_style new;xbasc();GeomT(1000);';
-       'Simulation of a Poisson random variable','set figure_style new;xbasc();PoissonT() ;';
-       'Simulation of an exponential random variable','set figure_style new;xbasc();ExpT();';
-       'Simulation of a Weibull random variable','set figure_style new;xbasc();WeibullT();';
-       'Simulation of an hyper geometric random variable','set figure_style new;xbasc();HyperGeomT();';
-       'Simulation of an Erlang random variable','set figure_style new;xbasc();ErlangT();'];
+       'Simulation of a binomial random variable','set figure_style new;clf();BinomialT();';
+       'Simulation of a discrete random variable','set figure_style new;clf();RndDiscT();';
+       'Simulation of a geometric random variable','set figure_style new;clf();GeomT(1000);';
+       'Simulation of a Poisson random variable','set figure_style new;clf();PoissonT() ;';
+       'Simulation of an exponential random variable','set figure_style new;clf();ExpT();';
+       'Simulation of a Weibull random variable','set figure_style new;clf();WeibullT();';
+       'Simulation of an hyper geometric random variable','set figure_style new;clf();HyperGeomT();';
+       'Simulation of an Erlang random variable','set figure_style new;clf();ErlangT();'];
 
 demo_function_choice();
  ]]></programlisting>
index 9411c69..a5befac 100644 (file)
     <title>Exemples</title>
     <programlisting role="example"><![CDATA[ 
 demolist=[
-       'Simulation of a binomial random variable','set figure_style new;xbasc();BinomialT();';
-       'Simulation of a discrete random variable','set figure_style new;xbasc();RndDiscT();';
-       'Simulation of a geometric random variable','set figure_style new;xbasc();GeomT(1000);';
-       'Simulation of a Poisson random variable','set figure_style new;xbasc();PoissonT() ;';
-       'Simulation of an exponential random variable','set figure_style new;xbasc();ExpT();';
-       'Simulation of a Weibull random variable','set figure_style new;xbasc();WeibullT();';
-       'Simulation of an hyper geometric random variable','set figure_style new;xbasc();HyperGeomT();';
-       'Simulation of an Erlang random variable','set figure_style new;xbasc();ErlangT();'];
+       'Simulation of a binomial random variable','set figure_style new;clf();BinomialT();';
+       'Simulation of a discrete random variable','set figure_style new;clf();RndDiscT();';
+       'Simulation of a geometric random variable','set figure_style new;clf();GeomT(1000);';
+       'Simulation of a Poisson random variable','set figure_style new;clf();PoissonT() ;';
+       'Simulation of an exponential random variable','set figure_style new;clf();ExpT();';
+       'Simulation of a Weibull random variable','set figure_style new;clf();WeibullT();';
+       'Simulation of an hyper geometric random variable','set figure_style new;clf();HyperGeomT();';
+       'Simulation of an Erlang random variable','set figure_style new;clf();ErlangT();'];
 
 demo_function_choice();
  ]]></programlisting>
index e5255eb..a34e587 100644 (file)
@@ -22,7 +22,7 @@ function []=demo_folder_choice(path,ch)
                        else
                                set('figure_style','old');
                                xdel();
-                               xbasc();
+                               clf();
                                demoexc(num);
                        end
                end
@@ -51,7 +51,7 @@ function []=demo_folder_choice(path,ch)
                                        return
                                else
                                        xdel(0);
-                                       xbasc();
+                                       clf();
                                        demoex(num);
                                end
                        end
index d190daa..ec6725d 100644 (file)
 
     <programlisting role="example"><![CDATA[ 
 // first example
-n=10;p=0.3; xbasc(); plot2d3(0:n,binomial(p,n));
+n=10;p=0.3; clf(); plot2d3(0:n,binomial(p,n));
 
 // second example 
 n=50;p=0.4;
 mea=n*p; sigma=sqrt(n*p*(1-p));
 x=( (0:n)-mea )/sigma;
-xbasc()
+clf()
 plot2d(x, sigma*binomial(p,n));
 deff('y=Gauss(x)','y=1/sqrt(2*%pi)*exp(-(x.^2)/2)')
 plot2d(x, Gauss(x), style=2);
index 32b7563..8e8685c 100644 (file)
@@ -165,7 +165,7 @@ m = 50000 ; n = 10;
 X = grand(m,1,"def");
 val = linspace(0,1,n+1)';
 [ind, occ] = dsearch(X, val);
-xbasc() ; plot2d2(val, [occ/m;0])  // no normalisation : y must be near 1/n
+clf() ; plot2d2(val, [occ/m;0])  // no normalisation : y must be near 1/n
 
 
 // example #2 (elementary stat for B(N,p))
@@ -173,7 +173,7 @@ N = 8 ; p = 0.5; m = 50000;
 X = grand(m,1,"bin",N,p); val = (0:N)';
 [ind, occ] = dsearch(X, val, "d");
 Pexp = occ/m; Pexa = binomial(p,N); 
-xbasc() ; hm = 1.1*max(max(Pexa),max(Pexp));
+clf() ; hm = 1.1*max(max(Pexa),max(Pexp));
 plot2d3([val val+0.1], [Pexa' Pexp],[1 2],"111",  ...
         "Pexact@Pexp", [-1 0 N+1 hm],[0 N+2 0 6])
 xtitle(  "binomial distribution B("+string(N)+","+string(p)+") :" ...
@@ -197,7 +197,7 @@ deff("y=Kr(t,k,x)","y=(t-x(k+1)).*Lr(t,k,x).^2")
 
 // plot the curve
 Y = y(ind).*Hl(X,ind) + y(ind+1).*Hr(X,ind) + d(ind).*Kl(X,ind) + d(ind+1).*Kr(X,ind);
-xbasc(); plot2d(X,Y,2) ; plot2d(x,y,-9,"000") 
+clf(); plot2d(X,Y,2) ; plot2d(x,y,-9,"000") 
 xtitle("an Hermite piecewise polynomial")
 // NOTE : you can verify by adding these ones : 
 // YY = interp(X,x,y,d); plot2d(X,YY,3,"000")
index 7803be3..ffe1a3b 100644 (file)
@@ -177,7 +177,7 @@ zz1 = interp2d(XX,YY, x, y, C, "C0");
 zz2 = interp2d(XX,YY, x, y, C, "by_zero");
 zz3 = interp2d(XX,YY, x, y, C, "periodic");
 zz4 = interp2d(XX,YY, x, y, C, "natural");
-xbasc()
+clf()
 subplot(2,2,1)
 plot3d(xx, yy, zz1, flag=[2 6 4])
 xtitle("extrapolation with the C0 outmode")
index 2803609..21f5f08 100644 (file)
@@ -109,7 +109,7 @@ y = linspace(-1,1,ny);
 //deff("z=f(x,y)","z=128*x.^2 .*(1-x).^2 .*y.^2 .*(1-y).^2");
 deff("z=f(x,y)","z=x.^2 + y.^3")
 Z = f(X,Y);
-xbasc()
+clf()
 plot3d(x,y,Z, flag=[2 6 4]); xselect()
 
 // create a simple 3d grid
@@ -134,7 +134,7 @@ for j=1:ny
    XF = [XF xf]; YF = [YF yf]; ZF = [ZF zf];
 end
 
-xbasc()
+clf()
 plot3d(XF,YF,ZF, flag=[0 6 3], leg="X@Y@Z")
 xtitle("A 3d grid !"); xselect()
  ]]></programlisting>
index 3e3c073..0ba1239 100644 (file)
@@ -163,7 +163,7 @@ xx = linspace(0,2*%pi,m); yy = xx;
 [XX,YY] = ndgrid(xx,yy);
 zz = interp2d(XX,YY, x, y, C);
 emax = max(abs(zz - cos(xx')*cos(yy)));
-xbasc()
+clf()
 plot3d(xx, yy, zz, flag=[2 4 4])
 [X,Y] = ndgrid(x,y);
 param3d1(X,Y,list(z,-9*ones(1,n)), flag=[0 0])
@@ -182,7 +182,7 @@ ZP2 = linear_interpn(XP, YP, x, y, z);
 ZP3 = interp2d(XP, YP, x, y, splin2d(x, y, z, "natural"));
 ZP4 = interp2d(XP, YP, x, y, splin2d(x, y, z, "monotone"));
 xset("colormap", jetcolormap(64))
-xbasc()
+clf()
 subplot(2,2,1)
 plot3d1(xp, yp, ZP1, flag=[2 2 4])
 xtitle("not_a_knot")
@@ -212,7 +212,7 @@ xp = linspace(a,b, np);
 zp1 = interp2d(XP, YP, x, x, splin2d(x,x,z));
 zp2 = interp2d(XP, YP, x, x, splin2d(x,x,z,"monotone"));
 // plot
-xbasc()
+clf()
 xset("colormap",jetcolormap(128))
 subplot(1,2,1)
 plot3d1(xp, xp, zp1, flag=[-2 6 4])
index f25a76e..ea7c7c2 100644 (file)
@@ -39,8 +39,6 @@ current_driver=driver()</synopsis>
     <para>
     This function is used to select a graphics driver, or with no arguments 
     to get the current graphics driver name.
-    Most of the time, a user can ignore this function and change the driver
-    by calling high level functions such as <literal>xbasc</literal>.
     The selected driver can be one of the followings:
   </para>
     <variablelist>
@@ -102,14 +100,6 @@ convert -delay 10  img*.gif anim.gif
  ]]></programlisting>
   </refsection>
   <refsection>
-    <title>See Also</title>
-    <simplelist type="inline">
-      <member>
-        <link linkend="xbasc">xbasc</link>
-      </member>
-    </simplelist>
-  </refsection>
-  <refsection>
     <title>Authors</title>
     <para>J.Ph.C.  </para>
   </refsection>
index 81a0536..b8c0970 100644 (file)
@@ -15,7 +15,7 @@
 x=1:.5:100;
 y=2:200;
 xset("window",0);
-xbasc();
+clf();
 // l,r,t,b
 xsetech(arect=[.01,.01,.01,.01]);
 plot2d(x,y,frameflag=8,axesflag=1);
index 9eca824..a4c1834 100644 (file)
@@ -19,7 +19,7 @@
 x=1:.5:100;
 y=2:200;
 xset("window",0);
-xbasc();
+clf();
 // l,r,t,b
 xsetech(arect=[.01,.01,.01,.01]);
 plot2d(x,y,frameflag=8,axesflag=1);
index d5077da..19ad93b 100644 (file)
@@ -6,9 +6,9 @@
 //
 
 function[]=bike()
-xbasc();xselect()
+clf();xselect()
 rect=[0,0,10,10];
-xbasc();
+clf();
 isoview(0,11,0,7)
 //plot2d([],[],[1],"010"," ",rect);
 
index 5bd162c..e5545ec 100644 (file)
@@ -16,9 +16,9 @@ levels=[-6:-1,-logspace(-5,0,10),logspace(-5,0,10),1:8];
   h = [r g b];
   xset('colormap',h);
 xset('fpf',' ');
-xbasc();
+clf();
 contourf([],[],z,[-6:-1,-logspace(-5,0,10),logspace(-5,0,10),1:8],0*ones(1,m))
 xset('fpf','');
 halt()
-xbasc();
+clf();
 contourf([],[],z,[-6:-1,-logspace(-5,0,10),logspace(-5,0,10),1:8]);
index 0acce24..960cab9 100644 (file)
@@ -9,7 +9,7 @@
 mode(0)
 path=get_absolute_file_path('fec.ex1');
 exec(path+'fec_demo.sci');
-xbasc();
+clf();
 xset("colormap",jetcolormap(128));
 new_style = get("figure_style")=="new";
 
index 401529b..78eed85 100644 (file)
@@ -43,7 +43,7 @@ drawnow();
 messagebox('click to continue',"modal");
 
 
-xbasc();
+clf();
 drawlater();
 emc2C(1,6,path+'MESH.VAL',[-2,-2,2,2]);
 emc2V(2,3,6,20,path+'MESH.VAL',[-2,-2,2,2]);
index f93228f..52e8ff9 100644 (file)
@@ -6,7 +6,7 @@
 //
 
 mode(-1);
-xbasc();
+clf();
 drawlater();
 mode(1);
 ncolor=228;
index e09d254..8e1dd5b 100644 (file)
    en=ene1(t,pe1,pe2);
 //
 
-xbasc()
+clf()
 plot2d([t;t]',yt')
 xtitle(['main intensity';'resistor'],...
       'time','intensity');
 //
 cw=xget("window");c_c=cw;if cw>=1 then;cw=cw-1;else cw=cw+1;end
-xset("window",cw); xbasc(cw);
+xset("window",cw); clf(cw);
 plot2d2("gnn",t',en',[1,-1],"111",...
      "en",[mini(t),mini(en)-0.5,maxi(t),maxi(en)+0.5])
 xset("window",c_c); 
@@ -56,4 +56,4 @@ xset("window",c_c);
 //
 //   save('oscil.sa');
 halt();
-xbasc(0:1);
+clf(0:1);
index 47eea63..9fc1256 100644 (file)
@@ -62,7 +62,7 @@ mode(1)
    omeg=exp(log(10)*(-3:0.05:3));
    rep_freq=exp(-tr*omeg*%i*2*%pi).*repfreq(h,omeg);
    bode(omeg,rep_freq);halt()
-   halt();xbasc();
+   halt();clf();
    black(omeg,rep_freq);
    halt()
 //
@@ -100,7 +100,7 @@ mode(1)
 // -------------------------------
    e=100.d-6*ones(1,400);
    [tetae,x]=ddls_sim(ad,bd,c,tr,td,e);
-   xbasc();
+   clf();
    plot2d1("onn",(1:400)'*td,[e;tetae]');
    xtitle(['step  100mrd';'response']);
    halt()
@@ -109,7 +109,7 @@ mode(1)
 // ---------------------------------------------
    s1=1.d-5*sin(200*%pi*(1:600)*td);
    [tetas1,x]=ddls_sim(ad,bd,c,tr,td,s1);
-   xbasc();
+   clf();
    plot2d1("onn",(1:600)'*td,[s1;tetas1]');
    xtitle(['sinusoidale input 10mrd 100hz';'response']);
    halt()
@@ -118,7 +118,7 @@ mode(1)
 // ---------------------------------------------
    s2=3.d-5*sin(600*%pi*(1:600)*td);
    [tetas2,x]=ddls_sim(ad,bd,c,tr,td,s2);
-   xbasc();
+   clf();
    plot2d1("onn",(1:600)'*td,[s2;tetas2]');
    xtitle(['sinus input 3mrd 300hz';'response']);
 //
index ab1f669..68e6c47 100644 (file)
@@ -8,7 +8,7 @@
 // demo of macros portrait & fchamp
 //  limit circle
 
-xbasc();
+clf();
 part1()
 // phase portrait : dimension 2
 portrait(cycllim,'default',[-2,-2,2,2],[500,0.1],'f',[0,1;0.5,2]);
index 97511b7..b445723 100644 (file)
@@ -11,18 +11,18 @@ oldln=lines();lines(0)
 
 
 
-demolist=['Surface with holes 1','xbasc();showinstr(hole3d);hole3d();';
-         'Surface with holes 2','xbasc();showinstr(hole3d1);hole3d1();';
-         'Sphere','xbasc();showinstr(sphere);sphere();';
-         'Shell','xbasc();showinstr(shell);shell();';
-         'Spiral','xbasc();showinstr(spiral);spiral();';
-         'Rings','xbasc();showinstr(rings);rings();';
-         'Torus','xbasc();showinstr(torus);torus();';
-         'Torus 1','xbasc();showinstr(torus1);torus1();';
-         'Moebius','xbasc();showinstr(moebius);moebius();';
-         'Tube','xbasc();showinstr(tube);tube(50);';
-         'Black Hole','xbasc();showinstr(bh);bh(50);';
-         'Riemann surface (n=2)','xbasc();showinstr(cplxroot);cplxroot(2,20,130,45);']
+demolist=['Surface with holes 1','clf();showinstr(hole3d);hole3d();';
+         'Surface with holes 2','clf();showinstr(hole3d1);hole3d1();';
+         'Sphere','clf();showinstr(sphere);sphere();';
+         'Shell','clf();showinstr(shell);shell();';
+         'Spiral','clf();showinstr(spiral);spiral();';
+         'Rings','clf();showinstr(rings);rings();';
+         'Torus','clf();showinstr(torus);torus();';
+         'Torus 1','clf();showinstr(torus1);torus1();';
+         'Moebius','clf();showinstr(moebius);moebius();';
+         'Tube','clf();showinstr(tube);tube(50);';
+         'Black Hole','clf();showinstr(bh);bh(50);';
+         'Riemann surface (n=2)','clf();showinstr(cplxroot);cplxroot(2,20,130,45);']
 
 exec(path+'Macros.sci');
 exec(path+'surfaces.sci');
index dcb93d2..1d9c726 100644 (file)
@@ -89,7 +89,7 @@ function z=surf1(x,y), z=x*y, endfunction
 function z=surf2(x,y), z=x^2-y^2, endfunction
 function z=surf3(x,y), z=x^3+y^2, endfunction
 function z=surf4(x,y), z=x^2+y^2, endfunction
-xbasc()
+clf()
 xset("colormap",[jetcolormap(64);hotcolormap(64)])
 x = linspace(-1,1,60);
 y = linspace(-1,1,60);
@@ -115,7 +115,7 @@ xselect()
 
 // example #2: plot surf3 and add some contour lines 
 function z=surf3(x,y), z=x^3+y^2, endfunction
-xbasc()
+clf()
 x = linspace(-1,1,60);
 y = linspace(-1,1,60);
 xset("colormap",hotcolormap(128))
@@ -130,7 +130,7 @@ xselect()
 // example #3: plot surf3 and use zminmax and colout optional arguments
 //             to restrict the plot for -0.5<= z <= 1
 function z=surf3(x,y), z=x^3+y^2, endfunction
-xbasc()
+clf()
 x = linspace(-1,1,60);
 y = linspace(-1,1,60);
 xset("colormap",jetcolormap(128))
index 4d86b60..a54b354 100644 (file)
@@ -73,7 +73,7 @@
 x = linspace(0,1,81);
 z = cos(2*%pi*x)'*sin(2*%pi*x);
 zm = min(z); zM = max(z);
-xbasc()
+clf()
 xset("colormap",jetcolormap(64))
 colorbar(zm,zM)
 Sgrayplot(x,x,z)
@@ -85,7 +85,7 @@ z = cos(2*%pi*x)'*sin(2*%pi*x);
 zm = min(z); zM = max(z);
 zz = abs(0.5*cos(2*%pi*x)'*cos(2*%pi*x));
 zzm = min(zz); zzM = max(zz);
-xbasc();
+clf();
 xset("colormap",jetcolormap(64))
 
 drawlater() ;
@@ -113,7 +113,7 @@ zz = abs(0.5*cos(2*%pi*x)'*cos(2*%pi*x));
 zzm = min(zz); zzM = max(zz);
 [xf,yf,zf]=genfac3d(x,x,zz);
 nb_col = 64;
-xbasc()
+clf()
 xset("colormap",hotcolormap(nb_col))
 drawlater() ;
 colorbar(zzm,zzM,fmt="%.1f")
index a8cd51c..3f7ad6f 100644 (file)
@@ -298,10 +298,10 @@ function z=my_surface(x,y),z=x*sin(x)^2*cos(y),endfunction
 contour(t,t,my_surface,10)
 // changing the format of the printing of the levels
 xset("fpf","%.1f")
-xbasc()
+clf()
 contour(t,t,my_surface,10)
 // 3D
-xbasc()
+clf()
 z=feval(t,t,my_surface);
 plot3d(t,t,z);contour(t,t,z+0.2*abs(z),20,flag=[0 2 4]);
  ]]></programlisting>
index a909b6e..fd70d31 100644 (file)
@@ -159,11 +159,11 @@ b = [zeros(2*n,1); (1:m-2*n)'/(m-2*n)];
 h = [r g b];
 xset('colormap',h);
 xset('fpf',' ');
-xbasc();
+clf();
 contourf([],[],z,[-6:-1,-logspace(-5,0,10),logspace(-5,0,10),1:8],0*ones(1,m))
 
 xset('fpf','');
-xbasc();
+clf();
 contourf([],[],z,[-6:-1,-logspace(-5,0,10),logspace(-5,0,10),1:8]);
  ]]></programlisting>
   </refsection>
index 31e0860..066ae73 100644 (file)
@@ -157,7 +157,7 @@ y = [0 0 1  1];
 T = [1 1 2 3 1;
      2 3 4 1 1];
 z = [0 1 0 -1];  // values of the func at each vertices
-xbasc()
+clf()
 xset("colormap",jetcolormap(64))
 subplot(1,2,1)
   colorbar(-1,1)
@@ -171,7 +171,7 @@ xselect()
 
 // this example shows the effect of zminmax and uses the
 // previous example datas (you have to execute the it before)
-xbasc()
+clf()
 xset("colormap",jetcolormap(64))
 colorbar(-0.5,0.5)  // be careful colorbar must be set by hands !
 fec(x,y,T,z,strf="040", zminmax=[-0.5 0.5], mesh=%t)
@@ -180,7 +180,7 @@ xselect()
 
 // this example shows the effect of zminmax and colout. It uses
 // also the datas of the first example (you have to execute the it before)
-xbasc()
+clf()
 xset("colormap",jetcolormap(64))
 subplot(2,2,1)
   colorbar(-0.5,0.5)
@@ -203,7 +203,7 @@ xselect()
 // this example shows a feature from colminmax:
 // playing with 2 colormaps for 2 subplots. It
 // uses also the data of the first example.
-xbasc()
+clf()
 xset("colormap",[hotcolormap(64);jetcolormap(64)])
 subplot(1,2,1)
   colorbar(-1,1,[1 64])
index bae69bf..c56f452 100644 (file)
     <title>Examples</title>
     <programlisting role="example"><![CDATA[ 
 y=(0:0.33:145.78)';
-xbasc();plot2d1('enn',0,y)
+clf();plot2d1('enn',0,y)
 [ymn,ymx,np]=graduate(mini(y),maxi(y))
 rect=[1,ymn,prod(size(y)),ymx];
-xbasc();plot2d1('enn',0,y,1,'011',' ',rect,[10,3,10,np])
- ]]></programlisting>
+clf();plot2d1('enn',0,y,1,'011',' ',rect,[10,3,10,np])
+]]></programlisting>
   </refsection>
   <refsection>
     <title>See Also</title>
index ed0a578..3633b54 100644 (file)
@@ -133,10 +133,17 @@ h=a.children
 
 h.data_mapping="direct";
    
+<<<<<<< HEAD:scilab/modules/graphics/help/en_US/grayplot_properties.xml
 // A 2D ploting of a matrix using colors 
 xbasc()
 a=get("current_axes");
 a.data_bounds=  [0,0;4,4];
+=======
+   // A 2D ploting of a matrix using colors 
+   clf()
+   a=get("current_axes");
+   a.data_bounds=  [0,0;4,4];
+>>>>>>> f5cecfa... Removed references to the xbasc function:scilab/modules/graphics/help/en_US/grayplot_properties.xml
   
 b=5*ones(11,11); b(2:10,2:10)=4; b(5:7,5:7)=2;
 Matplot1(b,[1,1,3,3])  ;
index 9e80471..57f0351 100644 (file)
@@ -99,7 +99,7 @@ clf();histplot(20,d,leg='rand(1,10000,''normal'')',style=16, rect=[-3,0,3,0.5]);
 // example #2: histogram of a binomial (B(6,0.5)) random sample
 d = grand(1000,1,"bin", 6, 0.5);
 c = linspace(-0.5,6.5,8);
-xbasc()
+clf()
 subplot(2,1,1)
   histplot(c, d, style=2)
   xtitle("normalized histogram")
@@ -111,7 +111,7 @@ subplot(2,1,2)
 lambda = 2;
 X = grand(100000,1,"exp", 1/lambda);
 Xmax = max(X);
-xbasc()
+clf()
 histplot(40, X, style=2)
 x = linspace(0,max(Xmax),100)';
 plot2d(x,lambda*exp(-lambda*x),strf="000",style=5)
index bdb2e89..ceddfbe 100644 (file)
@@ -50,7 +50,7 @@
     <programlisting role="example"><![CDATA[ 
 t=[0:0.1:2*%pi]';
 plot2d(sin(t),cos(t))
-xbasc()
+clf()
 isoview(-1,1,-1,1)
 plot2d(sin(t),cos(t),1,"001")
 xset("default")
index 4ee598f..1e863df 100644 (file)
@@ -60,10 +60,10 @@ x=0:0.1:2*%pi;
 // simple plot
 oldplot(sin(x))
 // using captions
-xbasc()
+clf()
 oldplot(x,sin(x),"sin","time","plot of sinus")
 // plot 2 functions
-xbasc()
+clf()
 oldplot([sin(x);cos(x)])
  ]]></programlisting>
   </refsection>
index bd8fb4c..f82e8ca 100644 (file)
     plotting is used.</para>
 
     <para>By default, successive plots are superposed. To clear the previous
-    plot, use <literal>xbasc()</literal>.</para>
+    plot, use <literal>clf()</literal>.</para>
 
     <para>See the meaning of the parameters above for a complete
     description.</para>
 //simple plot 
 x=[0:0.1:2*%pi]';
 plot2d(sin(x))
-xbasc()
+clf()
 plot2d(x,sin(x))
 //multiple plot
-xbasc()
+clf()
 plot2d(x,[sin(x) sin(2*x) sin(3*x)])
 // multiple plot giving the dimensions of the frame 
 // old syntax and new syntax
-xbasc()
+clf()
 plot2d(x,[sin(x) sin(2*x) sin(3*x)],1:3,"011","",[0,0,6,0.5])
-xbasc()
+clf()
 plot2d(x,[sin(x) sin(2*x) sin(3*x)],rect=[0,0,6,0.5])
 //multiple plot with captions and given tics // old syntax and new syntax
-xbasc()
+clf()
 plot2d(x,[sin(x) sin(2*x) sin(3*x)],..
+<<<<<<< HEAD:scilab/modules/graphics/help/en_US/plot2d_old_version.xml
        [1,2,3],"111","L1@L2@L3",[0,-2,2*%pi,2],[2,10,2,10]);
 xbasc()
+=======
+  [1,2,3],"111","L1@L2@L3",[0,-2,2*%pi,2],[2,10,2,10]);
+clf()
+>>>>>>> f5cecfa... Removed references to the xbasc function:scilab/modules/graphics/help/en_US/plot2d_old_version.xml
 plot2d(x,[sin(x) sin(2*x) sin(3*x)],..
        [1,2,3],leg="L1@L2@L3",nax=[2,10,2,10],rect=[0,-2,2*%pi,2])
 // isoview
-xbasc()
+clf()
 plot2d(x,sin(x),1,"041")
 // scale
-xbasc()
+clf()
 plot2d(x,sin(x),1,"061")
 // auto scaling with previous plots
-xbasc()
+clf()
 plot2d(x,sin(x),1)
 plot2d(x,2*sin(x),2) 
 plot2d(2*x,cos(x),3)
 // axis on the right 
-xbasc()
+clf()
 plot2d(x,sin(x),1,"183","sin(x)")
 // centered axis 
-xbasc()
+clf()
 plot2d(x,sin(x),1,"184","sin(x)")
 // axis centered at (0,0)
-xbasc()
+clf()
 plot2d(x-4,sin(x),1,"185","sin(x)")
  ]]></programlisting>
   </refsection>
@@ -456,7 +461,7 @@ plot2d(x-4,sin(x),1,"185","sin(x)")
 
       <member><link linkend="plot2d4">plot2d4</link></member>
 
-      <member><link linkend="xbasc">xbasc</link></member>
+      <member><link linkend="clf">clf</link></member>
 
       <member><link linkend="xset">xset</link></member>
     </simplelist>
index b3ddfb0..2d2877d 100644 (file)
@@ -276,16 +276,16 @@ t=[0:0.3:2*%pi]'; z=sin(t)*cos(t');
 plot3d(t,t,z)
 // same plot using facets computed by genfac3d
 [xx,yy,zz]=genfac3d(t,t,z);
-xbasc()
+clf()
 plot3d(xx,yy,zz)
 // multiple plots
-xbasc()
+clf()
 plot3d([xx xx],[yy yy],[zz 4+zz])
 // multiple plots using colors
-xbasc()
+clf()
 plot3d([xx xx],[yy yy],list([zz zz+4],[4*ones(1,400) 5*ones(1,400)]))
 // simple plot with viewpoint and captions
-xbasc()
+clf()
 plot3d(1:10,1:20,10*rand(10,20),35,45,"X@Y@Z",[2,2,3])
 // plot of a sphere using facets computed by eval3dp
 deff("[x,y,z]=sph(alp,tet)",["x=r*cos(alp).*cos(tet)+orig(1)*ones(tet)";..
@@ -293,16 +293,22 @@ deff("[x,y,z]=sph(alp,tet)",["x=r*cos(alp).*cos(tet)+orig(1)*ones(tet)";..
      "z=r*sin(alp)+orig(3)*ones(tet)"]);
 r=1; orig=[0 0 0];
 [xx,yy,zz]=eval3dp(sph,linspace(-%pi/2,%pi/2,40),linspace(0,%pi*2,20));
-xbasc();plot3d(xx,yy,zz)
+clf();plot3d(xx,yy,zz)
 
-xbasc();xset('colormap',hotcolormap(128));
+clf();xset('colormap',hotcolormap(128));
 r=0.3;orig=[1.5 0 0];
 [xx1,yy1,zz1]=eval3dp(sph,linspace(-%pi/2,%pi/2,40),linspace(0,%pi*2,20));
 cc=(xx+zz+2)*32;cc1=(xx1-orig(1)+zz1/r+2)*32;   
-xbasc();plot3d1([xx xx1],[yy yy1],list([zz,zz1],[cc cc1]),70,80)
+clf();plot3d1([xx xx1],[yy yy1],list([zz,zz1],[cc cc1]),70,80)
 
+<<<<<<< HEAD:scilab/modules/graphics/help/en_US/plot3d_old_version.xml
 xbasc();plot3d1([xx xx1],[yy yy1],list([zz,zz1],[cc cc1]),theta=70,alpha=80,flag=[5,6,3])
  ]]></programlisting>
+=======
+clf();plot3d1([xx xx1],[yy yy1],list([zz,zz1],[cc cc1]),theta=70,alpha=80,flag=[5,6,3])
+  ]]></programlisting>
+>>>>>>> f5cecfa... Removed references to the xbasc function:scilab/modules/graphics/help/en_US/plot3d_old_version.xml
   </refsection>
   <refsection>
     <title>See Also</title>
index 88e35f8..61368d4 100644 (file)
@@ -80,9 +80,6 @@ replot([-3,-2,8,4],f.children(2))
         <link linkend="xbasr">xbasr</link>
       </member>
       <member>
-        <link linkend="xbasc">xbasc</link>
-      </member>
-      <member>
         <link linkend="clf">clf</link>
       </member>
     </simplelist>
index 07b17ea..9ae88ec 100644 (file)
@@ -48,7 +48,7 @@
     <programlisting role="example"><![CDATA[ 
 t=[0:0.1:2*%pi]';
 plot2d(sin(t),cos(t))
-xbasc()
+clf()
 square(-1,-1,1,1)
 plot2d(sin(t),cos(t))
 xset("default")
index ccb7833..a537e5a 100644 (file)
@@ -49,7 +49,7 @@
          might be used instead.
        </para>
     <para>
-               Function <literal>xbasc</literal> is obsolete.
+               The <literal>xbasc</literal> function is obsolete and will be removed in Scilab 5.3.
                To erase a figure, please use instead the <literal>clf</literal> or <literal>delete</literal> functions.
        </para>
 
index 2e9256d..61995a9 100644 (file)
@@ -52,7 +52,7 @@
     <title>See Also</title>
     <simplelist type="inline">
       <member>
-        <link linkend="xbasc">xbasc</link>
+        <link linkend="clf">clf</link>
       </member>
     </simplelist>
   </refsection>
index d2afcfe..1fa939b 100644 (file)
@@ -75,7 +75,7 @@ xsetech([0,0,1.0,0.5])
 // get the graphic scales of second subwindow 
 xsetech([0,0.5,1.0,0.5])
 [wrect,frect,logflag,arect]=xgetech();
-xbasc();
+clf();
 xset('default')
  ]]></programlisting>
   </refsection>
index c6209f2..911e347 100644 (file)
@@ -70,8 +70,8 @@ xset()</synopsis>
         <term>xset("auto clear","on"|"off")</term>
         <listitem>
           <para>Switch "on" or "off" the auto clear mode for graphics. When the
-        auto clear mode is "on", successive plots are not superposed, ie an
-        <literal>xbasc()</literal> operation (the graphics window is cleared and the
+        auto clear mode is "on", successive plots are not superposed, ie a
+        <literal>clf()</literal> operation (the graphics window is cleared and the
         associated recorded graphics is erased) is performed before each high
         level graphics function. Default value is "off".</para>
         </listitem>
@@ -209,7 +209,7 @@ xset()</synopsis>
         flag=1 the graphics are done on a pixmap and are sent to the graphics
         window with the command <literal>xset("wshow")</literal>. The pixmap is
         cleared with the command <literal>xset("wwpc")</literal>. Note that the
-        usual command <literal>xbasc()</literal> also clears the pixmap.</para>
+        usual command <literal>clf()</literal> also clears the pixmap.</para>
         </listitem>
       </varlistentry>
       <varlistentry>
index 0ad586f..2d0d1ac 100644 (file)
@@ -73,7 +73,7 @@ xsetech()</synopsis>
     remains unchanged. the default value of <literal>rect</literal> is <literal>[0,0,1,1]</literal>
     (at window creation, when switching back to default value with
     <literal>xset('default')</literal> or when clearing graphic recorded events
-    <literal>xbasc()</literal>).</para>
+    <literal>clf()</literal>).</para>
     <para><literal>arect=[x_left, x_right,y_up,y_down]</literal> is used to set the graphic
     frame inside the subwindow. The graphic frame is specified (like
     <literal>wrect</literal>) using proportion of the width or height of the current
@@ -99,7 +99,7 @@ xsetech([0,0.5,1.0,0.5])
 // and we change it with the use of the rect argument in plot2d 
 plot2d([1:10]',[1:10]',1,"011"," ",[-6,-6,6,6])
 // Four plots on a single graphics window 
-xbasc()
+clf()
 xset("font",2,0)
 xsetech([0,0,0.5,0.5]); plot3d()
 xsetech([0.5,0,0.5,0.5]); plot2d()
@@ -108,14 +108,14 @@ xsetech([0,0.5,0.5,0.5]); histplot()
 // back to default values for the sub-window 
 xsetech([0,0,1,1])
 // One plot with changed arect 
-xbasc()
+clf()
 xset("default")
 xsetech(arect=[0,0,0,0]) 
 x=1:0.1:10;plot2d(x',sin(x)')
-xbasc()
+clf()
 xsetech(arect=[1/8,1/8,1/16,1/4])
 x=1:0.1:10;plot2d(x',sin(x)')
-xbasc()
+clf()
 xset("default")
  ]]></programlisting>
   </refsection>
index e346025..a8fabc5 100644 (file)
@@ -70,7 +70,7 @@ alphabet=["a" "b" "c" "d" "e" "f" "g" ..
           "h" "i" "j" "k" "l" "m" "n" ..
           "o" "p" "q" "r" "s" "t" "u" ..
           "v" "w" "x" "y" "z"];
-xbasc()
+clf()
 plot2d([0;1],[0;2],0)
 xstring(0.1,1.8,alphabet)     // alphabet
 xstring(0.1,1.6,alphabet,0,1) // alphabet in a box
index 6ad95b6..cd086d1 100644 (file)
@@ -152,11 +152,11 @@ b = [zeros(2*n,1); (1:m-2*n)'/(m-2*n)];
 h = [r g b];
 xset('colormap',h);
 xset('fpf',' ');
-xbasc();
+clf();
 contourf([],[],z,[-6:-1,-logspace(-5,0,10),logspace(-5,0,10),1:8],0*ones(1,m))
 
 xset('fpf','');
-xbasc();
+clf();
 contourf([],[],z,[-6:-1,-logspace(-5,0,10),logspace(-5,0,10),1:8]);
  ]]></programlisting>
   </refsection>
index 075be11..2f7efbf 100644 (file)
@@ -97,7 +97,7 @@ y = [0 0 1  1];
 T = [1 1 2 3 1;
      2 3 4 1 1];
 z = [0 1 0 -1];  // values of the func at each vertices
-xbasc()
+clf()
 xset("colormap",jetcolormap(64))
 subplot(1,2,1)
   colorbar(-1,1)
@@ -111,7 +111,7 @@ xselect()
 
 // this example shows the effect of zminmax and uses the
 // previous example datas (you have to execute the it before)
-xbasc()
+clf()
 xset("colormap",jetcolormap(64))
 colorbar(-0.5,0.5)  // be careful colorbar must be set by hands !
 fec(x,y,T,z,strf="040", zminmax=[-0.5 0.5], mesh=%t)
@@ -120,7 +120,7 @@ xselect()
 
 // this example shows the effect of zminmax and colout. It uses
 // also the datas of the first example (you have to execute the it before)
-xbasc()
+clf()
 xset("colormap",jetcolormap(64))
 subplot(2,2,1)
   colorbar(-0.5,0.5)
@@ -143,7 +143,7 @@ xselect()
 // this example shows a feature from colminmax:
 // playing with 2 colormaps for 2 subplots. It
 // uses also the data of the first example.
-xbasc()
+clf()
 xset("colormap",[hotcolormap(64);jetcolormap(64)])
 subplot(1,2,1)
   colorbar(-1,1,[1 64])
index 8387432..db58b98 100644 (file)
   </refsection>
   <refsection>
     <title>Exemples</title>
+<<<<<<< HEAD:scilab/modules/graphics/help/fr_FR/graduate.xml
     <programlisting role="example"><![CDATA[ 
 y=(0:0.33:145.78)';
 xbasc();plot2d1('enn',0,y)
 [ymn,ymx,np]=graduate(mini(y),maxi(y))
 rect=[1,ymn,prod(size(y)),ymx];
 xbasc();plot2d1('enn',0,y,1,'011',' ',rect,[10,3,10,np])
+=======
+    <programlisting role="example"><![CDATA[
+  y=(0:0.33:145.78)';
+  clf();plot2d1('enn',0,y)
+  [ymn,ymx,np]=graduate(mini(y),maxi(y))
+  rect=[1,ymn,prod(size(y)),ymx];
+  clf();plot2d1('enn',0,y,1,'011',' ',rect,[10,3,10,np])
+>>>>>>> f5cecfa... Removed references to the xbasc function:scilab/modules/graphics/help/fr_FR/graduate.xml
  ]]></programlisting>
   </refsection>
   <refsection>
index dc1a3f9..ccb5bc2 100644 (file)
@@ -88,7 +88,7 @@ clf();histplot(20,d,leg='rand(1,10000,''normal'')',style=16, rect=[-3,0,3,0.5]);
 // exemple #2: histogramme d'un échantillon de loi binomiale B(6,0.5)
 d = grand(1000,1,"bin", 6, 0.5);
 c = linspace(-0.5,6.5,8);
-xbasc()
+clf()
 subplot(2,1,1)
   histplot(c, d, style=2)
   xtitle("l''histogramme normalisé")
@@ -100,7 +100,7 @@ subplot(2,1,2)
 lambda = 2;
 X = grand(100000,1,"exp", 1/lambda);
 Xmax = max(X);
-xbasc()
+clf()
 histplot(40, X, style=2)
 x = linspace(0,max(Xmax),100)';
 plot2d(x,lambda*exp(-lambda*x),strf="000",style=5)
index e6416af..fe6cc32 100644 (file)
@@ -68,9 +68,6 @@ replot([-3,-2,8,4],f.children(2))
         <link linkend="xbasr">xbasr</link>
       </member>
       <member>
-        <link linkend="xbasc">xbasc</link>
-      </member>
-      <member>
         <link linkend="clf">clf</link>
       </member>
     </simplelist>
index d77cb52..1df5b4b 100644 (file)
@@ -38,7 +38,7 @@
     <programlisting role="example"><![CDATA[ 
 t=[0:0.1:2*%pi]';
 plot2d(sin(t),cos(t))
-xbasc()
+clf()
 square(-1,-1,1,1)
 plot2d(sin(t),cos(t))
 xset("default")
index c7196f8..5393483 100644 (file)
@@ -39,8 +39,8 @@
          peut être utilisée à la place.
        </para>
     <para>
-               La fonction <literal>xbasc</literal> est obsolète.
-               Pour effacer une fenêtre graphique, les fonctions <literal>clf</literal> ou <literal>delete</literal> peuvent être utilisée
+               La fonction <literal>xbasc</literal> est obsolète et sera retirée dans la version 5.3.
+               Pour effacer une fenêtre graphique, les fonctions <literal>clf</literal> ou <literal>delete</literal> peuvent être utilisées
                à la place.
        </para>
   </refsection>
index bc9cbd1..a931592 100644 (file)
@@ -39,7 +39,7 @@
     <title>Voir Aussi</title>
     <simplelist type="inline">
       <member>
-        <link linkend="xbasc">xbasc</link>
+        <link linkend="clf">clf</link>
       </member>
     </simplelist>
   </refsection>
index fee3f82..87ed697 100644 (file)
@@ -68,7 +68,7 @@ xsetech([0,0,1.0,0.5])
 // recupération de l'échelle 
 xsetech([0,0.5,1.0,0.5])
 [wrect,frect,logflag,arect]=xgetech();
-xbasc();
+clf();
  ]]></programlisting>
   </refsection>
   <refsection>
index e6a5c1d..3f42069 100644 (file)
@@ -86,7 +86,7 @@ xset()</synopsis>
         <listitem>
           <para>Met "on" ou "off" le mode d'effacement automatique des
           graphiques. Quand le mode est "on", les dessins successifs ne sont
-          pas superposés, i.e. la commande <literal>xbasc()</literal>
+          pas superposés, i.e. la commande <literal>clf()</literal>
           (effacement de la fenêtre graphique et effacement des graphiques
           enregistrés) est exécutée avant chaque commande graphique de haut
           niveau (plot2d par exemple). La valeur par défaut est "off".</para>
@@ -271,7 +271,7 @@ xset()</synopsis>
           sont affichés à   l'écran avec la commande
           <literal>xset("wshow")</literal>. Le pixmap est effacé avec la
           commande <literal>xset("wwpc")</literal>. Noter que la commande
-          <literal>xbasc()</literal> efface aussi le pixmap.</para>
+          <literal>clf()</literal> efface aussi le pixmap.</para>
         </listitem>
       </varlistentry>
 
index b0afbb8..565d921 100644 (file)
@@ -5,7 +5,7 @@
   </info>
   <refnamediv>
     <refname>xsetech</refname>
-    <refpurpose> sélectionne la sous-fenêtre d'une fenêtre graphique pour les dessins  </refpurpose>
+    <refpurpose> sélectionne la sous-fenêtre d'une fenêtre graphique pour les dessins </refpurpose>
   </refnamediv>
   <refsynopsisdiv>
     <title>Séquence d'appel</title>
@@ -66,7 +66,7 @@ xsetech()</synopsis>
     <literal>frect</literal> n'est pas donné la valeur courante de l'échelle graphique n'est pas
     modifiée. La valeur par défaut de <literal>rect</literal> est <literal>[0,0,1,1]</literal>
     (à la création de la fenêtre, ou par exemple après un <literal>xset('default')</literal> 
-    ou après effacement complet de la fenêtre avec <literal>xbasc()</literal>).
+    ou après effacement complet de la fenêtre avec <literal>clf()</literal>).
   </para>
     <para><literal>arect=[x_gauche, x_droite, y_haut, y_bas]</literal> est utilisé pour définir le cadre
     dans la sous-fenêtre. Le cadre est spécifié (comme <literal>wrect</literal>) en utilisant des 
@@ -94,7 +94,7 @@ xsetech([0,0.5,1.0,0.5])
 // on la change avec l'argument rect de plot2d 
 plot2d([1:10]',[1:10]',1,"011"," ",[-6,-6,6,6])
 // 4 dessins sur une seule fenêtre
-xbasc()
+clf()
 xset("font",2,0)
 xsetech([0,0,0.5,0.5]); plot3d()
 xsetech([0.5,0,0.5,0.5]); plot2d()
@@ -103,14 +103,14 @@ xsetech([0,0.5,0.5,0.5]); histplot()
 // retour aux valeurs par défaut 
 xsetech([0,0,1,1])
 // Un dessin avec arect change
-xbasc()
+clf()
 xset("default")
 xsetech(arect=[0,0,0,0]) 
 x=1:0.1:10;plot2d(x',sin(x)')
-xbasc()
+clf()
 xsetech(arect=[1/8,1/8,1/16,1/4])
 x=1:0.1:10;plot2d(x',sin(x)')
-xbasc()
+clf()
 xset("default")
  ]]></programlisting>
   </refsection>
index cdf3de1..124b770 100644 (file)
@@ -63,7 +63,7 @@ alphabet=["a" "b" "c" "d" "e" "f" "g" ..
           "h" "i" "j" "k" "l" "m" "n" ..
           "o" "p" "q" "r" "s" "t" "u" ..
           "v" "w" "x" "y" "z"];
-xbasc()
+clf()
 plot2d([0;1],[0;2],0)
 xstring(0.1,1.8,alphabet)     // alphabet
 xstring(0.1,1.6,alphabet,0,1) // alphabet dans une boîte
index bc1e6a1..a8b04f1 100644 (file)
@@ -63,7 +63,7 @@ function contour(x,y,z,nz,theta,alpha,leg,flag,ebox,zlev)
 
   fig=gcf();
   autoc=fig.auto_clear;
-  if autoc=="on" then, xbasc(),end
+  if autoc=="on" then, clf(),end
   a=gca();
   fg=a.foreground
   v=fig.immediate_drawing;
index a0c654c..7668911 100644 (file)
@@ -54,7 +54,7 @@ fpf=xget("fpf");if fpf=='' then fpf='%.3g',end
 
 fig=gcf();
 autoc=fig.auto_clear;
-if autoc=="on" then, xbasc(),end
+if autoc=="on" then, clf(),end
 a=gca();
 v=fig.immediate_drawing;
 fig.immediate_drawing="off"
index 55d39a1..7b9a82f 100644 (file)
@@ -25,10 +25,10 @@ function [xi,xa,np]=graduate( xmi, xma,n1,n2)
 //           n1 <= np <= n2
 //%Exemple
 //  y=0:0.33:145.78
-//  xbasc();plot2d1('enn',0,y)
+//  clf();plot2d1('enn',0,y)
 //  [ymn,ymx,np]=graduate(mini(y),maxi(y))
-//  rect=[1,ymn,prod(size(y),ymx];
-//  xbasc();plot2d1('enn',0,y,-1,'011',' ',rect,[10,3,10,np])
+//  rect=[1,ymn,prod(size(y)),ymx];
+//  clf();plot2d1('enn',0,y,-1,'011',' ',rect,[10,3,10,np])
 
 // Copyright INRIA
 //!
index 9ccf6d7..669f6d7 100644 (file)
@@ -12,7 +12,7 @@ function graypolarplot(theta,rho,z,varargin)
 if rhs<=0 then
   rho=1:0.2:4;theta=(0:0.02:1)*2*%pi;
   z=30+round(theta'*(1+rho^2));
-  xbasc();
+  clf();
   f=gcf();
   f.color_map=hotcolormap(128);
   f.background= 128;
index 29233cd..f9150ce 100644 (file)
@@ -25,16 +25,16 @@ function []=oldplot(x,y,legx,legy,leg)
     if nl==1|nk==1 then
       plot2d1("enn",1,matrix(x,prod(size(x)),1));
     else
-      xbasc();plot2d((ones(nl,1)*(1:nk))',x')
+      clf();plot2d((ones(nl,1)*(1:nk))',x')
     end
-  case 2 then xbasc();
+  case 2 then clf();
     if type(y)==10,
       plot2d1("enn",1,matrix(x,prod(size(x)),1));
       xtitle(' ',y,' ');
     else
       plot2d(matrix(x,prod(size(x)),1),matrix(y,prod(size(y)),1));
     end;
-  case 3 then xbasc();
+  case 3 then clf();
     if type(y)==10,
       plot2d1("enn",1,matrix(x,prod(size(x)),-1));
       xtitle(' ',y,legx);
@@ -42,7 +42,7 @@ function []=oldplot(x,y,legx,legy,leg)
       plot2d(matrix(x,prod(size(x)),1),matrix(y,prod(size(y)),1));
       xtitle(' ',legx,' ');
     end;
-  case 4 then xbasc();
+  case 4 then clf();
     if type(y)==10,
       plot2d1("enn",1,matrix(x,prod(size(x)),1));
       xtitle(legy,y,legx);
@@ -50,7 +50,7 @@ function []=oldplot(x,y,legx,legy,leg)
       plot2d(matrix(x,prod(size(x)),1),matrix(y,prod(size(y)),1));
       xtitle(' ',legx,legy);
     end;
-  case 5 then xbasc();
+  case 5 then clf();
     plot2d(matrix(x,prod(size(x)),1),matrix(y,prod(size(y)),1));
     xtitle(leg,legx,legy);
   end
index da79222..5e557ab 100644 (file)
@@ -36,7 +36,7 @@ end
 if rhs<43 then flag='no';end
 realtimeinit(0.1);
  
-xbasc();
+clf();
 fig=gcf();
 a=gca();
 a.data_bounds=matrix(rect,2,2);
index 1ea15a5..2b1d7e6 100644 (file)
@@ -10,7 +10,7 @@ function polarplot(theta,rho,style,strf,leg,rect)
   [lhs,rhs]=argn(0)
   if rhs<=0 then
     theta=0:.01:2*%pi;rho=sin(2*theta).*cos(2*theta)
-    xbasc();polarplot(theta,rho)
+    clf();polarplot(theta,rho)
     return
   end
   if size(theta,1)==1 then theta=theta(:),end
index c744c62..f680643 100644 (file)
@@ -8,6 +8,10 @@
 // http://www.cecill.info/licences/Licence_CeCILL_V2-en.txt
 
 function xbasc(win_num)
+
+warnobsolete('clf', '5.3');
+
+// This function is obsolete.
 //xbasc([win_num])
 // Clear the graphic window win_num and erase the recorded graphics of
 // window win_num
index adebe72..8080695 100644 (file)
@@ -7,7 +7,7 @@
 // http://www.cecill.info/licences/Licence_CeCILL_V2-en.txt
 
 function xclear(win_num)
-//xbasc([win_num])
+//xclear([win_num])
 // Clear the graphic window win_num and erase the recorded graphics of
 // window win_num
 // if win_num is omited, it's the current graphic window
index d5f3c96..a4e62c8 100644 (file)
@@ -65,7 +65,7 @@ int sci_delete(char *fname,unsigned long fname_len)
     if (strcmp(cstk(l2),"all") == 0)
     {
                        startGraphicDataWriting();
-                       sciXbasc();
+                       sciClearFigure(sciGetCurrentFigure());
                        endGraphicDataWriting();
                        sciDrawObj(sciGetCurrentFigure()); /* redraw the figure to see the change */
                        LhsVar(1) = 0;
index 3e0a2da..c7291ac 100644 (file)
@@ -175,9 +175,9 @@ int sci_xset( char *fname, unsigned long fname_len )
 
     /*special treatement for xset default and old_style off F.Leray 23.09.04 */
     /* mimic clf(gcf(),'reset') behaviour here */
-    sciXbasc();
+    sciClearFigure(sciGetCurrentFigure());
 
-               ResetFigureToDefaultValues(pfigure);
+    ResetFigureToDefaultValues(pfigure);
   }
   else if( strcmp(cstk(l1),"clipgrf") == 0 ) {
     /* special treatement for xset("cligrf") */
index 7382d6a..1f21f9a 100644 (file)
@@ -74,7 +74,7 @@ int destroyGraphicsSons(sciPointObj * pthis)
 /********************* modifie le 01/02/2002 ************************
  * On detruit pas la sous fenetre, elle est initialiser avec la figure
  * pour cette version, on considere qu'il y'a 1 seule sous fenetre et 
- * elle suit la fenetre principale (voir xbasc() ), la fenetre n'est pas 
+ * elle suit la fenetre principale (voir clf() ), la fenetre n'est pas 
  * consideree comme un des fils.  
  */
  /**
index 25f994f..2d78739 100644 (file)
@@ -69,9 +69,9 @@ void sciClearFigure(sciPointObj * pFigure)
 }
 
 void sciXbasc()
-{  
+{
   sciClearFigure(sciGetCurrentFigure());  
-}      
+}
 
 void sciXclear()
 {
index 9065e8b..fb59814 100644 (file)
@@ -12,9 +12,9 @@
 // <-- Short Description -->
 //   Ces deux groupes de trois lignes font quasiment la meme chose. Dans le premier cas, la fenetre est correctement reajustee et dans le second un truc affreux est fait alors qu'il ne faut rien faire!!!
 // <-- TEST WITH GRAPHIC -->
-xbasc();
+clf();
 plot2d([.4; .6],[-.6 ;.6],-3);
 plot2d(.2,0,-3)
-xbasc();
+clf();
 plot2d([.4; .6],[-.6;.6],-3);
 plot2d(.5,0,-3);
index f10efae..4cb9c6e 100644 (file)
 
 // <-- TEST WITH GRAPHIC -->
 
-xbasc();                       
+clf();                       
 plot2d([.4; .6],[-.6 ;.6],-3);
 plot2d(.2,0,-3) 
                
-xbasc(); 
+clf(); 
 plot2d([.4; .6],[-.6;.6],-3);
 plot2d(.5,0,-3);
 
index aecc22f..f44bdb5 100644 (file)
@@ -22,7 +22,7 @@ y1=y1+20*ones(y1);
 plot2d([-100,500],[-100,600],[-1,-1],"022");
 xsegs(10*x1+200*ones(x1),10*y1+200*ones(y1));
 // rectangle clipping zone
-xbasc(); plot2d([-100,500],[-100,600],[-1,-1],"022")
+clf(); plot2d([-100,500],[-100,600],[-1,-1],"022")
 xrect(clipBox(1), clipBox(2), clipBox(3), clipBox(4));
 axes = gca();
 axes.clip_box = clipBox;
index 997acc7..5e0ba23 100644 (file)
@@ -26,7 +26,7 @@ y1=y1+20*ones(y1);
 plot2d([-100,500],[-100,600],[-1,-1],"022");
 xsegs(10*x1+200*ones(x1),10*y1+200*ones(y1));
 // rectangle clipping zone 
-xbasc(); plot2d([-100,500],[-100,600],[-1,-1],"022")
+clf(); plot2d([-100,500],[-100,600],[-1,-1],"022")
 xrect(clipBox(1), clipBox(2), clipBox(3), clipBox(4));
 axes = gca();
 axes.clip_box = clipBox;
index 5c06933..ce26291 100644 (file)
@@ -54,7 +54,7 @@ for i=1:5:100
           xclick();
           xdel();
     end  
-    xbasc();
+    clf();
 end;
 
 
index e96ebde..a14b24f 100644 (file)
@@ -36,43 +36,43 @@ XX=ode([p0;pi0;xh0;z0;sig0],0,TT,f);
 lsoda--  caution... t (=r1) and h (=r2) are
      such that t + h = t at next step
       (h = pas). integration continues
-      where r1 is :   0.4373378914124D+00   and r2 :   0.2754264981636D-16      
+      where r1 is :   0.4373378914124D+00   and r2 :   0.2754264981180D-16      
 lsoda--  caution... t (=r1) and h (=r2) are
      such that t + h = t at next step
       (h = pas). integration continues
-      where r1 is :   0.4373378914124D+00   and r2 :   0.2754264981636D-16      
+      where r1 is :   0.4373378914124D+00   and r2 :   0.2754264981180D-16      
 lsoda--  caution... t (=r1) and h (=r2) are
      such that t + h = t at next step
       (h = pas). integration continues
-      where r1 is :   0.4373378914124D+00   and r2 :   0.2754264981636D-16      
+      where r1 is :   0.4373378914124D+00   and r2 :   0.2754264981180D-16      
 lsoda--  caution... t (=r1) and h (=r2) are
      such that t + h = t at next step
       (h = pas). integration continues
-      where r1 is :   0.4373378914124D+00   and r2 :   0.2754264981636D-16      
+      where r1 is :   0.4373378914124D+00   and r2 :   0.2754264981180D-16      
 lsoda--  caution... t (=r1) and h (=r2) are
      such that t + h = t at next step
       (h = pas). integration continues
-      where r1 is :   0.4373378914124D+00   and r2 :   0.2249615077458D-16      
+      where r1 is :   0.4373378914124D+00   and r2 :   0.2249615077083D-16      
 lsoda--  caution... t (=r1) and h (=r2) are
      such that t + h = t at next step
       (h = pas). integration continues
-      where r1 is :   0.4373378914124D+00   and r2 :   0.2249615077458D-16      
+      where r1 is :   0.4373378914124D+00   and r2 :   0.2249615077083D-16      
 lsoda--  caution... t (=r1) and h (=r2) are
      such that t + h = t at next step
       (h = pas). integration continues
-      where r1 is :   0.4373378914124D+00   and r2 :   0.2249615077458D-16      
+      where r1 is :   0.4373378914124D+00   and r2 :   0.2249615077083D-16      
 lsoda--  caution... t (=r1) and h (=r2) are
      such that t + h = t at next step
       (h = pas). integration continues
-      where r1 is :   0.4373378914124D+00   and r2 :   0.2249615077458D-16      
+      where r1 is :   0.4373378914124D+00   and r2 :   0.2249615077083D-16      
 lsoda--  caution... t (=r1) and h (=r2) are
      such that t + h = t at next step
       (h = pas). integration continues
-      where r1 is :   0.4373378914124D+00   and r2 :   0.1837429597534D-16      
+      where r1 is :   0.4373378914124D+00   and r2 :   0.1837429597234D-16      
 lsoda--  caution... t (=r1) and h (=r2) are
      such that t + h = t at next step
       (h = pas). integration continues
-      where r1 is :   0.4373378914124D+00   and r2 :   0.1837429597534D-16      
+      where r1 is :   0.4373378914124D+00   and r2 :   0.1837429597234D-16      
 lsoda--  previous message precedent given i1 times
      will no more be repeated
       where i1 is :         10                                                  
@@ -80,18 +80,18 @@ lsoda--  at t (=r1), mxstep (=i1) steps
 needed before reaching tout
       where i1 is :        500                                                  
       where r1 is :   0.4373378914124D+00                                       
-Warning:  Result may be inaccurate.
+Attention: Le résultat est peut être inexact.
 
 TT=TT(1:size(XX,2));
 K=XX($,:)+XX(2,:).*(XX(3,:)-XX(4,:)).^2;
 xset('window',0);
-xbasc();
+clf();
 plot2d(TT',K');
 xset('window',1);
-xbasc();
+clf();
 plot2d(TT',XX(2,:)');
 xset('window',2);
-xbasc();
+clf();
 plot2d(TT',XX(1,:)');
 // Test #2
 clear
index 8e46d9b..98bc69b 100644 (file)
@@ -43,13 +43,13 @@ TT=TT(1:size(XX,2));
 
 K=XX($,:)+XX(2,:).*(XX(3,:)-XX(4,:)).^2;
 xset('window',0);
-xbasc();
+clf();
 plot2d(TT',K');
 xset('window',1);
-xbasc();
+clf();
 plot2d(TT',XX(2,:)');
 xset('window',2);
-xbasc();
+clf();
 plot2d(TT',XX(1,:)');
 
 // Test #2
index 46d203d..d96ffb3 100644 (file)
@@ -178,7 +178,7 @@ m1=uimenu(m,'label', 'operations');
 m2=uimenu(m,'label', 'quit scilab', 'callback', "exit");
 //create two items in the menu "windows"
 m11=uimenu(m1,'label', 'new window', 'callback',"xselect()");
-m12=uimenu(m1,'label', 'clear  window', 'callback',"xbasc()");
+m12=uimenu(m1,'label', 'clear  window', 'callback',"clf()");
 // create a submenu to the item "operations"
 close(f);
 // close the figure
index 55ded07..3098be6 100644 (file)
@@ -13,6 +13,6 @@
 //
 // <-- Short Description -->
 //    plot() plots fullscreen despite the xsetech() restriction.
-xbasc();
+clf();
 xsetech([0 .5 .5 .5]);
 plot2d(1:10,1:10)
index a99721e..2d225b6 100644 (file)
@@ -15,7 +15,7 @@
 // <-- Short Description -->
 //    plot() plots fullscreen despite the xsetech() restriction.
 
-xbasc();
+clf();
 
 xsetech([0 .5 .5 .5]);
 
index 9812f5d..50adb08 100644 (file)
@@ -24,7 +24,7 @@ for i = 1:100,
   m2=uimenu(m,'label', 'quit scilab', 'callback', "exit");
   //create two items in the menu "windows"
   m11=uimenu(m1,'label', 'new window', 'callback',"xselect()");
-  m12=uimenu(m1,'label', 'clear  window', 'callback',"xbasc()");
+  m12=uimenu(m1,'label', 'clear  window', 'callback',"clf()");
   // create a submenu to the item "operations"
   close(f);
 end
index 2490c3d..a995bb6 100644 (file)
@@ -26,7 +26,7 @@ for i = 1:100,
   m2=uimenu(m,'label', 'quit scilab', 'callback', "exit");
   //create two items in the menu "windows"
   m11=uimenu(m1,'label', 'new window', 'callback',"xselect()");
-  m12=uimenu(m1,'label', 'clear  window', 'callback',"xbasc()");
+  m12=uimenu(m1,'label', 'clear  window', 'callback',"clf()");
   // create a submenu to the item "operations"
   close(f);
 end
index 61f4a58..66df0f9 100644 (file)
@@ -368,7 +368,7 @@ function ln=add_ref_code(l)
          ln($+1)=lk
        end
        
-      elseif  lk(1)=='2'&or(lk(2)==['xbasc','xdel','clf']) then 
+      elseif  lk(1)=='2'&or(lk(2)==['xdel','clf']) then 
        //change some function names to allow overloading
        lk(2)=lk(2)+'_build'
        ln($+1)=lk
@@ -452,7 +452,7 @@ function ln=add_cmp_code(l)
        else
          ln($+1)=lk
        end
-      elseif  lk(1)=='2'&or(lk(2)==['xbasc','xdel','clf']) then
+      elseif  lk(1)=='2'&or(lk(2)==['xdel','clf']) then
        //change some function names to allow overloading
        lk(2)=lk(2)+'_run'
        ln($+1)=lk
index 3e763a9..5deca2d 100644 (file)
@@ -90,7 +90,7 @@ m = 30;
 xx = linspace(0,2*%pi,m);
 [X,Y] = ndgrid(xx,xx);
 Z = eval_cshep2d(X,Y, tl_coef);
-xbasc()
+clf()
 plot3d(xx,xx,Z,flag=[2 6 4])
 param3d1(xy(:,1),xy(:,2),list(z,-9), flag=[0 0])
 xtitle("Cubic Shepard Interpolation of cos(x)cos(y) with randomly choosen interpolation points")
index 98b409e..b1ab5b6 100644 (file)
@@ -130,7 +130,7 @@ color = 2*ones(1,size(zf,2));
 // indices corresponding to facet in the interpolation region
 ind=find( mean(xf,"r")>0 & mean(xf,"r")<1 & mean(yf,"r")>0 & mean(yf,"r")<1 );
 color(ind)=3;
-xbasc();
+clf();
 plot3d(xf,yf,list(zf,color), flag=[2 6 4])
 legends(["extrapolation region","interpolation region"],[2 3],1)
 xselect()
index fc7833d..84bf7dd 100644 (file)
@@ -191,7 +191,7 @@ df = splin(x,y, "fast");
 xx = linspace(a,b,800)';
 [yyk, yy1k, yy2k] = interp(xx, x, y, dk); 
 [yyf, yy1f, yy2f] = interp(xx, x, y, df); 
-xbasc()
+clf()
 subplot(3,1,1)
 plot2d(xx, [yyk yyf])
 plot2d(x, y, style=-9)
@@ -216,7 +216,7 @@ yy0 = interp(xx,x,y,d,"C0");
 yy1 = interp(xx,x,y,d,"linear");
 yy2 = interp(xx,x,y,d,"natural");
 yy3 = interp(xx,x,y,d,"periodic");  
-xbasc()
+clf()
 plot2d(xx,[yy0 yy1 yy2 yy3],style=2:5,frameflag=2,leg="C0@linear@natural@periodic")
 xtitle(" different way to evaluate a spline outside its domain")
  ]]></programlisting>
index 91a43dd..8a1a207 100644 (file)
@@ -177,7 +177,7 @@ x = linspace(0,2*%pi,11);
 y = sin(x);
 xx = linspace(-2*%pi,4*%pi,400)';
 yy = linear_interpn(xx, x, y, "periodic");
-xbasc()
+clf()
 plot2d(xx,yy,style=2)
 plot2d(x,y,style=-9, strf="000")
 xtitle("linear interpolation of sin(x) with 11 interpolation points")
@@ -189,7 +189,7 @@ z = 2*sin(x')*sin(y);
 xx = linspace(0,2*%pi, 40);
 [xp,yp] = ndgrid(xx,xx);
 zp = linear_interpn(xp,yp, x, y, z);
-xbasc()
+clf()
 plot3d(xx, xx, zp, flag=[2 6 4])
 [xg,yg] = ndgrid(x,x);
 param3d1(xg,yg, list(z,-9*ones(1,n)), flag=[0 0])
@@ -213,7 +213,7 @@ zp2 = linear_interpn(XP, YP, x, y, z, "periodic");
 zp3 = linear_interpn(XP, YP, x, y, z, "C0");
 zp4 = linear_interpn(XP, YP, x, y, z, "by_zero");
 zp5 = linear_interpn(XP, YP, x, y, z, "by_nan");
-xbasc()
+clf()
 subplot(2,3,1)
 plot3d(x, y, z, leg="x@y@z", flag = [2 4 4])
 xtitle("initial function 0.4 cos(2 pi x) cos(pi y)")
@@ -264,7 +264,7 @@ nb_col = 128;
 vmin = min(VF); vmax = max(VF);
 color = dsearch(VF,linspace(vmin,vmax,nb_col+1));
 xset("colormap",jetcolormap(nb_col));
-xbasc()
+clf()
 xset("hidden3d",xget("background"))
 colorbar(vmin,vmax)
 plot3d(XF, YF, list(ZF,color), flag=[-1 6 4])
index bba384e..4f720a6 100644 (file)
@@ -143,7 +143,7 @@ x = linspace(a,b,n)';
 // plotting
 ye = sin(xd);
 ys = interp(xd, x, y, d);
-xbasc()
+clf()
 plot2d(xd,[ye yd ys],style=[2 -2 3], ...
        leg="exact function@experimental measures (gaussian perturbation)@fitted spline")
 xtitle("a least square spline")
index 1818c0a..e1d67ea 100644 (file)
@@ -242,7 +242,7 @@ d = splin(x, y);
 xx = linspace(a, b, m)';
 yyi = interp(xx, x, y, d);
 yye = runge(xx);
-xbasc()
+clf()
 plot2d(xx, [yyi yye], style=[2 5], leg="interpolation spline@exact function")
 plot2d(x, y, -9)
 xtitle("interpolation of the Runge function")
@@ -257,7 +257,7 @@ xx = linspace(a,b,m)';
 yk = interp(xx, x, y, splin(x,y,"not_a_knot"));
 yf = interp(xx, x, y, splin(x,y,"fast"));
 ym = interp(xx, x, y, splin(x,y,"monotone"));
-xbasc()
+clf()
 plot2d(xx, [yf ym yk], style=[5 2 3], strf="121", ...
        leg="fast@monotone@not a knot spline")
 plot2d(x,y,-9, strf="000")  // to show interpolation points
index d0ab994..0410fce 100644 (file)
@@ -153,7 +153,7 @@ nb_col = 128;
 vmin = min(VF); vmax = max(VF);
 color = dsearch(VF,linspace(vmin,vmax,nb_col+1));
 xset("colormap",jetcolormap(nb_col));
-xbasc(); xset("hidden3d",xget("background"));
+clf(); xset("hidden3d",xget("background"));
 colorbar(vmin,vmax)
 plot3d(XF, YF, list(ZF,color), flag=[-1 6 4])
 xtitle("3d spline interpolation of "+func)
index 05cee40..70bc699 100644 (file)
@@ -182,7 +182,7 @@ function []=test(X,Y)
   xset("colormap",rand(2*n,3)); 
   xfpolys(xpols,ypols,[n/4:n/4+n-1]);
 endfunction 
-N=1000;xbasc();X=rand(1,N); Y=rand(1,N);
+N=1000;clf();X=rand(1,N); Y=rand(1,N);
 xset("wdim",700,700);
 test(X,Y);
  ]]></programlisting>
index e347bfb..eeb6819 100644 (file)
@@ -108,7 +108,7 @@ function []=test(X,Y)
   xset("colormap",rand(2*n,3));
   xfpolys(xpols,ypols,[n/4:n/4+n-1]);
 endfunction
-N=1000;xbasc();X=rand(1,N); Y=rand(1,N);
+N=1000;clf();X=rand(1,N); Y=rand(1,N);
 xset("wdim",700,700);
 test(X,Y);
 delete(scf());
index 8200b89..d17cc56 100644 (file)
@@ -103,7 +103,7 @@ function []=test(X,Y)
   xset("colormap",rand(2*n,3)); 
   xfpolys(xpols,ypols,[n/4:n/4+n-1]);
 endfunction 
-N=1000;xbasc();X=rand(1,N); Y=rand(1,N);
+N=1000;clf();X=rand(1,N); Y=rand(1,N);
 xset("wdim",700,700);
 test(X,Y);
 delete(scf()); 
index 7d60c9a..2b8829d 100644 (file)
@@ -22,12 +22,12 @@ g('node_diam')=[30 30 30 60];
 g('edge_color')=[10 0 2 6 11 11 0 0 11];
 rep=[2 2 1 1 2 2 2 2 2 2 2 2 2];
 rep1=[100 -400 650 300];
-xbasc(); plot_graph(g,rep,rep1);
+clf(); plot_graph(g,rep,rep1);
 rep=[2 1 1 1 2 2 2 2 2 2 2 2 2];
-xbasc(); plot_graph(g,rep,rep1);
+clf(); plot_graph(g,rep,rep1);
 // plotting using dialogs
-xbasc(); plot_graph(g);
+clf(); plot_graph(g);
 xset("thickness",4);
-xbasc();
+clf();
 plot_graph(g);
 
index b989fbe..668941f 100644 (file)
@@ -119,7 +119,7 @@ deff('e=G(p,z)','a=p(1),b=p(2),c=p(3),y=z(1),x=z(2),e=y-FF(x)')
 [p,err]=fit_dat(G,[3;5;10],Z)
 
 xset('window',0)
-xbasc();
+clf();
 plot2d(X',Y',-1) 
 plot2d(X',FF(X)',5,'002')
 a=p(1),b=p(2),c=p(3);plot2d(X',FF(X)',12,'002')
@@ -130,7 +130,7 @@ deff('s=DG(p,z)','y=z(1),x=z(2),s=-[x-p(2),-p(1),x*x]')
 [p,err]=fit_dat(G,[3;5;10],Z,DG)
 
 xset('window',1)
-xbasc();
+clf();
 plot2d(X',Y',-1) 
 plot2d(X',FF(X)',5,'002')
 a=p(1),b=p(2),c=p(3);plot2d(X',FF(X)',12,'002')
index 3648d1f..5250e5d 100644 (file)
@@ -413,7 +413,7 @@ endfunction
 // a small graphic (before showing other calling features)
 tt = linspace(0,1.1*max(tm),100)';
 yy = yth(tt, xopt);
-xbasc()
+clf()
 plot2d(tm, ym, style=-2)
 plot2d(tt, yy, style = 2)
 legend(["measure points", "fitted curve"]);
index 2fbd999..92f25ef 100644 (file)
@@ -32,7 +32,7 @@ function [p,err]=datafit(imp,G,varargin)
 //deff('e=G(p,z)','a=p(1),b=p(2),c=p(3),y=z(1),x=z(2),e=y-FF(x)')
 //[p,err]=datafit(G,Z,[3;5;10])
 //xset('window',0)
-//xbasc();
+//clf();
 //plot2d(X',Y',-1) 
 //plot2d(X',FF(X)',5,'002')
 //a=p(1),b=p(2),c=p(3);plot2d(X',FF(X)',12,'002')
@@ -41,7 +41,7 @@ function [p,err]=datafit(imp,G,varargin)
 //deff('s=DG(p,z)','y=z(1),x=z(2),s=-[x-p(2),-p(1),x*x]')
 //[p,err]=datafit(G,DG,Z,[3;5;10])
 //xset('window',1)
-//xbasc(); 
+//clf(); 
 //plot2d(X',Y',-1) 
 //plot2d(X',FF(X)',5,'002')
 //a=p(1),b=p(2),c=p(3);plot2d(X',FF(X)',12,'002')
index 21446f6..c27b52e 100644 (file)
@@ -34,7 +34,7 @@ function [p,err]=fit_dat(G,p0,Z,W,pmin,pmax,DG)
 //deff('e=G(p,z)','a=p(1),b=p(2),c=p(3),y=z(1),x=z(2),e=y-FF(x)')
 //[p,err]=fit_dat(G,[3;5;10],Z)
 //xset('window',0)
-//xbasc();
+//clf();
 //plot2d(X',Y',-1) 
 //plot2d(X',FF(X)',5,'002')
 //a=p(1),b=p(2),c=p(3);plot2d(X',FF(X)',12,'002')
@@ -43,7 +43,7 @@ function [p,err]=fit_dat(G,p0,Z,W,pmin,pmax,DG)
 //deff('s=DG(p,z)','y=z(1),x=z(2),s=-[x-p(2),-p(1),x*x]')
 //[p,err]=fit_dat(G,[3;5;10],Z,DG)
 //xset('window',1)
-//xbasc();
+//clf();
 //plot2d(X',Y',-1) 
 //plot2d(X',FF(X)',5,'002')
 //a=p(1),b=p(2),c=p(3);plot2d(X',FF(X)',12,'002')
index a99af67..0f333a6 100644 (file)
@@ -152,7 +152,7 @@ Z=[Y;X];
 deff('e=G(p,z)','pK1=p(1),pK2=p(2),v=z(2),pHexp=z(1),e=pHexp-fpH(v)');
 [p,err]=fit_dat(G,[6;7],Z);
 // graphic part
-xbasc()
+clf()
 //v=[0:1e-5:4.5e-4]
 v=X;
 fplot2d(v,fpH);
index 9f6afde..6f1bf53 100644 (file)
@@ -168,7 +168,7 @@ deff('e=G(p,z)','pK1=p(1),pK2=p(2),v=z(2),pHexp=z(1),e=pHexp-fpH(v)');
 
 
 // graphic part
-xbasc()
+clf()
 //v=[0:1e-5:4.5e-4]
 v=X;
 fplot2d(v,fpH);
index c87bb7e..948ec37 100644 (file)
@@ -111,7 +111,7 @@ lambda=1.6;
 N=100000;
 //Generation of a vector of numbers following an exponential distribution
 X = grand(1,N,"exp",lambda);
-xbasc();
+clf();
 //Discretisation of the abscisses in classes
 classes = linspace(0,12,25);
 //Draw in histogram
@@ -130,7 +130,7 @@ A=1;B=3;
 N=100000;
 //Generation of a vector of numbers following a beta distribution
 X = grand(1,N,"bet",A,B);
-xbasc();
+clf();
 //Discretisation of the abscisses in classes
 classes = linspace(0,1,50);
 //Draw in histogram
@@ -149,7 +149,7 @@ A=2;B=1;
 N=100000;
 //Generation of a vector of numbers following a gamma distribution
 X = grand(1,N,"gam",A,B);
-xbasc();
+clf();
 //Discretisation of the abscisses in classes
 classes = linspace(0,2,50);
 //Draw in histogram
@@ -168,7 +168,7 @@ n=50;p=0.3;
 N=100000;
 //Generation of a vector of numbers following a binomial distribution
 X = grand(1,N,"bin",n,p);
-xbasc();
+clf();
 //Discretisation of the abscisses in classes
 classes = linspace(0,n,n+1);
 //Draw in histogram
@@ -187,7 +187,7 @@ mu=50;
 N=100000;
 //Generation of a vector of numbers following a poisson distribution
 X = grand(1,N,"poi",mu);
-xbasc();
+clf();
 //Discretisation of the abscisses in classes
 classes = linspace(0,2*mu,101);
 //Draw in histogram
index f6247a2..93c12dc 100644 (file)
@@ -126,7 +126,7 @@ lambda=1.6;
 N=100000;
 //Generation of a vector of numbers following an exponential distribution
 X = grand(1,N,"exp",lambda);
-xbasc();
+clf();
 //Discretisation of the abscisses in classes
 classes = linspace(0,12,25);
 //Draw in histogram
@@ -146,7 +146,7 @@ A=1;B=3;
 N=100000;
 //Generation of a vector of numbers following a beta distribution
 X = grand(1,N,"bet",A,B);
-xbasc();
+clf();
 //Discretisation of the abscisses in classes
 classes = linspace(0,1,50);
 //Draw in histogram
@@ -166,7 +166,7 @@ A=2;B=1;
 N=100000;
 //Generation of a vector of numbers following a gamma distribution
 X = grand(1,N,"gam",A,B);
-xbasc();
+clf();
 //Discretisation of the abscisses in classes
 classes = linspace(0,2,50);
 //Draw in histogram
@@ -187,7 +187,7 @@ n=50;p=0.3;
 N=100000;
 //Generation of a vector of numbers following a binomial distribution
 X = grand(1,N,"bin",n,p);
-xbasc();
+clf();
 //Discretisation of the abscisses in classes
 classes = linspace(0,n,n+1);
 //Draw in histogram
@@ -207,7 +207,7 @@ mu=50;
 N=100000;
 //Generation of a vector of numbers following a poisson distribution
 X = grand(1,N,"poi",mu);
-xbasc();
+clf();
 //Discretisation of the abscisses in classes
 classes = linspace(0,2*mu,101);
 //Draw in histogram
index 999ea73..c4a17d1 100644 (file)
@@ -75,7 +75,7 @@ y = detrend(x,flag,bp)</synopsis>
 t = linspace(0,16*%pi,1000)';
 x = -20 + t + 0.3*sin(0.5*t) + sin(t) + 2*sin(2*t) + 0.5*sin(3*t); 
 y = detrend(x);
-xbasc()
+clf()
 plot2d(t,[x y],style=[2 5])
 legend(["before detrend","after detrend"]);
 xgrid()
@@ -84,7 +84,7 @@ xgrid()
 t = linspace(0,32*%pi,2000)';
 x = abs(t-16*%pi) + 0.3*sin(0.5*t) + sin(t) + 2*sin(2*t) + 0.5*sin(3*t); 
 y = detrend(x,"linear",1000);
-xbasc()
+clf()
 plot2d(t,[x y],style=[2 5])
 legend(["before detrend","after detrend"]);
 xgrid()
index 781804e..695adf3 100644 (file)
@@ -61,7 +61,7 @@ x=3*sin(t)+8*sin(3*t)+0.5*sin(5*t)+3*rand(t);
 y=fft(x,-1);
 
 //display 
-xbasc();
+clf();
 subplot(2,1,1);plot2d(abs(y))
 subplot(2,1,2);plot2d(fftshift(abs(y)))
 
@@ -73,7 +73,7 @@ x=3*sin(t')*cos(2*t)+8*sin(3*t')*sin(5*t)+..
 y=fft(x,-1);
 
 //display 
-xbasc();
+clf();
 xset('colormap',hotcolormap(256))
 subplot(2,1,1);Matplot(abs(y))
 subplot(2,1,2);Matplot(fftshift(abs(y)))
index 471fa63..b8b8148 100644 (file)
@@ -51,7 +51,7 @@ K=%k(m);
 P=4*K; //Real period
 real_val=0:(P/50):P;
 plot(real_val,real(%sn(real_val,m)))
-xbasc();
+clf();
 KK=%k(1-m);
 Ip=2*KK;
 ima_val1=0:(Ip/50):KK-0.001;
index 9dfe281..12f227d 100644 (file)
@@ -63,10 +63,10 @@ H(z)= ---- = ---------------------------------
     <programlisting role="example"><![CDATA[ 
 f=[0,0.4,0.4,0.6,0.6,1];H=[0,0,1,1,0,0];Hz=yulewalk(8,f,H);
 fs=1000;fhz = f*fs/2;  
-xbasc(0);xset('window',0);plot2d(fhz',H');
+clf(0);xset('window',0);plot2d(fhz',H');
 xtitle('Desired Frequency Response (Magnitude)')
 [frq,repf]=repfreq(Hz,0:0.001:0.5);
-xbasc(1);xset('window',1);plot2d(fs*frq',abs(repf'));
+clf(1);xset('window',1);plot2d(fs*frq',abs(repf'));
 xtitle('Obtained Frequency Response (Magnitude)')
  ]]></programlisting>
   </refsection>
index 20b916f..8bf4366 100644 (file)
@@ -25,10 +25,10 @@ function [Nz,Dz]=yulewalk(Norder, frq, mag)
 //
 // Example: f=[0,0.4,0.4,0.6,0.6,1];H=[0,0,1,1,0,0];Hz=yulewalk(8,f,H);
 //fs=1000;fhz = f*fs/2;  
-//xbasc(0);xset('window',0);plot2d(fhz',H');
+//clf(0);xset('window',0);plot2d(fhz',H');
 //xtitle('Desired Frequency Response')
 //[frq,repf]=repfreq(Hz,0:0.001:0.5);
-//xbasc(1);xset('window',1);plot2d(fs*frq',abs(repf'));
+//clf(1);xset('window',1);plot2d(fs*frq',abs(repf'));
 //xtitle('Obtained Frequency Response')
 //
   [LHS,RHS]=argn(0);
index f4719f4..ed21558 100644 (file)
@@ -212,72 +212,72 @@ y = besselh(alpha,K,x [,ice])</synopsis>
     <programlisting role="example"><![CDATA[ 
 //  besselI functions
 // ==================
-x = linspace(0.01,10,5000)';
-xbasc()
-subplot(2,1,1)
-plot2d(x,besseli(0:4,x), style=2:6)
-legend('I'+string(0:4),2);
-xtitle("Some modified Bessel functions of the first kind")
-subplot(2,1,2)
-plot2d(x,besseli(0:4,x,1), style=2:6)
-legend('I'+string(0:4),1);
-xtitle("Some modified scaled Bessel functions of the first kind")
+   x = linspace(0.01,10,5000)';
+   clf()
+   subplot(2,1,1)
+   plot2d(x,besseli(0:4,x), style=2:6)
+   legend('I'+string(0:4),2);
+   xtitle("Some modified Bessel functions of the first kind")
+   subplot(2,1,2)
+   plot2d(x,besseli(0:4,x,1), style=2:6)
+   legend('I'+string(0:4),1);
+   xtitle("Some modified scaled Bessel functions of the first kind")
 
 // besselJ functions
 // =================
-x = linspace(0,40,5000)';
-xbasc()
-plot2d(x,besselj(0:4,x), style=2:6, leg="J0@J1@J2@J3@J4")
-legend('I'+string(0:4),1);
-xtitle("Some Bessel functions of the first kind")
+   x = linspace(0,40,5000)';
+   clf()
+   plot2d(x,besselj(0:4,x), style=2:6, leg="J0@J1@J2@J3@J4")
+   legend('I'+string(0:4),1);
+   xtitle("Some Bessel functions of the first kind")
 
 // use the fact that J_(1/2)(x) = sqrt(2/(x pi)) sin(x)
 // to compare the algorithm of besselj(0.5,x) with a more direct formula 
-x = linspace(0.1,40,5000)';
-y1 = besselj(0.5, x);
-y2 = sqrt(2 ./(%pi*x)).*sin(x);
-er = abs((y1-y2)./y2);
-ind = find(er > 0 & y2 ~= 0);
-xbasc()
-subplot(2,1,1)
-plot2d(x,y1,style=2)
-xtitle("besselj(0.5,x)")
-subplot(2,1,2)
-plot2d(x(ind), er(ind), style=2, logflag="nl")
-xtitle("relative error between 2 formulae for besselj(0.5,x)") 
+   x = linspace(0.1,40,5000)';
+   y1 = besselj(0.5, x);
+   y2 = sqrt(2 ./(%pi*x)).*sin(x);
+   er = abs((y1-y2)./y2);
+   ind = find(er &gt; 0 &amp; y2 ~= 0);
+   clf()
+   subplot(2,1,1)
+   plot2d(x,y1,style=2)
+   xtitle("besselj(0.5,x)")
+   subplot(2,1,2)
+   plot2d(x(ind), er(ind), style=2, logflag="nl")
+   xtitle("relative error between 2 formulae for besselj(0.5,x)") 
 
 // besselK functions
 // =================
-x = linspace(0.01,10,5000)';
-xbasc()
-subplot(2,1,1)
-plot2d(x,besselk(0:4,x), style=0:4, rect=[0,0,6,10])
-legend('K'+string(0:4),1);
-xtitle("Some modified Bessel functions of the second kind")
-subplot(2,1,2)
-plot2d(x,besselk(0:4,x,1), style=0:4, rect=[0,0,6,10])
-legend('K'+string(0:4),1);
-xtitle("Some modified scaled Bessel functions of the second kind")
+   x = linspace(0.01,10,5000)';
+   clf()
+   subplot(2,1,1)
+   plot2d(x,besselk(0:4,x), style=0:4, rect=[0,0,6,10])
+   legend('K'+string(0:4),1);
+   xtitle("Some modified Bessel functions of the second kind")
+   subplot(2,1,2)
+   plot2d(x,besselk(0:4,x,1), style=0:4, rect=[0,0,6,10])
+   legend('K'+string(0:4),1);
+   xtitle("Some modified scaled Bessel functions of the second kind")
 
 // besselY functions
 // =================
-x = linspace(0.1,40,5000)'; // Y Bessel functions are unbounded  for x -> 0+
-xbasc()
-plot2d(x,bessely(0:4,x), style=0:4, rect=[0,-1.5,40,0.6])
-legend('Y'+string(0:4),4);
-xtitle("Some Bessel functions of the second kind")
+   x = linspace(0.1,40,5000)'; // Y Bessel functions are unbounded  for x -&gt; 0+
+   clf()
+   plot2d(x,bessely(0:4,x), style=0:4, rect=[0,-1.5,40,0.6])
+   legend('Y'+string(0:4),4);
+   xtitle("Some Bessel functions of the second kind")
 
 // besselH functions
 // =================
-x=-4:0.025:2; y=-1.5:0.025:1.5;
-[X,Y] = ndgrid(x,y);
-H = besselh(0,1,X+%i*Y); 
-clf();f=gcf();
-xset("fpf"," ")
-f.color_map=jetcolormap(16);
-contour2d(x,y,abs(H),0.2:0.2:3.2,strf="034",rect=[-4,-1.5,3,1.5])
-legends(string(0.2:0.2:3.2),1:16,"ur")
-xtitle("Level curves of |H1(0,z)|")
+   x=-4:0.025:2; y=-1.5:0.025:1.5;
+   [X,Y] = ndgrid(x,y);
+   H = besselh(0,1,X+%i*Y); 
+   clf();f=gcf();
+   xset("fpf"," ")
+   f.color_map=jetcolormap(16);
+   contour2d(x,y,abs(H),0.2:0.2:3.2,strf="034",rect=[-4,-1.5,3,1.5])
+   legends(string(0.2:0.2:3.2),1:16,"ur")
+   xtitle("Level curves of |H1(0,z)|")
  ]]></programlisting>
   </refsection>
 
index 062f726..e26e2ca 100644 (file)
@@ -95,7 +95,7 @@ e = beta(ones(x),x) - (1)./x;
 er = abs(e) .* x;
 ind = find(er ~= 0);
 eps = ones(x(ind))*number_properties("eps");
-xbasc()
+clf()
 plot2d(x(ind),[er(ind) eps 2*eps],style=[1 2 3],logflag="ll",leg="er@eps_m@2 eps_m")
 xtitle("approximate relative error in computing beta(1,x)")
 xselect()
@@ -104,7 +104,7 @@ xselect()
 t = linspace(0.2,10,60);
 X = t'*ones(t); Y = ones(t')*t;
 Z = beta(X,Y);
-xbasc()
+clf()
 plot3d(t, t, Z, flag=[2 4 4], leg="x@y@z", alpha=75, theta=30)
 xtitle("The beta function on [0.2,10]x[0.2,10]")
 xselect()
index 3804643..24e0ed7 100644 (file)
@@ -86,7 +86,7 @@ gamma(6)-prod(1:5)
 a = -3; b = 5;
 x = linspace(a,b,40000)';
 y = gamma(x);
-xbasc()
+clf()
 c=xget("color")
 xset("color",2)
 plot2d(x, y, style=0, axesflag=5, rect=[a, -10, b, 10])
index 5f9286d..d7d3749 100644 (file)
@@ -149,7 +149,7 @@ y(1,j) = P(n,m;x(j))      if both n and m are scalars
 l = nearfloat("pred",1);
 x = linspace(-l,l,200)';
 y = legendre(0:5, 0,  x);
-xbasc()
+clf()
 plot2d(x,y', leg="p0@p1@p2@p3@p4@p5@p6")
 xtitle("the 6 th first Legendre polynomials")
 
@@ -157,7 +157,7 @@ xtitle("the 6 th first Legendre polynomials")
 l = nearfloat("pred",1);
 x = linspace(-l,l,200)';
 y = legendre(5, 0:5, x, "norm");
-xbasc()
+clf()
 plot2d(x,y', leg="p5,0@p5,1@p5,2@p5,3@p5,4@p5,5")
 xtitle("the (normalised) associated Legendre functions of degree 5")
 
@@ -192,7 +192,7 @@ f = Y(l,m,theta,phi);
 [x2,y2,z2] = sph2cart(theta,phi,abs(real(f))); [xf2,yf2,zf2] = nf3d(x2,y2,z2);
 [x3,y3,z3] = sph2cart(theta,phi,abs(imag(f))); [xf3,yf3,zf3] = nf3d(x3,y3,z3);
 
-xbasc()
+clf()
 subplot(1,3,1)
 plot3d(xf1,yf1,zf1,flag=[2 4 4]); xtitle("|Y31(theta,phi)|")
 subplot(1,3,2)
index bc32dc5..b17634f 100644 (file)
@@ -163,7 +163,7 @@ y = oldbessely(alpha,x)</synopsis>
 x = linspace(0.01,10,5000)';
 y = oldbesseli(0:4,x);
 ys = oldbesseli(0:4,x,2);
-xbasc()
+clf()
 subplot(2,1,1)
 plot2d(x,y, style=2:6, leg="I0@I1@I2@I3@I4", rect=[0,0,6,10])
 xtitle("Some modified Bessel functions of the first kind")
@@ -174,7 +174,7 @@ xtitle("Some modified scaled Bessel functions of the first kind")
 // example #2 : display some J Bessel functions
 x = linspace(0,40,5000)';
 y = besselj(0:4,x);
-xbasc()
+clf()
 plot2d(x,y, style=2:6, leg="J0@J1@J2@J3@J4")
 xtitle("Some Bessel functions of the first kind")
 
@@ -185,8 +185,8 @@ x = linspace(0.1,40,5000)';
 y1 = besselj(0.5, x);
 y2 = sqrt(2 ./(%pi*x)).*sin(x);
 er = abs((y1-y2)./y2);
-ind = find(er > 0 & y2 ~= 0);
-xbasc()
+ind = find(er &gt; 0 &amp; y2 ~= 0);
+clf()
 subplot(2,1,1)
 plot2d(x,y1,style=2)
 xtitle("besselj(0.5,x)")
@@ -198,7 +198,7 @@ xtitle("relative error between 2 formulae for besselj(0.5,x)")
 x = linspace(0.01,10,5000)';
 y = besselk(0:4,x);
 ys = besselk(0:4,x,1);
-xbasc()
+clf()
 subplot(2,1,1)
 plot2d(x,y, style=0:4, leg="K0@K1@K2@K3@K4", rect=[0,0,6,10])
 xtitle("Some modified Bessel functions of the second kind")
@@ -209,7 +209,7 @@ xtitle("Some modified scaled Bessel functions of the second kind")
 // example #5: plot severals Y Bessel functions
 x = linspace(0.1,40,5000)'; // Y Bessel functions are unbounded  for x -> 0+
 y = bessely(0:4,x);
-xbasc()
+clf()
 plot2d(x,y, style=0:4, leg="Y0@Y1@Y2@Y3@Y4", rect=[0,-1.5,40,0.6])
 xtitle("Some Bessel functions of the second kind")
  ]]></programlisting>
index 06f8e14..a0803bc 100644 (file)
@@ -97,7 +97,7 @@ m = tabul(X,"i")
 n = 50000;
 X = grand(n,1,"bin",70,0.5);
 m = tabul(X,"i");
-xbasc()
+clf()
 plot2d3(m(:,1), m(:,2)/n)
 xtitle("empirical probabilities of B(70,0.5)")
 
index 577b27e..06ed100 100644 (file)
@@ -76,14 +76,14 @@ Cptr = taucs_chfact(A);
 // retrieve the factor at scilab level
 [Ct, p] = taucs_chget(Cptr);
 // plot the initial matrix
-xset("window",0) ; xbasc()
+xset("window",0) ; clf()
 PlotSparse(A) ; xtitle("Initial matrix A (bcsstk24.rsa)")
 // plot the permuted matrix
 B = A(p,p);
-xset("window",1) ; xbasc()
+xset("window",1) ; clf()
 PlotSparse(B) ; xtitle("Permuted matrix B = A(p,p)")
 // plot the upper triangle Ct
-xset("window",2) ; xbasc()
+xset("window",2) ; clf()
 PlotSparse(Ct) ; xtitle("The pattern of Ct (A(p,p) = C*Ct)")
 // retrieve cnz
 [OK, n, cnz] = taucs_chinfo(Cptr)
index 46dd26f..8ccd41e 100644 (file)
@@ -24,14 +24,14 @@ Cptr = taucs_chfact(A);
 // retrieve the factor at scilab level
 [Ct, p] = taucs_chget(Cptr);
 // plot the initial matrix
-xset("window",0) ; xbasc();
+xset("window",0) ; clf();
 PlotSparse(A) ; xtitle("Initial matrix A (bcsstk24.rsa)");
 // plot the permuted matrix
 B = A(p,p);
-xset("window",1) ; xbasc();
+xset("window",1) ; clf();
 PlotSparse(B) ; xtitle("Permuted matrix B = A(p,p)");
 // plot the upper triangle Ct
-xset("window",2) ; xbasc();
+xset("window",2) ; clf();
 PlotSparse(Ct) ; xtitle("The pattern of Ct (A(p,p) = C*Ct)");
 // retrieve cnz
 [OK, n, cnz] = taucs_chinfo(Cptr);
index 1bb74b2..5d8f376 100644 (file)
@@ -27,14 +27,14 @@ Cptr = taucs_chfact(A);
 // retrieve the factor at scilab level
 [Ct, p] = taucs_chget(Cptr);
 // plot the initial matrix
-xset("window",0) ; xbasc();
+xset("window",0) ; clf();
 PlotSparse(A) ; xtitle("Initial matrix A (bcsstk24.rsa)");
 // plot the permuted matrix
 B = A(p,p);
-xset("window",1) ; xbasc();
+xset("window",1) ; clf();
 PlotSparse(B) ; xtitle("Permuted matrix B = A(p,p)");
 // plot the upper triangle Ct
-xset("window",2) ; xbasc();
+xset("window",2) ; clf();
 PlotSparse(Ct) ; xtitle("The pattern of Ct (A(p,p) = C*Ct)");
 // retrieve cnz
 [OK, n, cnz] = taucs_chinfo(Cptr);