----simple resi----
simple_resi.
sepp(simple)=sepp_simple
sepp(simple)=sepp_simple_2 (after <$let>)
----old-style container----
    resi_start: sepp=sepp_resi (inside resi)     resi_end  : sepp=sepp_resi
----paired resi----
(start paired resi)
  sepp(paired)=sepp_paired 
  
    resi_start: sepp=sepp_resi
  sepp(paired)=sepp_global
    resi_end  : sepp=sepp_resi
  sepp(paired)=sepp_paired 
(end paired resi)--
----recursive resi----
  recursive_start: sepp=sepp_recursive
        recursive_start: sepp=sepp_recursive_x
        recursive_start: sepp=sepp_recursive_x_x
        recursive_start: sepp=sepp_recursive_x_x_x
      ABORT recursion.
    recursive_end  : sepp=sepp_recursive_x_x_x
    recursive_end  : sepp=sepp_recursive_x_x
    recursive_end  : sepp=sepp_recursive_x
    recursive_end  : sepp=sepp_recursive
sepp(global)=sepp_global
----nesting a container----
twice: (pag(lnk(hrf#hrf)lnk)pag)
once : (lnk(hrf*hrf)lnk)