$use Table StdIO;
$table F;

Main = <Bind &F ('A') ('B')>
       <Bind &F ('as') ('ccc')>
       <Bind &F ('V') ('1')>
       <PrintLN <Domain &F>>
       <Unbind &F 'A'>
       <PrintLN <Domain &F>>;