function list = genFwdStruct(N)
% genFwdStruct Generate structure describing forward-chain only.
%   Use for non-optimized case.
%
% See also genStructs.

% Author: D. Orofino
% Copyright 1984-2000 The MathWorks, Inc. 
% $Revision: 1.3 $ $Date: 2000/06/01 03:16:19 $

if N==0,
    list={};
    
elseif N==1,
    list = {'A'};
    
else
    c = char('A'+(0:N-1));
    list.Lvar = c(1);
    list.Rvar = c(2);
    for i=3:N,
        y.Lvar = list;
        y.Rvar = c(i);
        list=y;
    end	
end

list={list};

% [EOF] genFwdStruct.m
