general {
    funcon-term: 
      initialise-giving
      give(
        1,
        no-given 
          else(
            print given,
            print"OK"))
        ;
}

tests {
    result-term: null-value;
    standard-out: ["OK"];
}