&mystart($LumberFile,LF);
&buildlumber(\%Fs,LF,$Ppi);