anchor.diff:              let args = List.map (fun (x) ->
                                       match x with
                                       |Atom (Number n) -> n
  +                                    |List ([Atom (Number n)]) -> n
                                       |any ->
                                           eprintfn "Expected: Number\nGot: %A" any
                                           raise (new ArgumentException()))
  
positive.code:             let args = List.map (fun (x) ->
                                      match x with
                                      |Atom (Number n) -> n
                                      |any ->
                                          eprintfn "Expected: Number\nGot: %A" any
                                          raise (new ArgumentException()))
  
negative.code:             let args = List.map (fun (x) ->
                                      match x with
                                      |Atom (Number n) -> n
                                      |List ([Atom (Number n)]) -> n
                                      |any ->
                                          eprintfn "Expected: Number\nGot: %A" any
                                          raise (new ArgumentException()))
  