anchor.diff:  open FParsec
   open Types
   open Context
  -open Runtime
  +open Naggum.Runtime
   
   let context = Context []
   
  
positive.code:     | List [] -> eval ctx if_false
      | _ -> eval ctx if_true
  
  //Evaluates list exp
  let eval_list (context:Context) eval list =
      match list with
  
negative.code:         Atom fname
      |List (Atom (Symbol "if") :: condition :: if_true :: if_false :: []) -> eval_if context eval condition if_true if_false
      |List (Atom (Symbol "if") :: condition :: if_true :: []) -> eval_if context eval condition if_true (List [])
      |List (Atom (Symbol "let") :: llist :: body) -> eval_let context eval llist body
      |List list -> apply context (List.head list) (List (List.map (eval context) (List.tail list)))
      | _ -> list
  
  