%u=file('open','SCI/macros/comm/lib','unknown','unformatted');
commlib=lib('SCI/macros/comm/');save(%u,commlib);file('close',%u);exit
