f = fopen('./foo.m','wt');
fdisp (f,'function foo');
fdisp (f,'  baz;');
fdisp (f,'endfunction');
fclose(f);
mkdir private;
f = fopen('./private/baz.m','wt');
fdisp (f,'function baz');
fdisp (f,'  disp(''Hello from private baz'');');
fdisp (f,'endfunction');
fclose(f);
foo
