% 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