function creamf

% vytvori soubor s prikladem

load prik ppr

n=length(ppr);
fidtmp=fopen('pprt.m','w');

for i=1:n
fprintf(fidtmp,'%s \n',char(ppr(i)));
end

fclose(fidtmp);
