function cost_init( vnum)
%
% initialize Viterbi cost function
%
% R. Perry, Oct. 2001

global TYPE;

if( TYPE == 30) % multi-user, Gauss-Markov

  % ...

elseif (TYPE==40)
   
   % ...
else
   

  error( 'cost_init: unknown TYPE');

end
