Mercurial > hg > ltpda

view m-toolbox/classes/@ao/nginit.m @ 49:0bcdf74587d1 database-connection-manager

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Cleanup
author Daniele Nicolodi <nicolodi@science.unitn.it>
date Wed, 07 Dec 2011 17:24:36 +0100
parents f0afece42f48
children
line wrap: on
line source

% NGINIT is called by the function fromPzmodel
% it takes the matrix Tinit (calculated by NGSETUP) as input
% and returns the initial state vector y
%
% A Monsky 24-07-07
%
% $Id: nginit.m,v 1.3 2008/10/20 08:38:29 anneke Exp $

function y = nginit(Tinit)

  n = length(Tinit);

  % writing the generator
  r = randn(n,1);
  y = Tinit * r;

end