Add examples (all differential equations help pages have now examples) 48/9648/2
Sylvestre Ledru [Sat, 10 Nov 2012 14:23:50 +0000 (15:23 +0100)]
Change-Id: I0c2e879e4ad7e56b0d9813df4971cac7d025d5d2

scilab/modules/differential_equations/help/en_US/intc.xml
scilab/modules/differential_equations/help/en_US/intl.xml
scilab/modules/differential_equations/help/en_US/ode_optional_output.xml
scilab/modules/differential_equations/macros/intc.sci
scilab/modules/differential_equations/macros/intl.sci

index 54afcc8..b06a509 100644 (file)
             straight line <literal>a b</literal> of the complex plane.
         </para>
     </refsection>
+    <refsection>
+        <title>Examples</title>
+        <programlisting role="example"><![CDATA[ 
+function y=f(z)
+  y = z^(3 + %pi * %i)
+endfunction
+
+intc(1+%i, 4-%i, f)
+ ]]></programlisting>
+    </refsection>
+    
     <refsection role="see also">
         <title>See Also</title>
         <simplelist type="inline">
index fcf1a25..a84b92a 100644 (file)
             <literal>b</literal>).
         </para>
     </refsection>
+    <refsection>
+        <title>Examples</title>
+        <programlisting role="example"><![CDATA[ 
+function y=f(z)
+  y = z^(3 + %pi * %i)
+endfunction
+
+intl(1,2,1+%i, 3, f)
+ ]]></programlisting>
+    </refsection>
+    
     <refsection role="see also">
         <title>See Also</title>
         <simplelist type="inline">
index 2d6f110..5a95634 100644 (file)
@@ -11,7 +11,7 @@
  * http://www.cecill.info/licences/Licence_CeCILL_V2-en.txt
  *
  -->
-<refentry xmlns="http://docbook.org/ns/docbook" xmlns:xlink="http://www.w3.org/1999/xlink" xmlns:svg="http://www.w3.org/2000/svg" xmlns:mml="http://www.w3.org/1998/Math/MathML" xmlns:db="http://docbook.org/ns/docbook" xmlns:scilab="http://www.scilab.org" xml:lang="en" xml:id="ode_optional_output">
+<refentry xmlns="http://docbook.org/ns/docbook" xmlns:xlink="http://www.w3.org/1999/xlink" xmlns:svg="http://www.w3.org/2000/svg" xmlns:mml="http://www.w3.org/1998/Math/MathML" xmlns:db="http://docbook.org/ns/docbook" xmlns:scilab="http://www.scilab.org" xml:lang="en" scilab:needs-examples="no" xml:id="ode_optional_output">
     <refnamediv>
         <refname>ode_optional_output</refname>
         <refpurpose>ode solvers optional outputs description</refpurpose>
index 53875ac..2efb2b2 100644 (file)
@@ -13,8 +13,9 @@ function r=intc(a,b,f)
 //line a-b of the complex plane.
 
 //First compile f if necessary:
-// Copyright INRIA
-if type(f)==11 then comp(f),end;
+if type(f)==11 then
+       comp(f);
+end
 //Define two functions which define the real part and
 //imaginary part of f(g(t))*g'(t) where g(t) is a 
 //parametrization of the line a-b.
index cd2c866..f53491c 100644 (file)
@@ -14,15 +14,20 @@ function r=intl(a,b,z0,r,f,ea,er)
 //for a<=t<=b .
 //(part of the circle with center z0 and radius r with phase between a and b)
 //!
-//Author F.D. (and H.H.R.)
 
 //First compile f if necessary:
 
 rhs=argn(2)
-if rhs<7 then er=%eps;end
-if rhs<6 then ea=1.d-12;end
+if rhs<7 then
+       er=%eps;
+end
+if rhs<6 then
+       ea=1.d-12;
+end
 
-if type(f)==11 then comp(f),end;
+if type(f)==11 then
+       comp(f)
+end;
 //Define two functions for the real part and
 //imaginary part of f(g(t))*g'(t) where g(t) is a
 //parametrization of the circle.