Mercurial > hg > ltpda
diff m-toolbox/classes/@ao/findShortestVector.m @ 0:f0afece42f48
Import.
| author | Daniele Nicolodi <nicolodi@science.unitn.it> |
|---|---|
| date | Wed, 23 Nov 2011 19:22:13 +0100 |
| parents | |
| children |
line wrap: on
line diff
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/m-toolbox/classes/@ao/findShortestVector.m Wed Nov 23 19:22:13 2011 +0100 @@ -0,0 +1,25 @@ +% findShortestVector Returns the length of the shortest vector in samples +%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% +% +% DESCRIPTION: Returns the length of the shortest vector in samples +% +% CALL: lmin = findShortestVector(as) +% +% VERSION: $Id: findShortestVector.m,v 1.7 2009/12/22 22:32:12 mauro Exp $ +% +% HISTORY: 14-05-07 M Hewitson +% Creation +% +%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% +function lmin = findShortestVector(as) + + lmin = 1e20; + for jj=1:numel(as) + len_as = len(as(jj)); + if len_as < lmin + lmin = len_as; + end + end + +end +