sub mkcref (@) {
   my @closed = @_;
   return sub { @closed};
}

sub mkaref (@) {
   return [@_];
}