general {
    funcon-term: 
      initialise-giving finalise-failing 
      sequential (
      print map-domain map(),
      print map-domain{1|->2},
      print map-domain{1|->2,3|->4},
      print map-domain{1|->2,3|->( )}
      )
        ;
}

tests {
    result-term: null;
    standard-out: [{}, {1}, {1,3}, {1,3}];
}