$use Box StdIO;

$use "box2";

Main =
  <Store &B <Box 57>>,
//  <PrintLN &B>,
  <? &B> : s.box,
//  <PrintLN s.box>,
  <PrintLN <? s.box>>;