add : Int ; add = 4; main : Int ; main = case add of { 5 => 0; _ => 1; };