Mercurial > hg > ishara

annotate general/numerical/pnormalise.m @ 19:1eb0ea29ec40

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Doesn't belong here.
author samer
date Thu, 17 Jan 2013 13:32:19 +0000
parents e44f49929e56
children
rev   line source
samer@4 1 function A=pnormalise(p,A,i)
samer@4 2 % pnormalise - normalise A relative to p-norm in given array dimension
samer@4 3 %
samer@4 4 % pnormalise :: nonneg, [D:[[1 E]]], [E] -> [D].
samer@4 5 if nargin<3, i=1; end
samer@4 6 A=divnorm(@(x)pnorm(p,x,i),A);
samer@4 7
samer@4 8