// $Id$

Put s.box expr = <Store s.box <Get s.box> expr>;