% test using (-1,1) data values

if( K == 1)

  G = [];

  LOADED = 8;

  FIR = [1000 100 10 1]'; 	% impulse response coefficients of ISI channel

  Memory = size(FIR,1) - 1;	% channel memory size

  states = FSM( [-1 1], Memory);

  MM_max = size(states,2);      % number of symbol values

  M = MM_max;                   % number of states

  zstate = 1;			% ???

  N = 10;			% N data samples

  x = ones(1,N);		% data samples

  trans = FSM_trans( states, FIR);	% get state transition matrix
  
  y = FSM_out( x, FIR);			% get FSM output 
  
  noise = 0;		% "random" noise
  
  z = y + noise;	% signal plus noise

else	% K > 1

  error( 'sorry... isi stuff only works with K=1');

  if( LOADED ~= 8)
    error( 'initialize with K = 1 first');
  end

end
