Add license header (demos)
Pierre Marechal [Mon, 18 Feb 2008 10:18:46 +0000 (10:18 +0000)]
241 files changed:
scilab/modules/cacsd/demos/cont.dem
scilab/modules/cacsd/demos/control.dem
scilab/modules/cacsd/demos/flat/fcts.sci
scilab/modules/cacsd/demos/flat/flat.dem
scilab/modules/cacsd/demos/lqg/lqg.dem
scilab/modules/cacsd/demos/lqg/lqg2.dem
scilab/modules/cacsd/demos/lqg/scheme.dem
scilab/modules/cacsd/demos/mixed.dem
scilab/modules/cacsd/demos/pendulum/graphics.sci
scilab/modules/cacsd/demos/pendulum/pendule.dem
scilab/modules/cacsd/demos/pendulum/simulation.sci
scilab/modules/cacsd/demos/pid.dem
scilab/modules/cacsd/demos/robust/como.dem
scilab/modules/cacsd/demos/robust/mu.dem
scilab/modules/cacsd/demos/robust/rob.dem
scilab/modules/cacsd/demos/tracking/track.dem
scilab/modules/core/demos/intro/dem01.dem
scilab/modules/core/demos/intro/dem01_gateway.sce
scilab/modules/core/demos/intro/extc.sce
scilab/modules/core/demos/intro/extf.sce
scilab/modules/graphics/demos/2d_3d_plots/2d_3d_plots.dem.gateway.sce
scilab/modules/graphics/demos/2d_3d_plots/abaque.dem.sce
scilab/modules/graphics/demos/2d_3d_plots/champ.dem.sce
scilab/modules/graphics/demos/2d_3d_plots/contour.dem.sce
scilab/modules/graphics/demos/2d_3d_plots/contour_3d_2.dem.sce
scilab/modules/graphics/demos/2d_3d_plots/contour_3d_3.dem.sce
scilab/modules/graphics/demos/2d_3d_plots/contour_3d_4.dem.sce
scilab/modules/graphics/demos/2d_3d_plots/contourf.dem.sce
scilab/modules/graphics/demos/2d_3d_plots/errbar.dem.sce
scilab/modules/graphics/demos/2d_3d_plots/fac3d.dem.sce
scilab/modules/graphics/demos/2d_3d_plots/fac3d1.dem.sce
scilab/modules/graphics/demos/2d_3d_plots/fchamp.dem.sce
scilab/modules/graphics/demos/2d_3d_plots/fcontour.dem.sce
scilab/modules/graphics/demos/2d_3d_plots/fgrayplot.dem.sce
scilab/modules/graphics/demos/2d_3d_plots/fplot2d.dem.sce
scilab/modules/graphics/demos/2d_3d_plots/fplot3d.dem.sce
scilab/modules/graphics/demos/2d_3d_plots/fplot3d1.dem.sce
scilab/modules/graphics/demos/2d_3d_plots/grayplot.dem.sce
scilab/modules/graphics/demos/2d_3d_plots/histplot.dem.sce
scilab/modules/graphics/demos/2d_3d_plots/param3d_1.dem.sce
scilab/modules/graphics/demos/2d_3d_plots/param3d_2.dem.sce
scilab/modules/graphics/demos/2d_3d_plots/plot2d.dem.sce
scilab/modules/graphics/demos/2d_3d_plots/plot2d1_1.dem.sce
scilab/modules/graphics/demos/2d_3d_plots/plot2d1_2.dem.sce
scilab/modules/graphics/demos/2d_3d_plots/plot2d3.dem.sce
scilab/modules/graphics/demos/2d_3d_plots/plot3d.dem.sce
scilab/modules/graphics/demos/2d_3d_plots/plot3d1.dem.sce
scilab/modules/graphics/demos/2d_3d_plots/subplot.dem.sce
scilab/modules/graphics/demos/2d_3d_plots/xgeom.dem.sce
scilab/modules/graphics/demos/2d_3d_plots/zgrid.dem.sce
scilab/modules/graphics/demos/anim/anim.dem
scilab/modules/graphics/demos/anim/anim1.dem
scilab/modules/graphics/demos/anim/anim2.dem
scilab/modules/graphics/demos/anim/anim3.dem
scilab/modules/graphics/demos/anim/anim4.dem
scilab/modules/graphics/demos/anim/anim5.dem
scilab/modules/graphics/demos/anim/anim6.dem
scilab/modules/graphics/demos/anim/anim6.sci
scilab/modules/graphics/demos/anim/anim7.dem
scilab/modules/graphics/demos/anim/anim8.dem
scilab/modules/graphics/demos/anim/anim_p1.dem
scilab/modules/graphics/demos/anim/animxx.dem
scilab/modules/graphics/demos/anim/riemann.sci
scilab/modules/graphics/demos/bar/bar.dem
scilab/modules/graphics/demos/basic_functions/basic_functions.dem.gateway.sce
scilab/modules/graphics/demos/basic_functions/basic_functions_1.dem.sce
scilab/modules/graphics/demos/basic_functions/basic_functions_2.dem.sce
scilab/modules/graphics/demos/basic_functions/basic_functions_3.dem.sce
scilab/modules/graphics/demos/basic_functions/basic_functions_4.dem.sce
scilab/modules/graphics/demos/basic_functions/basic_functions_5.dem.sce
scilab/modules/graphics/demos/basic_functions/basic_functions_6.dem.sce
scilab/modules/graphics/demos/basic_functions/basic_functions_7.dem.sce
scilab/modules/graphics/demos/basic_functions/basic_functions_8.dem.sce
scilab/modules/graphics/demos/bike.dem
scilab/modules/graphics/demos/cmplxfunc/MacCmplx.sci
scilab/modules/graphics/demos/cmplxfunc/cmplxfunc.dem
scilab/modules/graphics/demos/contourf.dem
scilab/modules/graphics/demos/fec/fec.dem
scilab/modules/graphics/demos/fec/fec_demo.sci
scilab/modules/graphics/demos/graphics.dem.gateway.sce
scilab/modules/graphics/demos/misc/misc.dem
scilab/modules/graphics/demos/misc/numerique.dem
scilab/modules/graphics/demos/misc/oscil.dem
scilab/modules/graphics/demos/misc/oscil.sci
scilab/modules/graphics/demos/misc/point.dem
scilab/modules/graphics/demos/peaks.sci
scilab/modules/graphics/demos/portrait.dem
scilab/modules/graphics/demos/surface/Macros.sci
scilab/modules/graphics/demos/surface/bezier.dem
scilab/modules/graphics/demos/surface/bezier.sci
scilab/modules/graphics/demos/surface/surfaces.dem
scilab/modules/graphics/demos/surface/surfaces.sci
scilab/modules/graphics/demos/xsetechfig.sce
scilab/modules/gui/demos/dialog.dem
scilab/modules/interpolation/demos/interp_demo.sci
scilab/modules/metanet/demos/meta.dem
scilab/modules/metanet/demos/metro.sci
scilab/modules/optimization/demos/datafit/datafit.dem
scilab/modules/optimization/demos/datafit/demo_datafit.sci
scilab/modules/optimization/demos/icse/icob.sci
scilab/modules/optimization/demos/icse/icot.sci
scilab/modules/optimization/demos/icse/icse.sci
scilab/modules/optimization/demos/icse/icsegen.sci
scilab/modules/optimization/demos/icse/icseinit.sce
scilab/modules/optimization/demos/icse/icsu.sci
scilab/modules/optimization/demos/icse/icsua.sci
scilab/modules/optimization/demos/icse/icsuq.sci
scilab/modules/optimization/demos/icse/icsvisu.sci
scilab/modules/optimization/demos/icse/lqv.sce
scilab/modules/optimization/demos/icse/navet.sce
scilab/modules/optimization/demos/icse/seros.sce
scilab/modules/optimization/demos/lmitool/bigM.sci
scilab/modules/optimization/demos/lmitool/dscr_lyap.sci
scilab/modules/optimization/demos/lmitool/dscr_lyap2.sci
scilab/modules/optimization/demos/lmitool/fullstate.sci
scilab/modules/optimization/demos/lmitool/h2hinf.sci
scilab/modules/optimization/demos/lmitool/linprog.sci
scilab/modules/optimization/demos/lmitool/lmi.dem
scilab/modules/optimization/demos/lmitool/lmidem.sci
scilab/modules/optimization/demos/lmitool/norminf.sci
scilab/modules/optimization/demos/lmitool/normopt.sci
scilab/modules/optimization/demos/lmitool/normopt2.sci
scilab/modules/optimization/demos/lmitool/normoptd.sci
scilab/modules/optimization/demos/lmitool/of.sci
scilab/modules/optimization/demos/lmitool/phase1.sci
scilab/modules/optimization/demos/lmitool/ric_dscr.sci
scilab/modules/optimization/demos/lmitool/sylvester.sci
scilab/modules/optimization/demos/lmitool/test.sci
scilab/modules/optimization/demos/lmitool/tset.sci
scilab/modules/optimization/demos/multiflow/demo_multiflow.sci
scilab/modules/optimization/demos/multiflow/multiflow.dem
scilab/modules/optimization/demos/optimization.dem
scilab/modules/others/demos/loop_demo/Bounce/BOUNCE4_f.sci
scilab/modules/others/demos/loop_demo/Bounce/BOUNCEXY_f.sci
scilab/modules/others/demos/loop_demo/Bounce/loader.sce
scilab/modules/others/demos/loop_demo/Geneal.sci
scilab/modules/others/demos/loop_demo/cmplxfun.sci
scilab/modules/others/demos/loop_demo/cmplxfunc/MacCmplx.sci
scilab/modules/others/demos/loop_demo/cmplxfunc/cmplxfunc.dem
scilab/modules/others/demos/loop_demo/datafit.sci
scilab/modules/others/demos/loop_demo/demo_3dplot.sci
scilab/modules/others/demos/loop_demo/demo_cellule.sci
scilab/modules/others/demos/loop_demo/demo_image.sci
scilab/modules/others/demos/loop_demo/demo_isoSurf.sci
scilab/modules/others/demos/loop_demo/demo_scicos.sci
scilab/modules/others/demos/loop_demo/demo_scicos1.sci
scilab/modules/others/demos/loop_demo/demo_scicos2.sci
scilab/modules/others/demos/loop_demo/demo_scilab.sci
scilab/modules/others/demos/loop_demo/demo_signal.sci
scilab/modules/others/demos/loop_demo/loop.sce
scilab/modules/others/demos/loop_demo/loop_demo.sce
scilab/modules/others/demos/loop_demo/multiflot.sci
scilab/modules/others/demos/loop_demo/n_pendulum.sci
scilab/modules/others/demos/loop_demo/npend/dessin.sci
scilab/modules/others/demos/loop_demo/npend/macros.sci
scilab/modules/others/demos/loop_demo/npend/npend.dem
scilab/modules/others/demos/loop_demo/optloc.sci
scilab/modules/others/demos/loop_demo/riemann.sci
scilab/modules/others/demos/loop_demo/rosenbrock.sci
scilab/modules/others/demos/loop_demo/sliding_pendulum.sci
scilab/modules/others/demos/loop_demo/spline.sci
scilab/modules/others/demos/loop_demo/truck.sci
scilab/modules/others/demos/simulation/bike/bike.dem
scilab/modules/others/demos/simulation/bike/bike2.dem
scilab/modules/others/demos/simulation/bike/macros/show.sci
scilab/modules/others/demos/simulation/bike/macros/velo1.sci
scilab/modules/others/demos/simulation/bike/macros/velo2.sci
scilab/modules/others/demos/simulation/bike/macros/velo3.sci
scilab/modules/others/demos/simulation/bike/macros/velo4.sci
scilab/modules/others/demos/simulation/bike/macros/velo4p.sci
scilab/modules/others/demos/simulation/bike/macros/velo5.sci
scilab/modules/others/demos/simulation/bike/macros/velod.sci
scilab/modules/others/demos/simulation/bike/macros/velodp.sci
scilab/modules/others/demos/simulation/dae/dae.dem
scilab/modules/others/demos/simulation/dae/dae1.dem
scilab/modules/others/demos/simulation/dae/dae2.dem
scilab/modules/others/demos/simulation/dae/demo_sliding_pendulum.sci
scilab/modules/others/demos/simulation/dae/pend3d1.sce
scilab/modules/others/demos/simulation/dae/pend3d1s.sce
scilab/modules/others/demos/simulation/dae/pend3d2.sce
scilab/modules/others/demos/simulation/dae/pendc1.sci
scilab/modules/others/demos/simulation/dae/pendc2.sci
scilab/modules/others/demos/simulation/dae/pendc3.sci
scilab/modules/others/demos/simulation/dae/pendg.sci
scilab/modules/others/demos/simulation/dae/pendg1.sce
scilab/modules/others/demos/simulation/dae/pendg2.sce
scilab/modules/others/demos/simulation/dae/pendg3.sce
scilab/modules/others/demos/simulation/dae/pendule3d.sci
scilab/modules/others/demos/simulation/npend/dessin.sci
scilab/modules/others/demos/simulation/npend/macros.sci
scilab/modules/others/demos/simulation/npend/n_pendulum.sci
scilab/modules/others/demos/simulation/npend/npend.dem
scilab/modules/others/demos/simulation/ode/lorenz.dem
scilab/modules/others/demos/simulation/ode/lorenz1.dem
scilab/modules/others/demos/simulation/ode/lorenz2.dem
scilab/modules/others/demos/simulation/ode/lotka.sce
scilab/modules/others/demos/simulation/ode/ode.dem
scilab/modules/others/demos/simulation/ode/ode1.dem
scilab/modules/others/demos/simulation/ode/ode2.dem
scilab/modules/others/demos/simulation/ode/ode3.dem
scilab/modules/others/demos/simulation/ode/ode4.dem
scilab/modules/others/demos/simulation/ode/odenew.dem
scilab/modules/others/demos/simulation/ode/odenew1.dem
scilab/modules/others/demos/simulation/ode/odenew1_1.sce
scilab/modules/others/demos/simulation/ode/odenew2.dem
scilab/modules/others/demos/simulation/ode/odeold.dem
scilab/modules/others/demos/simulation/ode/vanderpol.sce
scilab/modules/others/demos/simulation/simulation.dem
scilab/modules/others/demos/simulation/wheel2/show.sci
scilab/modules/others/demos/simulation/wheel2/wheel.dem
scilab/modules/others/demos/velpic/acoustic.sci
scilab/modules/others/demos/velpic/plotdb.sci
scilab/modules/others/demos/velpic/snapshot.sci
scilab/modules/others/demos/velpic/velpic.dem
scilab/modules/others/demos/velpic/velpic.sci
scilab/modules/randlib/demos/random.dem
scilab/modules/randlib/demos/random.sci
scilab/modules/randlib/demos/randomT.sci
scilab/modules/scilab2fortran/demos/demotrad.dem
scilab/modules/signal_processing/demos/arma/arma1.dem
scilab/modules/signal_processing/demos/arma/arma2.dem
scilab/modules/signal_processing/demos/arma/arma3.dem
scilab/modules/signal_processing/demos/bode.dem
scilab/modules/signal_processing/demos/iir.dem
scilab/modules/signal_processing/demos/iirfilt.dem
scilab/modules/signal_processing/demos/remezfilt.dem
scilab/modules/signal_processing/demos/signal.dem
scilab/modules/signal_processing/demos/spect.dem
scilab/modules/signal_processing/demos/wiener.dem
scilab/modules/signal_processing/demos/winfilt.dem
scilab/modules/spreadsheet/demos/spreadsheet.dem
scilab/modules/tclsci/demos/tk/demredraw.sci
scilab/modules/tclsci/demos/tk/puzzle.sce
scilab/modules/tclsci/demos/tk/rolodex.sce
scilab/modules/tclsci/demos/tk/scale.sce
scilab/modules/tclsci/demos/tk/scroll.sce
scilab/modules/tclsci/demos/tk/tcolor.sce
scilab/modules/tclsci/demos/tk/timer.sce
scilab/modules/tclsci/demos/tk/tk.dem
scilab/modules/tclsci/demos/tk/uicontrol.sci
scilab/modules/tclsci/demos/tk/uicontrol1.sce

index f28bb77..32cfe20 100644 (file)
@@ -1,5 +1,11 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 deff('[]=demoexc(fil)','exec(''SCI/modules/cacsd/demos/''+fil)')
-// Copyright INRIA
 while %t do
   n=tk_choose(['LQG','Mixed-sensitivity','PID'],'Select a demo');
   select n
index 81844e3..19e762d 100644 (file)
@@ -1,3 +1,10 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 mode(-1)
 path=get_absolute_file_path('control.dem');
 oldln=lines();lines(0)
index 0c41ace..a051423 100644 (file)
@@ -1,7 +1,13 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 function [xdot]=car(t,x)
 //
 //
-// Copyright INRIA
 xdot=zeros(1,4) ;
 // car lenght for the control computation
 LCpct = bigL * 1.;
index 02f5a2f..d4f0374 100644 (file)
@@ -1,5 +1,11 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 mode(-1);
-// Copyright  INRIA
 
 path=pathconvert(get_absolute_file_path('flat.dem'),%t,%t)
 getf(path+'car.sci');
index 5e43c2e..e6890a1 100644 (file)
@@ -1,4 +1,10 @@
-// Copyright INRIA
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 mode(-1);
 
 //display the diagram
index 77e3c3f..e4cde98 100644 (file)
@@ -1,5 +1,11 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 s=poly(0,'s');
-// Copyright INRIA
 Plant=[1/(s+1),s/(s-1)^2;(s-1)*s/(s^2-3*s+2),2/s];
 Plant=syslin('c',[1/(s+1)*s/(s-1)^2]);     //Nominal Plant
 P22=tf2ss(Plant);    //...in state-space form
index 9a6f71c..3140091 100644 (file)
@@ -1,5 +1,11 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 
-// Copyright INRIA
 x=[5,10,20,40,50,70,80,90];xmin=-10;xmax=100;
 y=[22,28,30,32];ymin=12;ymax=40;
 
index 8229c38..08bdaa3 100644 (file)
@@ -1,4 +1,10 @@
-// Copyright INRIA
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 mode(-1)
 //display the diagram
 x=[5,10,20,40,50,70,80,90];xmin=-10;xmax=100;
index 8fca4ac..7eed073 100644 (file)
@@ -1,3 +1,10 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
  function P=initialize_display(xg,teta)
    clf();a=gca();a.isoview='on';
    f=gcf();f.pixmap='on'
@@ -36,7 +43,7 @@ function [P]=dpnd()
   xstring(xg+lb*sin(teta)/2,y2+lb*cos(teta),'a',0,0);
   e=gce();e.font_size=3;
   
-  //the différential equations
+  //the diff�rential equations
   xstring(5,-6,['a'''' = (-sin(a)*cos(a)*(m/(m+M))*a''^2 + 2/(mb*l)*(sin(a)*m*g - qm*cos(a)*u))/d'
                'x'''' =  (u+m*(l/2)*(sin(a)a''^2-cos(a)*a''''))/(m+M);'
                'm: weight of the pendulum'
index 46cc344..eda1ed6 100644 (file)
@@ -1,3 +1,10 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 mode(-1)
 path=get_absolute_file_path('pendule.dem');
 //
index d32540b..d6fdd15 100644 (file)
@@ -1,3 +1,10 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 
 
 function [xdot]=ivpd(t,x)
index bb46607..2265394 100644 (file)
@@ -1,4 +1,10 @@
-// Copyright INRIA
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 mode(-1)
 //display the diagram
 x=[5,10,20,40,50,70,80,90];xmin=-10;xmax=100;
index 0031ecd..cd83d96 100644 (file)
@@ -1,9 +1,15 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 // Examples of Standard plants (mostly from Kwakernak)
 // Define the polynomial s by typing "s=poly(0,'s')"
 // Most examples are in transfer representation but computations
 // are done in state space form
 
-// Copyright INRIA
 //2.4.1 (Kwakernaak)
 
 H=[1 (s-1)/((s-2)*(s-3));
index 617310c..e65ab5a 100644 (file)
@@ -1,5 +1,11 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 //test of musolve
-// Copyright INRIA
 mode(-1)
 M1 = [ ..
    5.2829       5.7683      -2.4004       1.2205      -6.4148    
index 8741451..1a9f374 100644 (file)
@@ -1,4 +1,10 @@
-// Copyright INRIA
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 mode(1)
 s=poly(0,'s');
 
index 075a2b9..48e7350 100644 (file)
@@ -1,4 +1,10 @@
-// Copyright INRIA
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 mode(1)
 rand('normal')
 // Define the plant
index 2882d37..87f2fb2 100644 (file)
@@ -1,7 +1,13 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 mode(7)
 //               SCILAB OBJECTS
 //               1. SCALARS
-// Copyright INRIA
 a=1               //real constant
 1==1              //boolean
 'string'          //character string
index 5eabb17..3b2ce61 100644 (file)
@@ -1,3 +1,10 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 demo_begin();
 demo_run("SCI/demos/basic/intro/dem01.dem");
 demo_end();
index 7729433..5192e90 100644 (file)
@@ -1,3 +1,10 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 //           CALLING EXTERNAL ROUTINE
 
 foo=['void foo(double *a,double *b,double *c)';
index 1a03ae8..2be667e 100644 (file)
@@ -1,3 +1,10 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 
 //           CALLING EXTERNAL ROUTINE
 txt=['      subroutine foof(a,b,c)';
index 07ee6c5..35ab331 100644 (file)
@@ -1,3 +1,10 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 demopath = get_absolute_file_path("2d_3d_plots.dem.gateway.sce");
 
 demolist = [                                       ..
index 91b6ca0..f865b36 100644 (file)
@@ -1,7 +1,9 @@
-// =============================================================================
-// Scilab Project
-// Copyright INRIA 2007
-// =============================================================================
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) 2007-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
 
 my_plot_desc          = "chart";
 
index 8379d43..065cee0 100644 (file)
@@ -1,7 +1,9 @@
-// =============================================================================
-// Scilab Project
-// Copyright INRIA 2007
-// =============================================================================
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) 2007-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
 
 my_plot_desc          = "champ";
 
index a7729c9..523a4d7 100644 (file)
@@ -1,7 +1,9 @@
-// =============================================================================
-// Scilab Project
-// Copyright INRIA 2007
-// =============================================================================
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) 2007-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
 
 my_plot_desc          = "contour";
 
index d995786..e52a248 100644 (file)
@@ -1,7 +1,9 @@
-// =============================================================================
-// Scilab Project
-// Copyright INRIA 2007
-// =============================================================================
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) 2007-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
 
 my_plot_desc          = "plot3d and contour";
 
index 1657a5a..52090a6 100644 (file)
@@ -1,7 +1,9 @@
-// =============================================================================
-// Scilab Project
-// Copyright INRIA 2007
-// =============================================================================
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) 2007-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
 
 my_plot_desc          = "plot3d and contour";
 
index ea5c1cc..866c4df 100644 (file)
@@ -1,7 +1,9 @@
-// =============================================================================
-// Scilab Project
-// Copyright INRIA 2007
-// =============================================================================
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) 2007-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
 
 my_plot_desc          = "plot3d and contour";
 
index a6e682b..55b1fa6 100644 (file)
@@ -1,7 +1,9 @@
-// =============================================================================
-// Scilab Project
-// Copyright INRIA 2007
-// =============================================================================
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) 2007-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
 
 my_plot_desc          = "contourf";
 
index 1113027..9af145a 100644 (file)
@@ -1,7 +1,9 @@
-// =============================================================================
-// Scilab Project
-// Copyright INRIA 2007
-// =============================================================================
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) 2007-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
 
 my_plot_desc          = "errbar";
 
index ec4fb84..17f3ccd 100644 (file)
@@ -1,7 +1,9 @@
-// =============================================================================
-// Scilab Project
-// Copyright INRIA 2007
-// =============================================================================
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) 2007-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
 
 my_plot_desc          = "fac3d";
 
index 5174f78..b450ea3 100644 (file)
@@ -1,7 +1,9 @@
-// =============================================================================
-// Scilab Project
-// Copyright INRIA 2007
-// =============================================================================
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) 2007-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
 
 my_plot_desc          = "fac3d1";
 
index 4177091..dabbd8b 100644 (file)
@@ -1,7 +1,9 @@
-// =============================================================================
-// Scilab Project
-// Copyright INRIA 2007
-// =============================================================================
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) 2007-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
 
 my_plot_desc          = "fchamp";
 
index 86c432f..14b8340 100644 (file)
@@ -1,7 +1,9 @@
-// =============================================================================
-// Scilab Project
-// Copyright INRIA 2007
-// =============================================================================
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) 2007-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
 
 my_plot_desc          = "fcontour";
 
index 12afeb1..297d63e 100644 (file)
@@ -1,7 +1,9 @@
-// =============================================================================
-// Scilab Project
-// Copyright INRIA 2007
-// =============================================================================
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) 2007-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
 
 my_plot_desc          = "fgrayplot";
 
index c534950..5974598 100644 (file)
@@ -1,7 +1,9 @@
-// =============================================================================
-// Scilab Project
-// Copyright INRIA 2007
-// =============================================================================
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) 2007-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
 
 my_plot_desc          = "fplot2d : f given by external";
 
index 11b954f..f8150ee 100644 (file)
@@ -1,7 +1,9 @@
-// =============================================================================
-// Scilab Project
-// Copyright INRIA 2007
-// =============================================================================
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) 2007-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
 
 my_plot_desc          = "fplot3d : z=f(x,y), f external";
 
index 3c596b5..35b3597 100644 (file)
@@ -1,7 +1,9 @@
-// =============================================================================
-// Scilab Project
-// Copyright INRIA 2007
-// =============================================================================
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) 2007-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
 
 my_plot_desc          = "fplot3d1 : z=f(x,y), f external";
 
index e11f1ea..c4545cd 100644 (file)
@@ -1,7 +1,9 @@
-// =============================================================================
-// Scilab Project
-// Copyright INRIA 2007
-// =============================================================================
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) 2007-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
 
 my_plot_desc          = "grayplot";
 
index cd91b55..b3586cc 100644 (file)
@@ -1,7 +1,9 @@
-// =============================================================================
-// Scilab Project
-// Copyright INRIA 2007
-// =============================================================================
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) 2007-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
 
 my_plot_desc          = "histplot";
 
index f64d208..e583361 100644 (file)
@@ -1,7 +1,9 @@
-// =============================================================================
-// Scilab Project
-// Copyright INRIA 2007
-// =============================================================================
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) 2007-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
 
 my_plot_desc          = "param3d : parametric curves in R3";
 
index 2e351af..0cbf4a9 100644 (file)
@@ -1,7 +1,9 @@
-// =============================================================================
-// Scilab Project
-// Copyright INRIA 2007
-// =============================================================================
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) 2007-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
 
 my_plot_desc          = "param3d : parametric curves in R3 (t.sin(t),t.cos(t),t.|t|/50.%pi)";
 
index 327c089..cd7b656 100644 (file)
@@ -1,7 +1,9 @@
-// =============================================================================
-// Scilab Project
-// Copyright INRIA 2007
-// =============================================================================
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) 2007-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
 
 my_plot_desc          = "plot2d and xgrid";
 
index 2298ced..5de2860 100644 (file)
@@ -1,7 +1,9 @@
-// =============================================================================
-// Scilab Project
-// Copyright INRIA 2007
-// =============================================================================
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) 2007-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
 
 my_plot_desc          = "plot2d1 log scale";
 
index 4929aa3..01bf43c 100644 (file)
@@ -1,7 +1,9 @@
-// =============================================================================
-// Scilab Project
-// Copyright INRIA 2007
-// =============================================================================
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) 2007-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
 
 my_plot_desc          = "plot2d1";
 
index d6aaa4f..8653bf8 100644 (file)
@@ -1,7 +1,9 @@
-// =============================================================================
-// Scilab Project
-// Copyright INRIA 2007
-// =============================================================================
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) 2007-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
 
 my_plot_desc          = "plot2d3 (vbar plot)";
 
index ffa23db..a5ff62f 100644 (file)
@@ -1,7 +1,9 @@
-// =============================================================================
-// Scilab Project
-// Copyright INRIA 2007
-// =============================================================================
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) 2007-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
 
 my_plot_desc          = "plot3d : z=sin(x)*cos(y)";
 
index 2e28197..1bfd063 100644 (file)
@@ -1,7 +1,9 @@
-// =============================================================================
-// Scilab Project
-// Copyright INRIA 2007
-// =============================================================================
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) 2007-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
 
 my_plot_desc          = "plot3d1 : z=sin(x)*cos(y)";
 
index e580538..8cfef3d 100644 (file)
@@ -1,7 +1,9 @@
-// =============================================================================
-// Scilab Project
-// Copyright INRIA 2007
-// =============================================================================
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) 2007-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
 
 my_plot_desc          = "subplot";
 
index 3b5a28c..cb4ec05 100644 (file)
@@ -1,7 +1,9 @@
-// =============================================================================
-// Scilab Project
-// Copyright INRIA 2007
-// =============================================================================
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) 2007-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
 
 my_plot_desc          = "plot3d and use of xgeom";
 
index 2dc0e7d..d7c7237 100644 (file)
@@ -1,7 +1,9 @@
-// =============================================================================
-// Scilab Project
-// Copyright INRIA 2007
-// =============================================================================
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) 2007-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
 
 my_plot_desc          = "zgrid";
 
index ab42a18..a2ddde3 100644 (file)
@@ -1,5 +1,11 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ENPC
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 mode(0);
-// Copyright Enpc
 
 xbasc();
 fs = get('figure_style');
index 5f3b319..49261c8 100644 (file)
@@ -1,8 +1,9 @@
-// ==========================================
-// Copyright INRIA
-// Copyright Enpc
-// last modified : 14th, December 2005
-// ==========================================
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2005 - ENPC
+//
+// This file is distributed under the same license as the Scilab package.
+//
 
 mode(0);
 
index de8ecd3..b0de145 100644 (file)
@@ -1,5 +1,11 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2005 - ENPC
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 // ==========================================
-// Copyright INRIA
 // Copyright Enpc
 // last modified : 14th, December 2005
 // ==========================================
index 45fa84e..d634f13 100644 (file)
@@ -1,8 +1,9 @@
-// ==========================================
-// Copyright INRIA
-// Copyright Enpc
-// last modified : 14th, December 2005
-// ==========================================
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2005 - ENPC
+//
+// This file is distributed under the same license as the Scilab package.
+//
 
 mode(0)
 
index af12611..3c9109a 100644 (file)
@@ -1,8 +1,9 @@
-// ==========================================
-// Copyright INRIA
-// Copyright Enpc
-// last modified : 14th, December 2005
-// ==========================================
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2005 - ENPC
+//
+// This file is distributed under the same license as the Scilab package.
+//
 
 mode(0);
 
index a8991aa..9e984ca 100644 (file)
@@ -1,8 +1,9 @@
-// ==========================================
-// Copyright INRIA
-// Copyright Enpc
-// last modified : 14th, December 2005
-// ==========================================
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2005 - ENPC
+//
+// This file is distributed under the same license as the Scilab package.
+//
 
 mode(0);
 
index ff5e4a6..fae63fb 100644 (file)
@@ -1,8 +1,9 @@
-// ==========================================
-// Copyright INRIA
-// Copyright Enpc
-// last modified : 14th, December 2005
-// ==========================================
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2005 - ENPC
+//
+// This file is distributed under the same license as the Scilab package.
+//
 
 mode(0);
 
index d818deb..59a8a59 100644 (file)
@@ -1,5 +1,11 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 function chainap(yt)
-// Copyright INRIA
   [n1,n2]=size(yt);
   x=ones(n1/2,n2);
   y=ones(n1/2,n2);
index 239bf57..48bbfc9 100644 (file)
@@ -1,8 +1,9 @@
-// ==========================================
-// Copyright INRIA
-// Copyright Enpc
-// last modified : 14th, December 2005
-// ==========================================
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2005 - ENPC
+//
+// This file is distributed under the same license as the Scilab package.
+//
 
 mode(0);
 
index ee1fce2..600d433 100644 (file)
@@ -1,8 +1,9 @@
-// ==========================================
-// Copyright INRIA
-// Copyright Enpc
-// last modified : 14th, December 2005
-// ==========================================
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2005 - ENPC
+//
+// This file is distributed under the same license as the Scilab package.
+//
 
 mode(0);
 
index bcfb0c9..905aa30 100644 (file)
@@ -1,4 +1,10 @@
-// Copyright Enpc
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ENPC
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 mode(1)
 t=%pi*(-5:5)/5;
 //first plot, to fix boundaries
index ff1e9ea..fa1f31a 100644 (file)
@@ -1,5 +1,11 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ENPC
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 mode(1)
-// Copyright Enpc
 kp=xget("pixmap");
 if kp==0, xset("pixmap",1);end;
 np=10;
index d0cc3a4..2451648 100644 (file)
@@ -1,3 +1,10 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 function demo_riemann()
   //demo_help demo_riemann
   xbasc();
@@ -36,7 +43,6 @@ function cplxmap(z,w,varargin)
 //cplxmap(z,w,T,A,leg,flags,ebox)
 //cplxmap Plot a function of a complex variable.
 //       cplxmap(z,f(z))
-// Copyright INRIA
 x = real(z);
 y = imag(z);
 u = real(w);v = imag(w);
@@ -57,7 +63,6 @@ function [z,s]=cplxroot(n,m)
 //       CPLXROOT(n,m) uses an m-by-m grid.  Default m = 20.
 // Use polar coordinates, (r,theta).
 // Cover the unit disc n times.
-// Copyright INRIA
 [lhs,rhs]=argn(0)
 if rhs  < 1, n = 3; end
 if rhs  < 2, m = 20; end
index f3b1287..4334cf8 100644 (file)
@@ -1,11 +1,13 @@
-//===========================================================
 //
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) 2007-2008 - INRIA - Pierre MARECHAL <pierre.marechal@inria.fr>
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
+//===========================================================
 // Demo of bar()
-// Copyright INRIA
-// Author : Pierre MARECHAL
-// Scilab team
 // Date : 6/12/2007
-//
 //===========================================================
 
 sdf();
index 9b0f022..8eb3bee 100644 (file)
@@ -1,3 +1,10 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 demopath = get_absolute_file_path("basic_functions.dem.gateway.sce");
 
 demolist=[                                                           ..
index 0353e9c..99c74d2 100644 (file)
@@ -1,7 +1,9 @@
-// =============================================================================
-// Scilab Project
-// Copyright INRIA 2007
-// =============================================================================
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) 2007-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
 
 my_plot_desc          = "rectangles, arcs, polylines, segments and numbers";
 
index 636adbf..8ba604b 100644 (file)
@@ -1,7 +1,9 @@
-// =============================================================================
-// Scilab Project
-// Copyright INRIA 2007
-// =============================================================================
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) 2007-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
        
        my_plot_desc          = "rectangles, arcs, polylines and strings";
        
index 4c67799..7928aa8 100644 (file)
@@ -1,7 +1,9 @@
-// =============================================================================
-// Scilab Project
-// Copyright INRIA 2007
-// =============================================================================
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) 2007-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
        
        my_plot_desc          = "Setting graphic context values";
        
index c2c1081..1675656 100644 (file)
@@ -1,7 +1,9 @@
-// =============================================================================
-// Scilab Project
-// Copyright INRIA 2007
-// =============================================================================
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) 2007-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
        
        my_plot_desc          = "General functions";
        
index ba02be7..4f689c5 100644 (file)
@@ -1,7 +1,9 @@
-// =============================================================================
-// Scilab Project
-// Copyright INRIA 2007
-// =============================================================================
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) 2007-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
        
        my_plot_desc          = "set of rectangles";
        
index ce432c5..f7e0dc6 100644 (file)
@@ -1,7 +1,9 @@
-// =============================================================================
-// Scilab Project
-// Copyright INRIA 2007
-// =============================================================================
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) 2007-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
        
        my_plot_desc          = "colored matrix";
        
index 6b84023..b0a942b 100644 (file)
@@ -1,7 +1,9 @@
-// =============================================================================
-// Scilab Project
-// Copyright INRIA 2007
-// =============================================================================
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) 2007-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
        
        my_plot_desc          = "colored histogram";
        
index 8008512..752f4a7 100644 (file)
@@ -1,7 +1,9 @@
-// =============================================================================
-// Scilab Project
-// Copyright INRIA 2007
-// =============================================================================
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) 2007-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
        
        my_plot_desc          = "pie chart";
        
index 85fa09e..d5077da 100644 (file)
@@ -1,5 +1,11 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 function[]=bike()
-// Copyright INRIA
 xbasc();xselect()
 rect=[0,0,10,10];
 xbasc();
index b83af2c..1936dcc 100644 (file)
@@ -1,3 +1,10 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) 2001 - Université de Nancy - Bruno PINCON
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 function [xr,yr,zr,xi,yi,zi] = CmplxFacets(R,e,TypeDomain,TypeCut,n,StrFunc)
 
        //  A function to compute the facets for drawing a complex function
index d621628..e88c464 100644 (file)
@@ -1,5 +1,12 @@
-// demo pour visualisation des fonctions elementaires
-// complexe - Bruno Pincon
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) 2005-2008 - INRIA - Pierre MARECHAL <pierre.marechal@inria.fr>
+// Copyright (C) ????-2005 - Université de Nancy - Bruno PINCON
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
+// demo pour visualisation des fonctions elementaires complexe
 
 // Adapted for new graphic by Pierre MARECHAL ( 16/12/2005 )
 
index 81d5cbc..f4104cc 100644 (file)
@@ -1,4 +1,9 @@
-// Copyright Enpc 
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ENPC
+//
+// This file is distributed under the same license as the Scilab package.
+//
 
 getf('SCI/demos/graphics/peaks.sci');
 z=peakit();
index 5041988..598839f 100644 (file)
@@ -1,9 +1,9 @@
-// ==========================================
-// Copyright INRIA
-// Copyright Enpc
-// last modified : 14th, December 2005
 //
-// ==========================================
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ENPC
+//
+// This file is distributed under the same license as the Scilab package.
+//
 
 mode(0);
 
index e03fa0e..6c60725 100644 (file)
@@ -1,9 +1,15 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ENPC
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 function []=emc2(filename)
        
        // Visualise un resultat de type GNU.*
        // generes par NSCK2E 
        // en general un ensemble de segments 
-       // Copyright ENPC
        
        xx=read(filename,-1,2);
        x=xx(:,1);
index 37aaec0..3ff34aa 100644 (file)
@@ -1,3 +1,10 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 demopath = get_absolute_file_path("graphics.dem.gateway.sce");
 
 demolist = ["2D and 3D plots"             ,"2d_3d_plots/2d_3d_plots.dem.gateway.sce"             ; ..
index fdac166..f93228f 100644 (file)
@@ -1,5 +1,11 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 mode(-1);
-// Copyright INRIA
 xbasc();
 drawlater();
 mode(1);
index 85d8221..964d6f6 100644 (file)
@@ -1,5 +1,11 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 mode(-1)
-// Copyright INRIA
 write(%io(2),'variables definition ')
 //
 //
index d9fc3e9..c232b99 100644 (file)
@@ -1,3 +1,10 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
   mode(1)
 //
 //             ------------------------------
@@ -11,7 +18,6 @@
 //           !                             C      !
 //           -----(E)------------------------------
 //
-// Copyright INRIA
    halt()
 // 
    l=10; r=1000; c=0.000001; e=10; pe1=0.002; pe2=0.0001;
index daec738..7ce1442 100644 (file)
@@ -1,3 +1,10 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 function [yd]=fty(t,y)
 //
 //  RHS of Differential equation
index 6a08a42..47eea63 100644 (file)
@@ -1,3 +1,10 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 mode(1)
 //
 //                    -----------------------------
@@ -7,7 +14,6 @@ mode(1)
 //                    -----------------------------
 //
 
-// Copyright INRIA
 // constants
 // -------------------------
    tr=186.d-6; gb=6000; g1=0.55; tau=6.d-4; g2=0.02; g4=26;
index 8c16b3b..c052563 100644 (file)
@@ -1,3 +1,10 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 function z=peaks(x,y)
 x1=x(:).*.ones(1,size(y,'*'));
 y1=y(:)'.*.ones(size(x,'*'),1);
index eb3af73..ab1f669 100644 (file)
@@ -1,6 +1,12 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ENPC
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 // demo of macros portrait & fchamp
 //  limit circle
-// Copyright Enpc 
 
 xbasc();
 part1()
index 93c357e..4a5d95e 100644 (file)
@@ -1,3 +1,10 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 function showinstr(mac)
        if type(mac)==11 then
                [in,out,txt]=string(mac)
@@ -10,7 +17,6 @@ function [X,Y]=field(x,y)
        // x and y are two vectors defining a grid
        // X and Y are two matrices which gives the grid point coordinates
        //-------------------------------------------------------------
-       // Copyright INRIA
        [rx,cx]=size(x);
        [ry,cy]=size(y);
        if rx<>1, write(%io(2),"x must be a row vector");return;end;
@@ -22,8 +28,7 @@ endfunction
 function [z]=dup(x,n)
        // utility 
        // x is a vector this function returns [x,x,x,x...] or [x;x;x;x;..]
-       // depending on x 
-       // Copyright INRIA
+       // depending on x
        [nr,nc]=size(x)
        if nr==1 then
                y=ones(n,1);
@@ -49,7 +54,6 @@ function [z] = bezier(p,t)
        //reset();
        // Evaluate sum p_i B_{i,n}(t) the easy and direct way.
        // p must be a k x n+1 matrix (n+1) points, dimension k.
-       // Copyright INRIA
        n=size(p,'c')-1;// i=nonzeros(t~=1);
        t1=(1-t); t1z= find(t1==0.0); t1(t1z)= ones(t1z);
        T=dup(t./t1,n)';
@@ -62,7 +66,6 @@ endfunction
 
 function bezier3d (p)
        // Shows a 3D Bezier curve and its polygon
-       // Copyright INRIA
        t=linspace(0,1,300);
        s=bezier(p,t);
        dh=xget("dashes");
@@ -78,8 +81,6 @@ endfunction
 
 function [X,Y,Z]=beziersurface (x,y,z,n)
        // Compute a Bezier surface. Return {bx,by,bz}.
-       // Copyright INRIA
-       
        [lhs,rhs]=argn(0);
        if rhs <= 3 ; n=20;end
        t=linspace(0,1,n);
@@ -106,7 +107,6 @@ function cplxmap(z,w,varargin)
        //cplxmap(z,w,T,A,leg,flags,ebox)
        //cplxmap Plot a function of a complex variable.
        //       cplxmap(z,f(z))
-       // Copyright INRIA
        x = real(z);
        y = imag(z);
        u = real(w);
@@ -132,7 +132,6 @@ function cplxroot(n,m,varargin)
        //       CPLXROOT(n,m) uses an m-by-m grid.  Default m = 20.
        // Use polar coordinates, (r,theta).
        // Cover the unit disc n times.
-       // Copyright INRIA
        [lhs,rhs]=argn(0)
        if rhs  < 1, n = 3; end
        if rhs  < 2, m = 20; end
index 6cf2669..8d3a709 100644 (file)
@@ -1,6 +1,12 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 mode(-1)
 
-// Copyright INRIA
 path=get_absolute_file_path('bezier.dem');
 oldln=lines();
 lines(0)
index 604a723..009d43d 100644 (file)
@@ -1,6 +1,12 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 function gammatest (N)
     // Bezier curve approximating a circle
-    // Copyright INRIA
     [lhs,rhs] =argn(0);
     if rhs < 1 ;N=[10,20,50,100];end
     x=linspace(0,1,100);
@@ -21,7 +27,6 @@ endfunction
 
 function beziertest
     // a random polygon and a bezier curve 
-    // Copyright INRIA
     plot2d(-0.2,-0.2,0,"011"," ",[-0.2,-0.2,1.2,1.2]);
     xtitle('Bezier Test : random polygon and bezier curve');
     current_axe = gca();current_axe.title.font_size = 3;
@@ -36,7 +41,6 @@ endfunction
 
 function bezier3dtest ()
     // Show a Beziercurve of dimension 3
-    // Copyright INRIA
     p=[-1,-1,-1;0,-1,-1;1,0,0;1,1,0;0,1,1;-1,1,0]';
     bezier3d(p);
 endfunction
@@ -44,7 +48,6 @@ endfunction
 
 function beziersurftest
     // Show a Bezier surface
-    // Copyright INRIA
     x=linspace(-%pi,%pi,5)
     [x,y]=field(x,x);
     z= 3*sin(x).*cos(y)
@@ -63,7 +66,6 @@ endfunction
 
 function c1test
     // Show how two bezier surfaces can be joined.
-    // Copyright INRIA
  
     // first surface
     x1=dup(-0.5:0.25:0.5,5);
index b52885f..9583468 100644 (file)
@@ -1,5 +1,11 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 mode(-1)
-// Copyright INRIA
 path=get_absolute_file_path('surfaces.dem');
 oldln=lines();lines(0)
 
index e1b5f69..102f9ad 100644 (file)
@@ -1,6 +1,12 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 function hole3d()
     // Holes in surfaces using %inf 
-    // Copyright INRIA
     t=linspace(-%pi,%pi,40);z=sin(t)'*cos(t);
     z1=find(abs(z) > 0.5);
     z(z1)=%inf*z1;
index 1822b6c..2981abd 100644 (file)
@@ -1,3 +1,10 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 mode(-1)
 xbasc() ;
 
index b4b2343..9970e0c 100644 (file)
@@ -1,5 +1,11 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 x_message(['x_message: Simple example of message ';
-// Copyright INRIA
 'First row of comments';
 'Second row';
 'etc...';])
index a4ab7ef..1d291dc 100644 (file)
@@ -1,3 +1,10 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 // some functions for the interpolation demo
 
 function [xf,yf,zf,qf] = nf3dq(x,y,z,q,orient)
index a3154b3..7904843 100644 (file)
@@ -1,6 +1,12 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 mode(-1)
 demopath=get_absolute_file_path('meta.dem')
-// Copyright INRIA
 mode(0);
 num=x_message([' ';
 'METANET is a Scilab toolbox for graph and network analysis';
index f76422d..6b4bc5e 100644 (file)
@@ -1,9 +1,15 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 function []=metro(demopath)
 //Scilab program for the travel by the tube in Paris
 //needs the file 'node2station' giving the fit between nodes and the names
 //of the stations
 //needs the execution of the program 'metrostart' for the data of the graph
-// Copyright INRIA
   //les noms des stations
   mamat=mgetl(demopath+'node2station')
   //Les lignes
index b1e5801..227e7b1 100644 (file)
@@ -1,3 +1,10 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 mode(-1)
 path=get_absolute_file_path('datafit.dem');
 getf(path+'demo_datafit.sci')
index fac42c2..d059ae8 100644 (file)
@@ -1,3 +1,10 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 function demo_datafit()
   //demo_help demo_datafit
   
index 669bd34..982bb5a 100644 (file)
@@ -1,3 +1,10 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 function ytob=icob(dtv)
 //<ytob>=icob(dtv)
 //extraction de l'etat aux instants de mesure
@@ -7,7 +14,6 @@ function ytob=icob(dtv)
 //variables de sortie :
 //ytob(ny,ntob) : valeur de l'etat aux instants de mesure
 //!
-// Copyright INRIA
 ytob(ny,ntob)=0.d0;
 lob=ndtu+ny+ntob+nob*ny+nex*ntob*nob+2*nu+ntob*nob+ny*(nti+ntf+..
 1+ny+nuc+nuv+1);
index e5fe76c..567ad7a 100644 (file)
@@ -1,3 +1,10 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 function [ytot]=icot(dtv)
 //<ytot>=icot(dtv)
 //extraction de l'etat total
@@ -7,7 +14,6 @@ function [ytot]=icot(dtv)
 //variables de sortie:
 //ytot(ny,nt) : etat du systeme
 //!
-// Copyright INRIA
 ytot(ny,nti+ntf)=0.d0;
 lot=ndtu+ny+ntob+nob*ny+nex*ntob*nob+2*nu+ntob*nob+ny*(1+ny+nuc+nuv);
 ytot=matrix(dtv(lot+1:lot+ny*(nti+ntf)),ny,nti+ntf)
index 030eec7..d907bfd 100644 (file)
@@ -1,3 +1,10 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 function [co,u,g,itv,dtv]=icse(u,simu,nap,imp)
 //Calcul du controle optimal sans mise a l'echelle du
 //controle et ponderation egale des observations
@@ -15,7 +22,6 @@ function [co,u,g,itv,dtv]=icse(u,simu,nap,imp)
 //dtv(ndtv) : tableau de travail (double precision fortran)
 //Utiliser les macros icot et icob pour extraire l'etat
 //!
-// Copyright INRIA
 df0=1;
 nu=prod(size(u))
 ech=ones(1,nu);
index 1be782e..829c1b1 100644 (file)
@@ -1,3 +1,10 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 function [co,u,g,itv,dtv]=icsegen(u,simu,nap,imp,ech,cof)
 //Calcul du controle optimal avec mise a l'echelle du controle et 
 //ponderation des observations
@@ -22,7 +29,6 @@ function [co,u,g,itv,dtv]=icsegen(u,simu,nap,imp,ech,cof)
 //Utiliser les macros icot et icob pour extraire l'etat
 //!
 
-// Copyright INRIA
 if nu<large then alg='qn' ; else alg='gc' ; end;
 itv=itu;
 itv(nitv)=0;
index 694f7e7..f6766e5 100644 (file)
@@ -1,9 +1,15 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 // icse.init.bas : initialisation et tests pour icse
 //**************************************************
 //
 //
 // creation y0 (etat initial)
-// Copyright INRIA
 if exists('y0')==0, y0=ones(1,ny); end;
 // creation de b,fy et fu et passage en vecteur ligne
 if exists('b')==0, b=ones(1,ny); end;
index da36269..f1b29cd 100644 (file)
@@ -1,3 +1,10 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 function [co,u,g,itv,dtv]=icsu(u,simu,nap,imp)
 //Calcul du controle optimal avec ponderation du controle initial
 //Une mise a l'echelle ramene toutes les composantes du controle
@@ -21,7 +28,6 @@ function [co,u,g,itv,dtv]=icsu(u,simu,nap,imp)
 //Utiliser les macros icot et icob pour extraire l'etat total
 //ou l'etat aux instants de mesure de dtv.
 //!
-// Copyright INRIA
 df0=1;
 if mini(binf) <=0, ..
   error('appel de icsu avec binf non strictement positif'); end;
index bc8ea1f..89d8988 100644 (file)
@@ -1,3 +1,10 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 function [co,u,g,itv,dtv,cof]=icsua(u,simu,nap,imp)
 //Calcul du controle optimal avec ponderation du controle initial
 //et ponderation arithmetique des poids des observations.
@@ -9,7 +16,6 @@ function [co,u,g,itv,dtv,cof]=icsua(u,simu,nap,imp)
 //%Syntaxe
 //[co,u,g,itv,dtv,cof]=icsua(u,simu,nap,imp)
 
-// Copyright INRIA
 //variables d'entree :
 //u(nu) : parametres initiaux
 //nap   : nombre maximum d' appels du simulateur
index 76d056e..34bf2f8 100644 (file)
@@ -1,3 +1,10 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 function [co,u,g,itv,dtv,cof]=icsuq(u,simu,nap,imp,obs,ytob)
 //  Calcul du controle optimal avec ponderation du controle initial
 //  et ponderation geometrique des poids des observations.
@@ -29,7 +36,6 @@ function [co,u,g,itv,dtv,cof]=icsuq(u,simu,nap,imp,obs,ytob)
 //cof(nob,ntob) : coefficients de ponderation du cout
 //Utiliser les macros icot et icob pour extraire l'etat
 //!
-// Copyright INRIA
 df0=1;
 if mini(binf) <=0, ..
   error('appel de icsuq avec binf non strictement positif'); end;
index c25a8f6..dd0cf25 100644 (file)
@@ -1,3 +1,10 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 function [yobt,yob]=icsvisu(vue)
 //Visualisation de l'observation de l'etat
 //Syntaxe
@@ -9,7 +16,6 @@ function [yobt,yob]=icsvisu(vue)
 //yob  : idem, aux instants d'observation
 //!
 //
-// Copyright INRIA
 tob1=[t0,tob];
 tobt=t0*ones(1,nti+ntf)+[dti*[1:nti],dtf*[(nti*dti/dtf)+1:..
 (nti*dti/dtf)+ntf]];
index 2a102d4..9d500b5 100644 (file)
@@ -1,8 +1,14 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 //                     lqv.bas : demo de icse
 //  *************************************************************
 //
 //
-// Copyright INRIA
 exec('icse.contexte');  // contexte
 //
 t0=0;    // instant initial
index 3f9c57a..c6e9dd9 100644 (file)
@@ -1,8 +1,14 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 //                navet.bas : demo de icse
 //  calcul trajectoire optimale de rentree d'une navette spatiale
 //  *************************************************************
 //
-// Copyright INRIA
 exec('icse.contexte');
 // les doubles slash introduisent des commentaires
 //
index ea45c67..2c223a7 100644 (file)
@@ -1,3 +1,10 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 //                sero.bas : demo de icse
 //  calcul coefficients optimaux du modele simplifie 5ht-plaquette
 //  **************************************************************
@@ -5,7 +12,6 @@
 // les doubles slash introduisent des commentaires
 //
 // contexte : tue les variables de nom reserve
-// Copyright INRIA
 exec('icse.contexte');
 t0=0.d0;    // instant initial
 tf=18.d1;   // instant final
index 3b7999c..aed6c4c 100644 (file)
@@ -1,3 +1,10 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 function [x,Z,z,ul,iters]=bigM(F,blck_szs,c,x0,M,nu,abstol,reltol,tv,maxiters);
 // [x,Z,z,ul,iters]=bigM(F,blck_szs,c,x0,M,nu,abstol,reltol,tv,maxiters);
 //
@@ -45,7 +52,6 @@ function [x,Z,z,ul,iters]=bigM(F,blck_szs,c,x0,M,nu,abstol,reltol,tv,maxiters);
 // ul:        ul(1): primal objective, ul(1): dual objective.
 // iters:     number of iterations taken.
 
-// Copyright INRIA
 
 [rowf,colf]=size(F);
 m = colf-1;
index 80b6c4c..a77e53e 100644 (file)
@@ -1,5 +1,11 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
  function [X,Y]=dscr_lyap(E,A,C)
-// Copyright INRIA
 // Generated by lmitool on Wed Feb 01 09:40:57 MET 1995
  Mbound = 1e3;
  abstol = 1e-6;
index 1b85152..09eb15a 100644 (file)
@@ -1,5 +1,11 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
  function [X]=dscr_lyap2(E,A)
-// Copyright INRIA
 // Generated by lmitool on Tue Jan 31 21:58:20 MET 1995
  Mbound = 1e3;
  abstol = 1e-10;
index 259fc97..0d0b7a6 100644 (file)
@@ -1,5 +1,11 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
  function [X,Y,gama]=fullstate(A,B1,B2,C1,D12,D11)
-// Copyright INRIA
 // Generated by lmitool on Thu Feb 09 11:30:44 MET 1995
    
    Mbound = 1e3;
index 5cc0dff..e3c65b4 100644 (file)
@@ -1,5 +1,11 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
  function [X,Y,L]=h2hinf(A,B1,B2,C1,C2,D11,D12,D22,gama)
-// Copyright INRIA
 // Generated by lmitool on Mon Feb 06 17:09:19 MET 1995
  Mbound = 1e3;
  abstol = 1e-10;
index 638b948..0a4a2cb 100644 (file)
@@ -1,5 +1,11 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
  function [x,cout]=linprog(A,b,C,d,c,x0)
-// Copyright INRIA
 // Generated by lmitool on Thu Feb 02 16:32:14 MET 1995
  Mbound = 1e3;
  abstol = 1e-10;
index e89126c..49e11bf 100644 (file)
@@ -1,6 +1,12 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 path=get_absolute_file_path('lmi.dem')
 getf(path+'lmidem.sci');
-// Copyright INRIA
 mode(-1);
 x_message(['      ';
           'LMITOOL is a Scilab package for LMI optimization';
index 64ea032..ba7893e 100644 (file)
@@ -1,5 +1,11 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 function [txtdo]=lmidem(PROBNAME,XNAME,DNAME) 
-// Copyright INRIA
 [LHS,RHS]=argn(0);
 txtdo=[]
 
index e911c54..80bb1bd 100644 (file)
@@ -1,5 +1,11 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
  function [X,cost]=norminf(E,A,B,C,D,gama)
-// Copyright INRIA
 // Generated by lmitool on Mon Feb 06 11:12:51 MET 1995
  Mbound = 1e3;
  abstol = 1e-10;
index 1b408ee..3d0b7e8 100644 (file)
@@ -1,5 +1,11 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
  function [X,c]=normopt(A,B,C,D)
-// Copyright INRIA
 // Generated by lmitool on Wed Feb 08 16:17:01 MET 1995
    
    Mbound = 1e3;
index 5902da8..8a9a61e 100644 (file)
@@ -1,5 +1,11 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
  function [X,c]=normopt2(sys)
-// Copyright INRIA
 // Generated by lmitool on Wed Feb 08 14:55:43 MET 1995
    
    Mbound = 1e3;
index a70bb59..f83f6fb 100644 (file)
@@ -1,5 +1,11 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
  function [X,c]=normoptd(A,B,C,D)
-// Copyright INRIA
 // Generated by lmitool on Mon Feb 06 11:12:51 MET 1995
  Mbound = 1e3;
  abstol = 1e-10;
index 81c057e..18823eb 100644 (file)
@@ -1,5 +1,11 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
  function [P,Q]=of(A,B,C)
-// Copyright INRIA
 // Generated by lmitool on Thu Feb 09 11:22:01 MET 1995
    
    Mbound = 1e3;
index e9f7078..7c32516 100644 (file)
@@ -1,10 +1,16 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 function [x,Z,z,ul,iters] = phase1(F,blck_szs,M,nu,abstol,maxiters);
 // [x,Z,z,ul,iters] = phase1(F,blck_szs,M,nu,abstol,maxiters);
 //
 // Find an x s.t. F(x) > 0 and Tr F(x) < M 
 //    or prove that no such x exists.
 
-// Copyright INRIA
 // minimize    t 
 // subject to  F(x) + t*I = F_0 + x_1*F_1 + ... + x_m*F_m + t*I >= 0 
 //             Tr F(x) <= M
index 6ed8f6f..e76f0c7 100644 (file)
@@ -1,5 +1,11 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
  function [P]=ric_dscr(E,A,C,Q,R)
-// Copyright INRIA
 // Generated by lmitool on Thu Feb 09 15:59:05 MET 1995
    
    Mbound = 1e3;
index c9b7449..b9a46ed 100644 (file)
@@ -1,5 +1,11 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
  function [X]=sylvester(A,B,C,flag)
-// Copyright INRIA
 // Generated by lmitool on Thu Feb 09 11:55:34 MET 1995
    
    Mbound = 1e3;
index 3c244e2..7c06e6a 100644 (file)
@@ -1,3 +1,10 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
  function [X]=test(A1,A2,Q1,Q2)
  // Generated by lmitool on Thu Feb 09 17:48:51 MET 1995
    
index 3112e31..8114f3e 100644 (file)
@@ -1,3 +1,10 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
  function [X]=tset(A1,A2,Q1,Q2)
  // Generated by lmitool on Thu Feb 09 17:48:51 MET 1995
    
index 460515b..d72a124 100644 (file)
@@ -1,3 +1,10 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 function demo_multiflow(gfile)
 //              The Graph
   //demo_help demo_multiflot
index ad7bcec..d78ef9f 100644 (file)
@@ -1,3 +1,10 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 mode(-1)
 path=get_absolute_file_path('multiflow.dem');
 getf(path+'demo_multiflow.sci')
index 8e9b8c0..d7ec524 100644 (file)
@@ -1,5 +1,11 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 mode(-1)
-// Copyright INRIA
 path=get_absolute_file_path('optimization.dem');
 oldln=lines();lines(0);
 
index a2b2ddd..8749c17 100644 (file)
@@ -1,5 +1,11 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 function [x,y,typ]=BOUNCE4_f(job,arg1,arg2)
-// Copyright INRIA
 x=[];y=[];typ=[];
 select job
 case 'plot' then
index a56a0d4..314df80 100644 (file)
@@ -1,6 +1,12 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 function [x,y,typ]=BOUNCEXY_f(job,arg1,arg2)
 //Scicos 2D animated visualization block
-// Copyright INRIA
 x=[];y=[];typ=[]
 select job
 case 'plot' then
index cb7d1ba..fc471a7 100644 (file)
@@ -1,3 +1,10 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 // generated by builder.sce: Please do not edit this file
 // ------------------------------------------------------
 bouncexy_path=get_absolute_file_path('loader.sce');
index 6084c4e..0f1ec32 100644 (file)
@@ -1,6 +1,12 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) 2005 - INRIA - Jacques-Deric ROUAULT
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 //  PROGRAMME GENEAL
 //  Version 5.4 20051103
-//  Copyright Jacques-Deric Rouault
 //  Designed for Scilab 3.1.1 & 4.0 under Windows XP & Linux
 
 function demo_geneal()
@@ -225,7 +231,7 @@ for ns = 1:nsecteurs do
     xsegs ([xdeb,xfin],[ydeb,yfin]);
     hs = gce ();
     hs.thickness=2;
-    angled = 360-pasangle*ns/64; // degrés
+    angled = 360-pasangle*ns/64; // degr�s
     xstring (xdeb,ydeb,tnom(pers),angled,0);
     ht = gce ();
     select tpers(pers,1)
@@ -534,7 +540,7 @@ for i=1:10
 end;
 
 mclose (fg);
-mprintf ("\nFin normale d''exécution du programme / Correct end of running\n");
+mprintf ("\nFin normale d''ex�cution du programme / Correct end of running\n");
 
 xdel() ;
 
index d7211a1..845e754 100644 (file)
@@ -1,3 +1,10 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 function demo_cmplxfun()
   demo_help demo_cmplxfun
   pathcur=pwd();
index 82e98cb..67ef1bd 100644 (file)
@@ -1,3 +1,10 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) 2001 - Université de Nancy - Bruno PINCON
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 function []=TitleWithSelectedFont(titre,ftype,fsize)
    // To draw a title with a selected font without
    // change the current font
index 051f46e..b4be5d5 100644 (file)
@@ -1,3 +1,10 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 // demo pour visualisation des fonctions elementaires
 // complexe - Bruno Pincon 
 
index d130bef..32df53d 100644 (file)
@@ -1,3 +1,10 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 function demo_datafit()
   demo_help demo_datafit
   
index d644ae6..8cc689f 100644 (file)
@@ -1,3 +1,10 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 function demo_3dplot()
 demo_help demo_3dplot
 
index 72eec79..12d0443 100644 (file)
@@ -1,15 +1,23 @@
-//  PROGRAMME DA4-11 : Structure dynamique A : division sur place de quasi-carrés sans effet d'échelle
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) 2005 - INRIA - Jacques-Deric ROUAULT
+// Copyright (C) 2005 - INRIA - Jean-Baptiste SILVY <jean-baptiste.silvy@inria.fr>
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
+//  PROGRAMME DA4-11 : Structure dynamique A : division sur place de quasi-carr�s sans effet d'�chelle
 //  PROGRAM   DA4-11 : Dynamical stucture A :  division on place of quasi-squares without scale effects
 //  Version 4.3 du 3 novembre 2005
-//  Copyright Jacques-Deric Rouault
+
 //  Designed for Scilab 3.1.1 & 4.0 under Windows XP & Linux
-// Modified by Jean-Baptiste Silvy for the 17/11/2005 demo.
+//  Modified by Jean-Baptiste Silvy for the 17/11/2005 demo.
 
 function demo_cellule()
 demo_help demo_cellule
 
 clear;
-mprintf ("\nPROGRAMME DA4-11 : Structure dynamique A sur quasi-carrés sans adresse\n");
+mprintf ("\nPROGRAMME DA4-11 : Structure dynamique A sur quasi-carr�s sans adresse\n");
 mprintf ("PROGRAM DA4-11 : Dynamical stucture A on quasi-squares without adresses\n");
 racine_prog = "DA4-11";
 ndivi=13; // Nombre de divisions
@@ -37,12 +45,12 @@ haut2 = haut ;
 
 nrects = 1 ;
 rectd = [] ; // Niveau de divisions
-rectc = [] ; // Coordonnées
+rectc = [] ; // Coordonn�es
 rectp = [] ; // Pattern = couleur
 
 rectd (1)   = 0 ;     //  Niveau de division
-rectc (1,1) = 0 ;     // x coin supérieur gauche
-rectc (2,1) = haut ;  // y coin supérieur gauche
+rectc (1,1) = 0 ;     // x coin sup�rieur gauche
+rectc (2,1) = haut ;  // y coin sup�rieur gauche
 rectc (3,1) = long ;  //  longueur
 rectc (4,1) = haut ;  //  hauteur
 rectp (1)   = 2 ;     //  Couleur
@@ -50,7 +58,7 @@ rectp (1)   = 2 ;     //  Couleur
 //  representation
 nd = 0;
 hf = scf (0);
-nomfenetre = sprintf ("DA4-11 : Division numéro %d/%d",nd,ndivi);
+nomfenetre = sprintf ("DA4-11 : Division num�ro %d/%d",nd,ndivi);
 hf.figure_name = nomfenetre;
 
 ha = hf.children;
@@ -91,9 +99,9 @@ for nd=1:ndivi do
       couleur=couleur+1;
       if couleur==ncoulmax then couleur=1; end;
       rectp (nr)=couleur;
-      // nord = inchangé
-      // est = inchangé
-      // sud = inchangé
+      // nord = inchang�
+      // est = inchang�
+      // sud = inchang�
 
     else  // division en hauteur nord-sud
       // nord = nouveau rectangle
@@ -120,7 +128,7 @@ for nd=1:ndivi do
   clf();
   SetPosition();
   hf = scf (0);
-  nomfenetre = sprintf ("DA4-11 : Division numéro %d/%d",nd,ndivi);
+  nomfenetre = sprintf ("DA4-11 : Division num�ro %d/%d",nd,ndivi);
   hf.figure_name = nomfenetre;
 
   ha = hf.children;
index e2c3eff..b86607e 100644 (file)
@@ -1,3 +1,10 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 function demo_image()
 
 demo_help demo_image
index 67ac802..6d736bd 100644 (file)
@@ -1,3 +1,10 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 function demo_isoSurf()
 demo_help demo_isoSurf
 
index 92cede1..0705d76 100644 (file)
@@ -1,3 +1,10 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 function demo_scicos()
   funcprot(0)
   S=remove_builtins()
index 82f19b0..2319ff2 100644 (file)
@@ -1,3 +1,10 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 function demo_scicos1()
   demo_help demo_scicos1
   getf SCI/demos/scicos/scicos_play.sci
index 62128eb..43fb152 100644 (file)
@@ -1,3 +1,10 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 function demo_scicos2()
   demo_help demo_scicos2
   getf Bounce/BOUNCE4_f.sci
index b75f2e3..0d14812 100644 (file)
@@ -1,3 +1,10 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 function demo_scilab()
 
   // Définition des variables
index 6cb17db..757d089 100644 (file)
@@ -1,3 +1,10 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 function demo_signal()
   demo_help demo_signal
   SetPosition();
index 2405285..c7e35f7 100644 (file)
@@ -1,9 +1,12 @@
-//------------------------------------------------------------
-// Authors Serge Steer, Jean-Baptiste Silvy Copyright INRIA
-// Update 16/11/2005
-// Update 02/04/2007 : Bruno
-// Udpate 02/04/2007 : Allan 
-//------------------------------------------------------------
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) 2005 - INRIA - Jean-Baptiste SILVY <jean-baptiste.silvy@inria.fr>
+// Copyright (C) 2005 - INRIA - Serge STEER <serge.steer@inria.fr>
+// Copyright (C) 2007 - INRIA - Bruno JOFRET <bruno.jofret@inria.fr>
+// Copyright (C) 2007 - INRIA - Allan CORNET <allan.cornet@inria.fr>
+//
+// This file is distributed under the same license as the Scilab package.
+//
 
 // default window size;
 wSize = [850,920];
index a826052..888c6d9 100644 (file)
@@ -1,3 +1,10 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 cd(SCI+'/modules/others/demos/loop_demo');
 if MSDOS then
   while %t
index e75d2e9..dddac46 100644 (file)
@@ -1,3 +1,10 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 function demo_multiflot()
 //              The Graph
   demo_help demo_multiflot
index c6b448b..e8dd55c 100644 (file)
@@ -1,3 +1,10 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 function demo_pendulum()
   demo_help demo_pendulum
   npend_build_and_load() ;
index 4064377..55c0843 100644 (file)
@@ -1,8 +1,14 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ENPC
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 function []=chaind(p,r,rect)
 //draw chain given sequence of points
 //!
 //
-// Copyright ENPC
 n=maxi(size(p));
 arcs=[ -r ,r,2*r,2*r,0,64*360].*.ones(n,1);
 arcs=[ p , 0*ones(n,4)] + arcs;
index 84dad44..7170ce6 100644 (file)
@@ -1,6 +1,12 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ENPC
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 function [n]=np()
 // Return the size  of the Fortran pendulum 
-// Copyright ENPC
   n=1;
   n=fort('np',n,1,'i','sort',1);
 endfunction 
index 71a987b..adfd65c 100644 (file)
@@ -1,5 +1,11 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ENPC
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 mode(-1);
-// Copyright ENPC
 
 path="SCI/demos/npend";
 
index e9a3af9..d696fb4 100644 (file)
@@ -1,3 +1,10 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 function demo_optloc()
   demo_help demo_optloc
   stacksize(1D7)
index cf50321..20b702e 100644 (file)
@@ -1,3 +1,10 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 function demo_riemann()
   //demo_help demo_riemann
   xbasc();
@@ -35,7 +42,6 @@ function cplxmap(z,w,varargin)
 //cplxmap(z,w,T,A,leg,flags,ebox)
 //cplxmap Plot a function of a complex variable.
 //       cplxmap(z,f(z))
-// Copyright INRIA
 x = real(z);
 y = imag(z);
 u = real(w);v = imag(w);
@@ -56,7 +62,6 @@ function [z,s]=cplxroot(n,m)
 //       CPLXROOT(n,m) uses an m-by-m grid.  Default m = 20.
 // Use polar coordinates, (r,theta).
 // Cover the unit disc n times.
-// Copyright INRIA
 [lhs,rhs]=argn(0)
 if rhs  < 1, n = 3; end
 if rhs  < 2, m = 20; end
index fd0949e..e5d8091 100644 (file)
@@ -1,3 +1,10 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 function [f,g,ind]=rosenbrock(x,ind,p)
   f=[],g=[];
   n=size(x,'*')
index 91f756c..a6aeb6b 100644 (file)
@@ -1,3 +1,10 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 function [out]=Fooo(t,Y,Yprim)
 // Function generated by Maple to Scilab interface
 out=[
@@ -147,7 +154,6 @@ function demo_sliding_pendulum()
 //
 // Sliding pendulum
 // Claude Gomez
-// Copyright INRIA
 
   demo_help  demo_sliding_pendulum
 // données
index 931de79..4bb2a03 100644 (file)
@@ -1,3 +1,10 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 function demo_spline()
 clear;lines(0);
 demo_help demo_scilab
index 43ae25a..a9545e0 100644 (file)
@@ -1,3 +1,10 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) 1989 - INRIA - Serge STEER <serge.steer@inria.fr>
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 function demo_truck()
   demo_help demo_truck
   initial = [-2;3;0.5235988;0;0;1]
@@ -13,8 +20,6 @@ function titlepage(str,win)
 //trice de chaines de caracteres str ecrite centree dans  la page avec
 //une taille de caractere maximale.
 //!
-//origine S Steer INRIA 1989
-// Copyright INRIA
 [lhs,rhs]=argn(0)
 old=xget('window')
 if rhs==2 then xset('window',win);end
index 93b2229..a9750e1 100644 (file)
@@ -1,5 +1,11 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 // This is just a graphic demo of the bike
-// Copyright INRIA
 
 mode(0);
 xbasc();
index 24c45b3..40fb312 100644 (file)
@@ -1,5 +1,11 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 mode(0);
-// Copyright INRIA
 path='SCI/modules/others/demos/simulation/bike/';
 xbasc();
 fs = get('figure_style');
index 99daead..910621f 100644 (file)
@@ -1,3 +1,10 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 function []=show(xx,t,p,f_name)
 //[]=show(xx,t,p,[f_name])
 // Just show the bike evolution
@@ -6,7 +13,6 @@ function []=show(xx,t,p,f_name)
 // f_name is the function name to use for display 
 // f_name can be velo1 or velo2 or velo3
 // !
-// Copyright INRIA
   [lhs,rhs]=argn(0)
   if rhs <= 3 , f_name=velo1;end
   nstep=1;r1=0.3;  //change nstep for postscript
index a1a01ff..6b1ac2f 100644 (file)
@@ -1,6 +1,12 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 function []=velo1()
 // "full wheel" version
-// Copyright INRIA
   ct=-cos(t);cp=cos(p);st=-sin(t);sp=sin(p);
   xe=[xmin;xmax;xmax;xmin;xmin]
   ye=[ymin;ymin;ymax;ymax;ymin]
index 3ba71c7..a94fc09 100644 (file)
@@ -1,7 +1,13 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 function []=velo2()
 // empty wheel : the shortest
 // (geometric calculations made by param3d)
-// Copyright INRIA
   t= t*180/%pi;
   p= p*180/%pi;
   xe=[xmin,xmax,xmax,xmin,xmin]
index ec1f080..126e7d2 100644 (file)
@@ -1,3 +1,10 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 function []=velo3()
 // Version roues a rayons ( qui tournent avec la roue !)
 // la formule donnant l'angle de rotation est sans doute fausse
@@ -5,7 +12,6 @@ function []=velo3()
 // vitesse angulaire xx(6,i) pour la roue rear
 // et que le temps d'integration etait de 1
 // => theta (i) = xx(6,i)*i/imax
-// Copyright INRIA
   ct=-cos(t);cp=cos(p);st=-sin(t);sp=sin(p);
   xe=[xmin,xmax,xmax,xmin,xmin]
   ye=[ymin,ymin,ymax,ymax,ymin]
index 61f6caf..3bc089b 100644 (file)
@@ -1,7 +1,13 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 function []=velo4()
 // version with full wheels with  xgeom & xfpoly
 // ( geom performs the geometric calculations)
-// Copyright INRIA
   t= t*180/%pi;
   p= p*180/%pi;
   xe=[xmin,xmax,xmax,xmin,xmin]
index adf94a9..ca2d2bf 100644 (file)
@@ -1,7 +1,13 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 function []=velo4p()
 // version with full wheels with  xgeom & xfpoly
 // ( geom performs the geometric calculations)
-// Copyright INRIA
   t= t*180/%pi;
   p= p*180/%pi;
   xe=[xmin,xmax,xmax,xmin,xmin]
index 679e0c2..16e9587 100644 (file)
@@ -1,7 +1,13 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 function []=velo5()
 //  full wheels using xgeom et xfpoly
 // computations made by geom)
-// Copyright INRIA
   t= t*180/%pi;
   p= p*180/%pi;
   xe=[xmin,xmax,xmax,xmin,xmin]
index 2654d91..be6eae9 100644 (file)
@@ -1,6 +1,12 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 function []=velod(i)
 //------------ generation of the rear wheel
-// Copyright INRIA
   nnn=24
   i1=(i-1)*nstep+1
   ang=xx(6,i1)*i1/n2
index d051d56..2b232dd 100644 (file)
@@ -1,6 +1,12 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 function []=velodp(i)
 //------------ generation of the rear wheel
-// Copyright INRIA
   nnn=12
   i1=(i-1)*nstep+1
   ang=xx(6,i1)*i1/n2
index 1311486..2f70f1b 100644 (file)
@@ -1,4 +1,10 @@
-// Copyright INRIA
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 
 mode(-1)
 deff("[]=demoexc(fil)","exec(""SCI/demos/simulation/dae/""+fil)")
index f131781..aa4edbe 100644 (file)
@@ -1,4 +1,10 @@
-// Copyright INRIA
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 
 mode(-1)
 deff("[]=demoexc(fil)","exec(""SCI/demos/simulation/dae/""+fil)")
index 9d14c8f..8a37c22 100644 (file)
@@ -1,4 +1,10 @@
-// Copyright INRIA
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 
 mode(-1)
 deff("[]=demoexc(fil)","exec(""SCI/demos/simulation/dae/""+fil)")
index d65db6b..b35f2b0 100644 (file)
@@ -1,11 +1,16 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA - Claude GOMEZ <claude.gomez@inria.fr>
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 function demo_sliding_pendulum()
 //
 // Sliding pendulum
-// Claude Gomez
-// Copyright INRIA
 
 //  demo_help  demo_sliding_pendulum
-  
+
   //pendulum parameters
   g=10; l=1; m=1; M=1; k=0.5;
 
@@ -46,7 +51,6 @@ endfunction
 
 function [res,ires]=pendg(t,y,ydot)
 //DAE external for sliding pendulum
-//Author: Claude Gomez, Copyright INRIA
   x=y(1:3); u=y(4:6); lambda=y(7);
   xp=ydot(1:3); up=ydot(4:6);
 
index af0ceae..b198956 100644 (file)
@@ -1,4 +1,10 @@
-// Copyright INRIA
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 
 mode(1)
 
index c526024..bea5131 100644 (file)
@@ -1,4 +1,10 @@
-// Copyright INRIA
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 
 mode(1)
 
index 0c56d5e..a149776 100644 (file)
@@ -1,4 +1,10 @@
-// Copyright INRIA
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 
 mode(1)
 
index a084a07..e668f63 100644 (file)
@@ -1,4 +1,10 @@
-// Copyright INRIA
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 
 // f(x,y)=y-x^2
 
index eaad20c..feb27fe 100644 (file)
@@ -1,4 +1,10 @@
-// Copyright INRIA
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 
 // f(x,y)=y-x^2-cos(omega*x)/3
 
index a4001d6..f7e931f 100644 (file)
@@ -1,4 +1,10 @@
-// Copyright INRIA
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 
 // x=l(u)=u-2*k3*u*sin(k1*sqrt(1+4*k3^2*u^2))/sqrt(1+4*k3^2*u^2)/k2
 // y=m(u)=k3*u^2+sin(k1*sqrt(1+4*k3^2*u^2))/sqrt(1+4*k3^2*u^2)/k2
index 8cca71e..376b3ce 100644 (file)
@@ -1,4 +1,10 @@
-// Copyright INRIA
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 
 function [res,ires]=pendg(t,y,ydot)
 x=y(1:3); u=y(4:6); lambda=y(7);
index 31c1f0c..e64cacf 100644 (file)
@@ -1,4 +1,10 @@
-// Copyright INRIA
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 
 //
 // Sliding pendulum, curve #1
index 8b1dea1..370c309 100644 (file)
@@ -1,4 +1,10 @@
-// Copyright INRIA
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 
 //
 // Sliding pendulum, curve #2
index c8a71aa..8050ded 100644 (file)
@@ -1,4 +1,10 @@
-// Copyright INRIA
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 
 //
 // Sliding pendulum, curve #3
index ff44cbf..7c94981 100644 (file)
@@ -1,4 +1,10 @@
-// Copyright INRIA
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 
 function c=gg(x)
 c=x'*x-l*l;
index 4064377..55c0843 100644 (file)
@@ -1,8 +1,14 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ENPC
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 function []=chaind(p,r,rect)
 //draw chain given sequence of points
 //!
 //
-// Copyright ENPC
 n=maxi(size(p));
 arcs=[ -r ,r,2*r,2*r,0,64*360].*.ones(n,1);
 arcs=[ p , 0*ones(n,4)] + arcs;
index 03594cf..a7d54a9 100644 (file)
@@ -1,6 +1,12 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ENPC
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 function [n]=np()
 // Return the size  of the Fortran pendulum 
-// Copyright ENPC
   n=1;
   n=fort('np',n,1,'i','sort',1);
 endfunction 
index 66add4e..f2fdd41 100644 (file)
@@ -1,4 +1,11 @@
-// Copyright ENPC INRIA
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) INRIA
+// Copyright (C) ENPC
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 function demo_pendulum()
   if ~(haveacompiler()) then
     x_message(['Scilab doesn''t find a C compiler','This demo is disabled'])
@@ -40,7 +47,6 @@ endfunction
 
 function [n]=np()
 // Return the size  of the Fortran pendulum 
-// Copyright ENPC
   n=1;
   n=fort('np',n,1,'i','sort',1);
 endfunction 
index 622e1e8..b3b42fa 100644 (file)
@@ -1,5 +1,12 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) INRIA
+// Copyright (C) ENPC
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 mode(-1);
-// Copyright ENPC INRIA
 
 path=pathconvert(get_absolute_file_path('npend.dem'),%t,%t)    
 
index 3e52f7e..012dfdb 100644 (file)
@@ -1,5 +1,11 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 deff('[ydot]=lorenz(t,y)',...
-// Copyright INRIA
 "x=y(1);...
 a=[-10,10,0;28,-1,-x;0,x,-8/3];...
 ydot=a*y")
index d62b0ed..edb9fe5 100644 (file)
@@ -1,7 +1,13 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 xset("default")
 xset figure_style new
 kp=xget("pixmap");
-// Copyright INRIA
 dr=driver()
 driver('X11')
 if kp==0, xset("pixmap",1);end;
index be972fb..9a9a66b 100644 (file)
@@ -1,7 +1,13 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 xset("default");
 set figure_style new ;
 kp=xget("pixmap");
-// Copyright INRIA
 dr=driver()
 driver('X11')
 if kp==0, xset("pixmap",1);end;
index d137a84..c4dcd27 100644 (file)
@@ -1,4 +1,10 @@
-// Copyright INRIA
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 
 //
 // sharks and sardins: Lotka-Volterra ODE
index bf82b27..9e594f4 100644 (file)
@@ -1,5 +1,11 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 mode(-1)
-// Copyright INRIA
 oldln=lines();
 lines(0)
 deff('[]=demoex(num)','exec(''SCI/modules/others/demos/simulation/ode/''+demolist(num,2),-1)')
index b222ee6..8a8888e 100644 (file)
@@ -1,4 +1,10 @@
-// Copyright INRIA
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 // Simple Example
  mode(1)
  xbasc()
index 917f708..f329ac3 100644 (file)
@@ -1,4 +1,10 @@
-// Copyright INRIA
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 //chemical process (stiff)
 mode(-1)
 xbasc();
index 41d3a8e..45a0e4b 100644 (file)
@@ -1,4 +1,10 @@
-// Copyright INRIA
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 mode(-1)
 xbasc();
 //
index 7854595..7654278 100644 (file)
@@ -1,3 +1,10 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 mode(-1)
 
 mode(1)
index 54355e1..99739f0 100644 (file)
@@ -1,4 +1,10 @@
-// Copyright INRIA
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 
 mode(-1)
 deff("[]=demoexc(fil)","exec(""SCI/modules/others/demos/simulation/ode/""+fil)")
index e1a687d..147938e 100644 (file)
@@ -1,4 +1,10 @@
-// Copyright INRIA
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 
 mode(-1)
 deff("[]=demoexc(fil)","exec(""SCI/modules/others/demos/simulation/ode/""+fil)")
index 8fe4efb..43504ba 100644 (file)
@@ -1,4 +1,10 @@
-// Copyright INRIA
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 
 mode(1)
 oldln=lines();
index 64810ab..99cea93 100644 (file)
@@ -1,4 +1,10 @@
-// Copyright INRIA
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 
 mode(-1)
 deff("[]=demoexc(fil)","exec(""SCI/modules/others/demos/simulation/ode/""+fil)")
index ec1fad5..955060c 100644 (file)
@@ -1,5 +1,11 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 mode(-1)
-// Copyright INRIA
 oldln=lines();
 lines(0)
 deff('[]=demoex(num)','exec(''SCI/modules/others/demos/simulation/ode/''+demolist(num,2),-1)')
index 88f8275..05eef80 100644 (file)
@@ -1,4 +1,10 @@
-// Copyright INRIA
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 
 //
 // Van der Pol ODE
index ab70649..58bb9c5 100644 (file)
@@ -1,3 +1,10 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 mode(-1)
 path=get_absolute_file_path('simulation.dem');
 
index 7f02541..b26effa 100644 (file)
@@ -1,3 +1,10 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ENPC
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 function []=show(xx,t,p)
 //[]=show(xx,t,p)
 // Just show the wheel evolution 
@@ -8,7 +15,6 @@ function []=show(xx,t,p)
 //                     .    .   .
 // xx= [theta,phi,psi,teta,phi,psi,x,y]
 // !
-// Copyright ENPC 
   [lhs,rhs]=argn(0)
   if rhs <= 2 , p=%pi/3;end
   if rhs <= 2 , t=%pi/3;end
@@ -83,28 +89,22 @@ endfunction
 
 
 function []=wheeld(i)
-// Copyright ENPC
   xfpoly(xu(:,i),yu(:,i),1);
   xpoly(matrix(xr(:,i),2,4),matrix(yr(:,i),2,4),"lines");
 endfunction 
 
 
 function [xxu,yyu,zzu]=wheelgf(n,t,xu,yu,zu,xx)
-// Copyright ENPC
-//
   [xxu,yyu,zzu]=fort('wheelg',n,1,'i',t,2,'i',xu,3,'d',yu,4,'d',zu,5,'d',...
                     xx,6,'d','sort',3,4,5);
 endfunction 
 
 function [y]=test_wheel(n,t,x)
-// Copyright ENPC
-//
   y=x
   [y]=fort('wheel',n,1,'i',t,2,'d',x,3,'d',y,4,'d','sort',4);
 endfunction 
 
 function [xxu,yyu,zzu]=wheelgs(n,t,xu,yu,zu,xx)
-// Copyright ENPC
 // slower version without dynamic link 
   r=1.0
   [n,p]=size(xu);
@@ -125,7 +125,7 @@ endfunction
 function []=wheel_build_and_load() 
 // since this demo can be run by someone 
 // who has no write access in this directory 
-// we use TMPDIR 
+// we use TMPDIR
   if ~c_link('wheel') then
     cd = getcwd(); 
     chdir(TMPDIR); 
@@ -163,7 +163,3 @@ function get_wheel_rti(d_mode)
   end
   [wheel_rti]=resume(wheel_rti);
 endfunction 
-
-
-
-
index 4b7556b..4a023ce 100644 (file)
@@ -1,5 +1,11 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ENPC
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 mode(-1);
-// Copyright ENPC 
 path=get_absolute_file_path("wheel.dem");
 getf(path+'show.sci');
 
index d4b9eff..6a2daef 100644 (file)
@@ -1,3 +1,10 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) 1990 - INRIA - Carey BUNKS
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 function [pt,dx,dz,dt]=acoustic(vel,tf,fc,spos,dx,dz,dt)
 //[pt[,dx,dz,dt]]=acoustic(vel,tf,fc,spos[,dx,dz][,dt])
 //////////////////////////////////////////////////////
@@ -32,9 +39,6 @@ function [pt,dx,dz,dt]=acoustic(vel,tf,fc,spos,dx,dz,dt)
 //stability conditions and to impose an acceptable level
 //of numerical dispersion.
 //
-//!
-//author: C. Bunks     date: 29-Oct-90
-// Copyright INRIA
 
 [lhs,rhs]=argn(0);
    lines(0);
@@ -155,10 +159,6 @@ function [utp1]=integrate(t,ut,utm1,src,spos)
 // spos  :source position
 // utp1  :wavefield at time t+dt
 //
-//!
-//author: C. Bunks     date: 29-OCT-90
-// Copyright INRIA
-
    write(%io(2),'t='+string(t));
 
 //calculate laplacian in the interior of the medium
@@ -219,9 +219,6 @@ function [dg]=shot(t,fc)
 // fc :center frequency of the wavelet
 // dg :derivative of a gaussian at time t
 //
-//!
-//author: C. Bunks     date: 29-OCT-90
-// Copyright INRIA
 
    m=1/(2*fc);
    sig=m/4;
@@ -236,7 +233,6 @@ function [pt]=get_data(ntbl,entry)
 //       :data dimensions)
 // entry :integer giving the entry in the table-2
 // pt    :returned data file
-// Copyright INRIA
    ts=maxi(size(ntbl));
    nr=evstr(ntbl(1));
    nc=evstr(ntbl(2));
index 8e256e9..33a7b78 100644 (file)
@@ -1,3 +1,10 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) 1990 - INRIA - Carey BUNKS
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 function []=plotdb(f,gain,thetaphi,modxy)
 //plotdb(f), plotdb(f,gain), plotdb(f,modxy), plotdb(f,gain,tetaphi)
 //plotdb(f,gain,modxy), plotdb (f,gain,tetaphi,modxy)
@@ -26,9 +33,7 @@ function []=plotdb(f,gain,thetaphi,modxy)
 //            'y' : only vertical  lines are drawn
 //            'xy' : both h and v lines are drawn
 //!
-//author: C. Bunks  date: Jan 22, 1990
 //defaults for gain, theta, and phi
-// Copyright INRIA
 [lhs,rhs]=argn(0),
 select rhs
    case 1 then,
index 2b242b8..c096d83 100644 (file)
@@ -1,3 +1,10 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) 1990 - INRIA - Carey BUNKS
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 function [pk]=snapshot(pt,view,frames,pmode)
 //[pk]=snapshot(pt[,view][,frames][,pmode])
 //Plot sequence of matrices from a cube (representing snapshots) 
@@ -37,10 +44,7 @@ function [pk]=snapshot(pt,view,frames,pmode)
 //        :default is '3d'
 // pk     :last frame plotted by snapshot
 //
-//!
-//author: C. Bunks     date: 1-NOV-90
 
-// Copyright INRIA
 [pr,pc]=size(pt);
    kmax=pr/pc;
    if ent(kmax)<>kmax then,
index 8b8ff49..2fad1ff 100644 (file)
@@ -1,3 +1,10 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 
 function []=velpic_build_and_load() 
 // since this demo can be run by someone 
@@ -20,7 +27,6 @@ function []=velpic_build_and_load()
 endfunction 
 velpic_build_and_load() 
 
-// Copyright INRIA
 
 getf('SCI/modules/others/demos/velpic/velpic.sci')
 
index 6523109..a1cd6f5 100644 (file)
@@ -1,3 +1,10 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) 1990 - INRIA - Carey BUNKS
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 function [vel,regionlist,linelist,seedlist,velolist]=velpic(nz,nx,sext)
 //[vel,regionlist,linelist,seedlist]=velpic(nz,nx)
 //Macro which interactively defines regions of a matrix.
@@ -13,9 +20,6 @@ function [vel,regionlist,linelist,seedlist,velolist]=velpic(nz,nx,sext)
 // seedlist   :(2xK) vector containing positions of seeds
 // velolist   :(1xK) vector containing velocities associated to seeds
 //
-//!
-// author: C. Bunks     date: 12-NOV-90
-// Copyright INRIA
 [lhs,rhs]=argn(0)
 //turn off the scilab function 'more'
 
@@ -104,7 +108,6 @@ function []=helpme(msn)
 //
 //!
 // author: C. Bunks     date: 12-NOV-90
-// Copyright INRIA
 hm1=[' ';
 'Begin drawing a line by clicking the left';
 'mouse button across a previously drawn line';
@@ -197,7 +200,6 @@ function [seedlist]=sow(nz,nx,slide,bnames,buttons,regionlist,linelist);
 //
 //!
 // author: C. Bunks     date: 12-NOV-90
-// Copyright INRIA
    sl1=slide(1);sl2=slide(2);sl3=slide(3);
    sl4=slide(4);sl5=slide(5);sl6=slide(6);
    seedlist=[];
@@ -367,7 +369,6 @@ function [linelist]=makehorizons(nz,nx,bnames,buttons)
 //
 //!
 // author: C. Bunks     date: 12-NOV-90
-// Copyright INRIA
 
 //define outer perimeter as a line
 
@@ -411,7 +412,6 @@ function [buttons,slides]=makeframe(nz,nx,btextlist);
 //
 //!
 // author: C. Bunks     date: 12-NOV-90
-// Copyright INRIA
 
 //setup of frame
 
@@ -511,7 +511,6 @@ function []=makebutton(xbmin,xbmax,ybmin,ybmax,dx,dy,text)
 //
 //!
 // author: C. Bunks     date: 12-NOV-90
-// Copyright INRIA
 
 //make button box
    xstringb(xbmin,ybmin,text,xbmax-xbmin,ybmax-ybmin);
@@ -533,7 +532,6 @@ function []=makeslide(xbmin,xbmax,ybmin,ybmax,dx,dy,text,smin,smax)
 //
 //!
 // author: C. Bunks     date: 12-NOV-90
-// Copyright INRIA
 
 //NOTE: The constant wcf is a 'wierd correction factor necessary
 //for the correct positioning of the text in the button.  I don't
@@ -620,7 +618,6 @@ function [line,linelist,yec]=drawline(nz,nx,linelist,yec,bnames,buttons)
 //
 //!
 // author: C. Bunks     date: 12-NOV-90
-// Copyright INRIA
 
 //to begin new line the first two clicks of the mouse must
 //intersect an old line or the frame
@@ -941,7 +938,6 @@ function [flag,bav]=testpt(p1,p2,line)
 //
 //!
 // author: C. Bunks     date: 12-NOV-90
-// Copyright INRIA
 
 //set up arguments of fortran subprogram m45.f
 
@@ -976,7 +972,6 @@ function []=redraw(linelist,seedlist,velolist)
 //
 //!
 // author: C. Bunks     date: 12-NOV-90
-// Copyright INRIA
 
    [lhs,rhs]=argn(0);
 
@@ -1028,7 +1023,6 @@ function [ind,indexlist]=id_rgn(indexlist,linelist,seed);
 //
 //!
 // author: C. Bunks     date: 12-NOV-90
-// Copyright INRIA
 
    nlist=0*indexlist;
    ic=maxi(size(indexlist));
@@ -1075,7 +1069,6 @@ function []=makegrill(nx,nz,gopt)
 //
 //!
 // author: C. Bunks     date: 12-NOV-90
-// Copyright INRIA
 // Change JPC 2 mars 1992
 
    if gopt <>'on' then,xset("alufunction",6);end
@@ -1095,7 +1088,6 @@ function [vi]=velcalc(indexlist,seedlist,velolist)
 //
 //!
 // author: C. Bunks     date: 12-NOV-90
-// Copyright INRIA
 
    [vr,vc]=size(velolist);
    [ir,ic]=size(indexlist);
index 1461311..bf66999 100755 (executable)
@@ -1,4 +1,10 @@
-// Copyright INRIA
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 
 mode(-1)
 getf('SCI/modules/randlib/demos/random.sci');
index 54bd623..fbf71f6 100644 (file)
@@ -1,7 +1,13 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ENPC
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 function [y]=RndInt(m,n,imin,imax) 
        // discrete uniform random number 
        //-------------------------------
-       // Copyright ENPC 
        y=rand(m,n,'uniform')
        y=int(floor(y*(imax+1-imin)+ imin ));
 endfunction 
index 7d97be9..661b0b5 100644 (file)
@@ -1,3 +1,10 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 function [z]=RndIntT(n)
        //------------------------------- OK
        [lhs,rhs]=argn(0)
index a80c41a..a4bbeef 100644 (file)
@@ -1,5 +1,11 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 mode(-1)
-// Copyright INRIA
 getf('SCI/modules/scilab2fortran/demos/printspecs.sci','c')
 deff('[]=message(txt)','write(%io(2),txt,''(a)'')')
 path='SCI/modules/scilab2fortran/demos/'
index dcfecc3..2b025a0 100644 (file)
@@ -1,3 +1,10 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) - ENPC
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 mode(1)
 // An example of arma simulation and identification 
 // form ( K.J. Astrom)
@@ -10,9 +17,8 @@ mode(1)
 // We use the simulated trajectory zd
 // as an input to the armax identification macro 
 // The noise in the armax is coloured and armax 
-// will give a biaised estimator 
+// will give a biaised estimator
 
-// Copyright Enpc
 a=[1,-2.851,2.717,-0.865]
 b=[0,1,1,1]
 d=[1,0.7,0.2]
index 28f58b6..738f109 100644 (file)
@@ -1,7 +1,13 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ENPC
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 
 mode(1)
 // A bidimensional version of demo one.
-// Copyright Enpc
 a=[1,-2.851,2.717,-0.865].*.eye(2,2);
 b=[0,1,1,1].*.[1;1];
 d=[1,0.7,0.2].*.eye(2,2);
index 1e5a75a..4cb2da9 100644 (file)
@@ -1,7 +1,13 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ENPC
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 mode(1)
 // Spectral power estimation 
 // ( form Sawaragi et all) 
-// Copyright Enpc
 m=18
 a=[1,-1.3136,1.4401,-1.0919,+0.83527]
 b=[0.0,0.13137,0.023543,0.10775,0.03516]
index 896f9e6..f147416 100644 (file)
@@ -1,4 +1,10 @@
-// Copyright INRIA
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 
                   //////////////////
                   //BODE PLOTS//////
index 72d604c..fcec932 100644 (file)
@@ -1,3 +1,10 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 ystr=[ 'type (lp, hp, bp, sb) ';
     'order (integer)';
     'design (butt, cheb1, cheb2 , ellip)' ;
index 9a21222..032520f 100644 (file)
@@ -1,7 +1,13 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 ////////////////////////
 //DISCRETE IIR FILTERS//
 ////////////////////////
-// Copyright INRIA
  
 //Low pass filter (length 5, type cheb1, cut-off .2)
    hz=iir(5,'lp','cheb1',[.2 0],[.05 .05]);
index 3b83302..19090e2 100644 (file)
@@ -1,7 +1,13 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 ////////////////////////
 //MINIMAX FIR FILTERS///
 ////////////////////////
-// Copyright INRIA
 xbasc();xselect();
 mode(1)
 //Low pass filter (length 33, cut-off in [.23,.27], weight 1/.1)
index 16785bc..51783ae 100644 (file)
@@ -1,5 +1,11 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 mode(-1)
-// Copyright INRIA
 path=get_absolute_file_path('signal.dem');
 
 demolist=['Spectral Estimation',                'spect.dem'
index 449b3cd..601b7f0 100644 (file)
@@ -1,8 +1,14 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 ////////////////////////
 //SPECTRAL ESTIMATION///
 ////////////////////////
 mode(1)
-// Copyright INRIA
 xselect();xbasc(); 
  
 //generate white data
index ebdc2d5..258dc3e 100644 (file)
@@ -1,7 +1,13 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 ////////////////////////
 //WIENER FILTERING//////
 ////////////////////////
-// Copyright INRIA
 xbasc();xselect()
 mode(1)
 //define system macro which generates the next
index 01c2aba..4bad5af 100644 (file)
@@ -1,7 +1,13 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 ////////////////////////
 //WINDOWED FIR FILTERS//
 ////////////////////////
-// Copyright INRIA
  
 //Low pass filter (length 33, Kaiser window, cut-off .2)
    [wft,wfm,fr]=wfir('lp',33,[.2 0],'kr',[5.6 0]);
index 2d30827..b0e040a 100644 (file)
@@ -1,9 +1,14 @@
-// Allan CORNET
-// Copyright INRIA
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA - Allan CORNET <allan.cornet@inria.fr>
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 mode(1)
 //Decode ole file, extract and open Excel stream
 [fd,SST,Sheetnames,Sheetpos] = xls_open('SCI/modules/spreadsheet/demos/xls/Test1.xls')
 //Read first data sheet
 [Value,TextInd] = xls_read(fd,Sheetpos(1))
 //close the spreadsheet stream
-mclose(fd)
\ No newline at end of file
+mclose(fd)
index 60612c9..ce7391b 100644 (file)
@@ -1,3 +1,10 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 function demredraw(alpha)
 global alpha0
 if alpha0==[] then alpha0=30,end
index d0d53c7..3fbdf09 100644 (file)
@@ -1,3 +1,10 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 TCL_EvalFile(tkpath+'puzzle')
 while %t //wait for toplevel to disapear
   order=TCL_GetVar('order');
index 3c477d7..9ef222c 100644 (file)
@@ -1,3 +1,10 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 TCL_EvalFile(tkpath+'rolodex')
 while %t //wait for toplevel to disapear
   TCL_EvalStr('set h [winfo exists .top]');
index e7928dd..e0efa6c 100644 (file)
@@ -1,3 +1,10 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 getf(tkpath+'demredraw.sci')
 
 xbasc();set figure_style new;plot3d();done=%t
index 6286c60..495a1e5 100644 (file)
@@ -1,3 +1,10 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 TCL_EvalFile(tkpath+'cscroll')
 while %t //wait for toplevel to disapear
   TCL_EvalStr('set h [winfo exists .cscroll]');
index 9fbae3c..52fdfa0 100644 (file)
@@ -1,3 +1,10 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 RGB=[];
 RGB1=[0 0 0];
 TCL_SetVar('rgb',tkpath+'rgb.txt');
index 84aae83..9fba159 100644 (file)
@@ -1,3 +1,10 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 TCL_EvalFile(tkpath+'timer')
 while %t //wait for toplevel to disapear
   TCL_EvalStr('set h [winfo exists .vscale]');
index a0eaa56..b723730 100644 (file)
@@ -1,4 +1,10 @@
-// Copyright INRIA
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 mode(-1)
 if ~with_tk() then
   x_message('Sorry this version has not been built with tcl/tk interface')
index 65fc1a5..6e3ba5e 100644 (file)
@@ -1,3 +1,10 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 function add_list_item()
   if e1<>0&l1<>0 then
   new = get(e1,'String')
index ae6b3f2..1eece02 100644 (file)
@@ -1,2 +1,9 @@
+//
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+//
+// This file is distributed under the same license as the Scilab package.
+//
+
 exec(tkpath+'uicontrol.sci');
 myuidialog()