Typo fixes 55/14555/1
Paul Bignier [Thu, 22 May 2014 08:49:18 +0000 (10:49 +0200)]
Change-Id: I443f62557b4fe95bb567789632f7ba8c904adaee

scilab/CHANGES_5.4.X
scilab/modules/core/macros/edit.sci
scilab/modules/core/src/fortran/typ2cod.f
scilab/modules/differential_equations/demos/flow/blackhole_interface.sci
scilab/modules/gui/help/en_US/layout/createConstraints.xml
scilab/modules/scicos/macros/scicos_auto/scicos_simulate.sci
scilab/modules/scicos/macros/scicos_scicos/do_delete1.sci

index 771232a..468665b 100644 (file)
@@ -64,7 +64,7 @@ Xcos
 * Two new fixed-size step ODE solvers added: Dormand-Prince 4(5) and Runge-Kutta 4(5).
   Added to the CVode package, they also benefit from the rootfinding feature.
 
-* Implicit fixed-size stop ODE solver added: Implicit Runge-Kutta 4(5).
+* Implicit fixed-size step ODE solver added: Implicit Runge-Kutta 4(5).
   Added to the CVode package, it also benefits from the CVode rootfinding feature.
 
 * Block parameter errors (types and sizes) reporting improved.
index 3f746cc..d3768ba 100644 (file)
@@ -38,7 +38,7 @@ function edit(macroname,linenumber)
         else
             tmpfile = tmpdir + macroname + ".sci";
             if funptr(macroname)<>0 then
-                error(msprintf(gettext("%s: %s is a uneditable hard coded function.\n"), "edit", macroname));
+                error(msprintf(gettext("%s: %s is an uneditable hard coded function.\n"), "edit", macroname));
             end
             libr = whereis(macroname);
             if libr <> [] then // macroname is the name of a defined function
index d7b00d5..415873f 100644 (file)
@@ -1,10 +1,10 @@
 c Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
 c Copyright (C) INRIA
-c 
+c
 c This file must be used under the terms of the CeCILL.
 c This source file is licensed as described in the file COPYING, which
 c you should have received as part of this distribution.  The terms
-c are also available at    
+c are also available at
 c http://www.cecill.info/licences/Licence_CeCILL_V2.1-en.txt
 
       subroutine typ2cod(il,name,n)
@@ -20,7 +20,7 @@ c     following common defines the initial database of type names
       integer tp(maxtyp),ptr(maxtyp),ln(maxtyp),namrec(nmmax),ptmax
 cDEC$ IF DEFINED (FORDLL)
 cDEC$ ATTRIBUTES DLLIMPORT:: /typnams/
-cDEC$ ENDIF      
+cDEC$ ENDIF
       common /typnams/ tp,ptr,ln,namrec,ptmax
       integer name(*)
       integer iadr,sadr
@@ -56,7 +56,7 @@ c     look for itype in dynamically added types
          n=ln(it)
          call icopy(n,namrec(ptr(it)),1,name,1)
       endif
-c      
+c
       return
  9000 continue
       n=0
@@ -74,12 +74,12 @@ c     following common defines the initial database of type names
       integer tp(maxtyp),ptr(maxtyp),ln(maxtyp),namrec(nmmax),ptmax
 cDEC$ IF DEFINED (FORDLL)
 cDEC$ ATTRIBUTES DLLIMPORT:: /typnams/
-cDEC$ ENDIF      
+cDEC$ ENDIF
       common /typnams/ tp,ptr,ln,namrec,ptmax
       character*15 nam1
 c
       ierr=0
-c     
+c
       n=len(nam)
       if(n.gt.0) then
 c     add a type
@@ -115,7 +115,7 @@ c     .     check if new type is the same as old type
          call cvstr(n,namrec(ptmax),nam,0)
          ptmax=ptmax+n
       else
-c     supress a type
+c     suppress a type
          if(typ.le.20) then
             pos=typ
             if(ln(pos).eq.0) return
index 351d829..9656600 100644 (file)
@@ -39,32 +39,32 @@ function exeblackhole()
 
     //Simulation parameters
     speed = tlist(["sim_param", "name", "unit", "range", "default", "tag"], ...
-        "speed", ...
-        "m/s", ...
-        [0 100], ...
-        1, ...
-        "speed");
+    "speed", ...
+    "m/s", ...
+    [0 100], ...
+    1, ...
+    "speed");
 
     direction = tlist(["sim_param", "name", "unit", "range", "default", "tag"], ...
-        "direction", ...
-        "deg", ...
-        [0 100], ...
-        50, ...
-        "dir");
+    "direction", ...
+    "deg", ...
+    [0 100], ...
+    50, ...
+    "dir");
 
     r = tlist(["sim_param", "name", "unit", "range", "default", "tag"], ...
-        "r", ...
-        "m", ...
-        [4 100], ...
-        1, ...
-        "r");
+    "r", ...
+    "m", ...
+    [4 100], ...
+    1, ...
+    "r");
 
     theta = tlist(["sim_param", "name", "unit", "range", "default", "tag"], ...
-        "theta", ...
-        "deg", ...
-        [0 100], ...
-        1, ...
-        "theta");
+    "theta", ...
+    "deg", ...
+    [0 100], ...
+    1, ...
+    "theta");
 
     //Create the controls in the window bottom
     param_list = list(r, theta, speed, direction);
@@ -192,24 +192,24 @@ function blackhole_create_gui()
     gen_c = createConstraints("border", "bottom", [600 200]);
 
     //Create the layout options for the frame containing position and speed frames
-    //1by2 grid with 20 pixel horizontal space for minimum paddding
+    //1by2 grid with 20 pixel horizontal space for minimum padding
     posspeed_lay_opt = createLayoutOptions("grid", [1 2], [20 0]);
 
 
     gui_frame = uicontrol(my_figure_handle, ...
-        "style", "frame", ...
-        "backgroundcolor", [1 1 1], ...
-        "layout", "border", ...
-        "constraint", gen_c);
+    "style", "frame", ...
+    "backgroundcolor", [1 1 1], ...
+    "layout", "border", ...
+    "constraint", gen_c);
 
     //Frame containing position and speed
     gen_c.position = "center";
     frame_posspeed = uicontrol(gui_frame, ...
-        "style", "frame", ...
-        "backgroundcolor", [1 1 1], ...
-        "layout", "grid", ...
-        "layout_options", posspeed_lay_opt, ...
-        "constraint", gen_c);
+    "style", "frame", ...
+    "backgroundcolor", [1 1 1], ...
+    "layout", "grid", ...
+    "layout_options", posspeed_lay_opt, ...
+    "constraint", gen_c);
 
     //Borders and title around position or speed
     b_f_posspeed = createBorderFont("", 16);
@@ -225,28 +225,28 @@ function blackhole_create_gui()
     //vertical grid: speed_frame | 10 | direction_frame
     b_posspeed.title = "initial speed";
     frame_initspeed = uicontrol(frame_posspeed, ...
-        "style", "frame", ...
-        "backgroundcolor", [1 1 1], ...
-        "layout", "gridbag", ...
-        "border", b_posspeed);
+    "style", "frame", ...
+    "backgroundcolor", [1 1 1], ...
+    "layout", "gridbag", ...
+    "border", b_posspeed);
 
     //speed and direction in initspeed
     c = createConstraints("gridbag", [1 1 1 1], [1 1], "horizontal", "center", [0 0], [0 20]);
 
     speed_frame = uicontrol(frame_initspeed, ...
-        "style", "frame", ...
-        "backgroundcolor", [1 1 1], ...
-        "layout", "gridbag", ...
-        "constraints", c);
+    "style", "frame", ...
+    "backgroundcolor", [1 1 1], ...
+    "layout", "gridbag", ...
+    "constraints", c);
 
     createSliderFrame(speed_frame, "speed", "speed", "(m/s)");
 
     c.grid =  [1 2 1 1]
     direction_frame = uicontrol(frame_initspeed, ...
-        "style", "frame", ...
-        "backgroundcolor", [1 1 1], ...
-        "layout", "gridbag", ...
-        "constraints", c);
+    "style", "frame", ...
+    "backgroundcolor", [1 1 1], ...
+    "layout", "gridbag", ...
+    "constraints", c);
 
     createSliderFrame(direction_frame, "dir", "dir", "(deg)");
     //Frame initpositiono
@@ -254,38 +254,38 @@ function blackhole_create_gui()
     //vertical grid: r_frame | 10 | theta_frame
     b_posspeed.title = "initial position";
     frame_initposition = uicontrol(frame_posspeed, ...
-        "style", "frame", ...
-        "backgroundcolor", [1 1 1], ...
-        "layout", "gridbag", ...
-        "border", b_posspeed);
+    "style", "frame", ...
+    "backgroundcolor", [1 1 1], ...
+    "layout", "gridbag", ...
+    "border", b_posspeed);
 
     c.grid = [1 1 1 1]
     r_frame = uicontrol(frame_initposition, ...
-        "style", "frame", ...
-        "backgroundcolor", [1 1 1], ...
-        "layout", "gridbag", ...
-        "constraints", c);
+    "style", "frame", ...
+    "backgroundcolor", [1 1 1], ...
+    "layout", "gridbag", ...
+    "constraints", c);
 
     createSliderFrame(r_frame, "r", "r", "(m)");
 
     c.grid = [1 2 1 1]
     theta_frame = uicontrol(frame_initposition, ...
-        "style", "frame", ...
-        "backgroundcolor", [1 1 1], ...
-        "layout", "gridbag", ...
-        "constraints", c);
+    "style", "frame", ...
+    "backgroundcolor", [1 1 1], ...
+    "layout", "gridbag", ...
+    "constraints", c);
 
     createSliderFrame(theta_frame, "theta", "theta", "(deg)");
 
-    //Button frame 
+    //Button frame
     //esthetic | button 1 | est | button2 | est | button 3 | est
     gen_c.position = "bottom"
     gen_c.preferredsize = [0 30];
     button_frame = uicontrol(gui_frame, ...
-        "style", "frame", ...
-        "backgroundcolor", [1 1 1], ...
-        "layout", "gridbag", ...
-        "constraints", gen_c);
+    "style", "frame", ...
+    "backgroundcolor", [1 1 1], ...
+    "layout", "gridbag", ...
+    "constraints", gen_c);
 
     // Buttons
     // est | buttons | est
@@ -299,69 +299,69 @@ function blackhole_create_gui()
 
     //Esthetic Empty panel
     est_panel = uicontrol(button_frame, ...
-        "style", "frame", ...
-        "backgroundcolor", [1 1 1], ...
-        "constraints", c_button);
+    "style", "frame", ...
+    "backgroundcolor", [1 1 1], ...
+    "constraints", c_button);
 
-    //Buttons 
+    //Buttons
     buttonBorder = createBorder("line", "darkgrey", 3);
     c_button = createConstraints("gridbag", [2 1 1 1], [0 0], "both", "left", [0 0])
     //Button Start
     c_button.anchor = "left"
     start_button = uicontrol(button_frame, ...
-        "Style", "pushbutton", ...
-        "String", "Start", ...
-        "Fontsize", 14, ...
-        "BackgroundColor", [0.9 0.9 0.9], ...
-        "callback", "start_simu()", ...
-        "border", buttonBorder, ...
-        "tag", "start_button", ...
-        "constraints", c_button);
+    "Style", "pushbutton", ...
+    "String", "Start", ...
+    "Fontsize", 14, ...
+    "BackgroundColor", [0.9 0.9 0.9], ...
+    "callback", "start_simu()", ...
+    "border", buttonBorder, ...
+    "tag", "start_button", ...
+    "constraints", c_button);
 
     //Empty panel
     c_button = createConstraints("gridbag", [3 1 1 1], [0 0], "none", "center", [0 0], [20 0])
     est_panel = uicontrol(button_frame, ...
-        "style", "frame", ...
-        "backgroundcolor", [1 1 1], ...
-        "constraints", c_button);
+    "style", "frame", ...
+    "backgroundcolor", [1 1 1], ...
+    "constraints", c_button);
 
     //Button Stop
     c_button = createConstraints("gridbag", [4 1 1 1], [0 0], "both", "center", [0 0])
     stop_button = uicontrol(button_frame, ...
-        "Style", "pushbutton", ...
-        "String", "Stop", ...
-        "Fontsize", 14, ...
-        "BackgroundColor", [0.9 0.9 0.9], ...
-        "border", buttonBorder, ...
-        "callback", "stop_simu", ...
-        "tag", "stop_button", ...
-        "constraints", c_button);
-
-    //Empty panel    
+    "Style", "pushbutton", ...
+    "String", "Stop", ...
+    "Fontsize", 14, ...
+    "BackgroundColor", [0.9 0.9 0.9], ...
+    "border", buttonBorder, ...
+    "callback", "stop_simu", ...
+    "tag", "stop_button", ...
+    "constraints", c_button);
+
+    //Empty panel
     c_button = createConstraints("gridbag", [5 1 1 1], [0 0], "none", "center", [0 0], [20 0])
     est_panel = uicontrol(button_frame, ...
-        "style", "frame", ...
-        "backgroundcolor", [1 1 1], ...
-        "constraints", c_button);
+    "style", "frame", ...
+    "backgroundcolor", [1 1 1], ...
+    "constraints", c_button);
 
     //Button Clear
     c_button = createConstraints("gridbag", [6 1 1 1], [0 0], "both", "center", [0 0])
     clear_button = uicontrol(button_frame, ...
-        "Style", "pushbutton", ...
-        "String", "Clear", ...
-        "Fontsize", 14, ...
-        "BackgroundColor", [0.9 0.9 0.9], ...
-        "callback", "clear_simu", ...
-        "border", buttonBorder, ...
-        "tag", "clear_button", ...
-        "constraints", c_button);
+    "Style", "pushbutton", ...
+    "String", "Clear", ...
+    "Fontsize", 14, ...
+    "BackgroundColor", [0.9 0.9 0.9], ...
+    "callback", "clear_simu", ...
+    "border", buttonBorder, ...
+    "tag", "clear_button", ...
+    "constraints", c_button);
 
     //Empty panel
     c_button = createConstraints("gridbag", [7 1 1 1], [0 0], "none", "right", [100 0]);
     est_panel = uicontrol(button_frame, ...
-        "style", "frame", ...
-        "backgroundcolor", [1 1 1], ...
-        "constraints", c_button);
+    "style", "frame", ...
+    "backgroundcolor", [1 1 1], ...
+    "constraints", c_button);
 
     return
 endfunction
@@ -385,9 +385,9 @@ function change_r(r)
         r=slider_r.Value
         r=0.007+r*(2-0.08)/100
     end
-        value_r.String=msprintf("%.3f", r)
-        draw_initial_point(0.007+slider_r.Value*(2-0.08)/100, slider_theta.value*360/100, ...
-            slider_speed.Value*3/100, slider_dir.value*360/100, %F);
+    value_r.String=msprintf("%.3f", r)
+    draw_initial_point(0.007+slider_r.Value*(2-0.08)/100, slider_theta.value*360/100, ...
+    slider_speed.Value*3/100, slider_dir.value*360/100, %F);
 endfunction
 
 
@@ -407,9 +407,9 @@ function change_theta(theta)
         theta=slider_theta.Value
         theta=theta*360/100
     end
-        value_theta.String=msprintf("%.0f", theta)
-        draw_initial_point(0.007+slider_r.Value*(2-0.08)/100, slider_theta.value*360/100, ..
-        slider_speed.Value*3/100, slider_dir.value*360/100, %F);
+    value_theta.String=msprintf("%.0f", theta)
+    draw_initial_point(0.007+slider_r.Value*(2-0.08)/100, slider_theta.value*360/100, ..
+    slider_speed.Value*3/100, slider_dir.value*360/100, %F);
 endfunction
 
 function change_speed(speed)
@@ -450,7 +450,7 @@ function change_dir(dir)
 
     value_dir.String = msprintf("%.0f", dir)
     draw_initial_point(0.007 + slider_r.Value * (2 - 0.08) / 100, slider_theta.value * 360 / 100, ...
-        slider_speed.Value * 3 / 100, slider_dir.value * 360 / 100, %F);
+    slider_speed.Value * 3 / 100, slider_dir.value * 360 / 100, %F);
 endfunction
 
 function start_simu()
@@ -464,7 +464,7 @@ function start_simu()
     slider_dir   = get("slider_dir");
     t     = 0:0.02:15;
     Y = calculate_traj(0.007 + slider_r.Value * (2 - 0.08) / 100, slider_theta.value * 360 / 100, ...
-        slider_speed.Value * 3 / 100, slider_dir.value * 360 / 100, t)
+    slider_speed.Value * 3 / 100, slider_dir.value * 360 / 100, t)
     x = Y(1, :)
     y = Y(3, :)
     r = 0.1; //bias to have the curve above the surface
index e315d65..217ff18 100644 (file)
@@ -31,7 +31,7 @@
                         </listitem>
                         <listitem>
                             <para>
-                                "border": A <link linkend="border_constraints_properties">border layout constraint</link>. 
+                                "border": A <link linkend="border_constraints_properties">border layout constraint</link>.
                             </para>
                         </listitem>
                         <listitem>
@@ -61,7 +61,7 @@
     <refsection>
         <title>Description</title>
         <para>
-            This function creates the constraints structure for uicontrols <literal>constraints</literal> attribute. See <link linkend="uicontrol_properties">uicontrol properties.</link> for more details.
+            This function creates the constraints structure for uicontrols <literal>constraints</literal> attribute. See <link linkend="uicontrol_properties">uicontrol properties</link> for more details.
         </para>
     </refsection>
     <refsection role="see also">
index c86d8d7..2235c86 100644 (file)
@@ -250,7 +250,7 @@ function Info = scicos_simulate(scs_m, Info, updated_vars, flag, Ignb)
         error(["Incorrect context definition, " + lasterror()])
     end
 
-    // perform block supression only on partial compilation and full compilation
+    // perform block suppression only on partial compilation and full compilation
     if needcompile > 1 then
         need_suppress  =%t
     else
index 45da709..c678ae6 100644 (file)
@@ -155,7 +155,7 @@ function [scs_m,DEL,DELL]=do_delete1(scs_m,K,gr)
                         end
                         o1.to=o2.to;
 
-                        DEL = [DEL connected(1)] // supress one link
+                        DEL = [DEL connected(1)] // suppress one link
                         DELL=[DELL  connected(1)]
                         scs_m.objs(connected(2))=o1 //change link
 
@@ -203,7 +203,7 @@ function [scs_m,DEL,DELL]=do_delete1(scs_m,K,gr)
                         o1.to=o2.to;
 
 
-                        DEL=[DEL connected(1)] // supress one link
+                        DEL=[DEL connected(1)] // suppress one link
                         DELL=[DELL  connected(1)]
                         scs_m.objs(connected(2))=o1 //change link
 
@@ -251,5 +251,3 @@ function [scs_m,DEL,DELL]=do_delete1(scs_m,K,gr)
         scs_m.objs(k) = mlist("Deleted"); //** mark the object as "Deleted"
     end
 endfunction
-
-