From: <tr...@us...> - 2008-03-11 16:47:35
|
Revision: 4714 http://octave.svn.sourceforge.net/octave/?rev=4714&view=rev Author: treichl Date: 2008-03-11 09:47:41 -0700 (Tue, 11 Mar 2008) Log Message: ----------- Minor updates in demo section. Modified Paths: -------------- trunk/octave-forge/main/odepkg/inst/odepkg_testsuite_calcmescd.m trunk/octave-forge/main/odepkg/inst/odepkg_testsuite_calcscd.m Modified: trunk/octave-forge/main/odepkg/inst/odepkg_testsuite_calcmescd.m =================================================================== --- trunk/octave-forge/main/odepkg/inst/odepkg_testsuite_calcmescd.m 2008-03-11 16:46:46 UTC (rev 4713) +++ trunk/octave-forge/main/odepkg/inst/odepkg_testsuite_calcmescd.m 2008-03-11 16:47:41 UTC (rev 4714) @@ -34,21 +34,18 @@ vmescd = -log10 (norm (vtmp, inf)); %!demo +%! # Display the value for the mimum number of correct digits in the vector +%! # sol = [1, 2, 2.9] compared to the reference vector ref = [1, 2, 3]. %! %! odepkg_testsuite_calcmescd ([1, 2, 2.9], [1, 2, 3], 1e-3, 1e-6) -%! -%! % --------------------------------------------------------------------------- -%! % Displays the value for the mimum number of correct digits in the vector -%! % sol = [1, 2, 2.9] compared to the reference vector ref = [1, 2, 3]. +%! %!demo +%! # Display the value for the mimum number of correct digits in the vector +%! # sol = [1 + 1e10, 2 + 1e10, 3 + 1e10] compared to the reference vector +%! # ref = [1, 2, 3]. %! %! odepkg_testsuite_calcmescd ([1 + 1e10, 2 + 1e10, 3 + 1e10], [1, 2, 3], ... %! [1e-3, 1e-4, 1e-5], [1e-6, 1e-6, 1e-6]) -%! -%! % --------------------------------------------------------------------------- -%! % Displays the value for the mimum number of correct digits in the vector -%! % sol = [1 + 1e10, 2 + 1e10, 3 + 1e10] compared to the reference vector -%! % ref = [1, 2, 3]. %!assert (odepkg_testsuite_calcmescd ([1, 2, 3], [1, 2, 3], NaN, NaN), NaN); %!assert (odepkg_testsuite_calcmescd ([1, 2, 3], [1, 2, 3], 1, 1), Inf); Modified: trunk/octave-forge/main/odepkg/inst/odepkg_testsuite_calcscd.m =================================================================== --- trunk/octave-forge/main/odepkg/inst/odepkg_testsuite_calcscd.m 2008-03-11 16:46:46 UTC (rev 4713) +++ trunk/octave-forge/main/odepkg/inst/odepkg_testsuite_calcscd.m 2008-03-11 16:47:41 UTC (rev 4714) @@ -33,19 +33,19 @@ vscd = -log10 (norm (vrel, inf)); %!demo +%! # Displays the value for the mimum number of correct digits in +%! # the vector sol = [1, 2, 2.9] compared to the reference vector +%! # ref = [1, 2, 3]. %! %! odepkg_testsuite_calcscd ([1, 2, 2.9], [1, 2, 3], NaN, NaN) %! -%! % --------------------------------------------------------------------------- -%! % Displays the value for the mimum number of correct digits in the -%! % vector sol = [1, 2, 2.9] compared to the reference vector ref = [1, 2, 3]. %!demo +%! # Displays the value for the mimum number of correct digits in +%! # the vector sol = [1, 2, 2.9] compared to the reference vector +%! # ref = [1, 2, 3]. %! -%! odepkg_testsuite_calcscd ([1 + 1e10, 2 + 1e10, 3 + 1e10], [1, 2, 3], NaN, NaN) -%! -%! % --------------------------------------------------------------------------- -%! % Displays the value for the mimum number of correct digits in the -%! % vector sol = [1, 2, 2.9] compared to the reference vector ref = [1, 2, 3]. +%! odepkg_testsuite_calcscd ([1 + 1e10, 2 + 1e10, 3 + 1e10], ... +%! [1, 2, 3], NaN, NaN) %!assert (odepkg_testsuite_calcscd ([1, 2, 3], [1, 2, 3], NaN, NaN), Inf); %!assert (odepkg_testsuite_calcscd ([1, 2, 3], [1, 2.1, 3], 1, 1), 1.5, 0.2); This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site. |