program save_natorb
  call save_natural_mos
end