// s : 2014.08.25 function Objsymb(Symb,Thick,Face,Dir) for J=1:length(Symb) Objcurve(Symb(J),Thick,Face,Dir); end endfunction