Mercurial > hg > ishara

diff general/numerical/scalar/quadf.m @ 16:db7f4afd27c5

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Rearranging numerical toolbox.
author samer
date Thu, 17 Jan 2013 13:20:44 +0000
parents general/numerical/quadf.m@e44f49929e56
children
line wrap: on
line diff
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/general/numerical/scalar/quadf.m	Thu Jan 17 13:20:44 2013 +0000
@@ -0,0 +1,7 @@
+% quadf - scalar quadratic form
+%
+% quadf :: [Size], real -> [Size].
+% quadf :: [Size] -> [Size].
+%
+% Scalar function: quadf(x,s) = -x^2/(2*s), s defaults to 1.
+function y=quadf(x,s), if nargin<2, y=-(x.^2)/2; else y= -(x.^2)/(2*s); end