a=[0;0];h=[0;1];pd=@(c)find(c==[‘F’,’+’,’-‘]);e=@(s)evalin(‘base’,s);t=1/sqrt(2);rp=[t -t;t t];rm=rp’; #MATLAB #lsystem part 1/4