anchor.diff:          while reader.Read() do 
               match reader.Name with
               | "Button" ->
  -                let onClickName = reader.GetAttribute "android:onClick"
                   let id = reader.GetAttribute "android:id"
  -                appendAct <| "\n\n    public void " + onClickName + "(View v) {"
  -
                   if transitions.ContainsKey id then
  +                    let onClickName = reader.GetAttribute "android:onClick"
  +                    appendAct <| "\n\n    public void " + onClickName + "(View v) {"
  +
                       if not <| imports.ContainsKey "android.content.Intent" then
                           insertAct "\nimport android.content.Intent;"
                           imports.Add ("android.content.Intent", "android.content.Intent")
  
positive.code: open System.Collections.Generic
  open System.Collections
  open System.Net
  
  let path, package =
      let args = System.Environment.GetCommandLineArgs()
  
negative.code: let transformXml = 
      System.IO.Directory.CreateDirectory(path + @"\res\layout") |> ignore
      System.IO.Directory.CreateDirectory(path + @"\res\drawable") |> ignore
      let newXml = new StringBuilder()
      let reader = XmlReader.Create(path + @"\forms.xml")
      let appendXml = append newXml
      let mutable currentDepth = 0
  