anchor.diff:  data.DownloadStringAsync(new Uri(\"" + (tryGetAttribute name "url") + "\"));"
               // разбор строки patients и выставление пациентов на карте
               | "showmap" ->
  -                if not (references.ContainsKey("mapsReferences")) then
  -                    append referencesBuilder <| "\n<Reference Include=\"Microsoft.Phone.Controls.Maps, Version=7.0.0.0, Culture=neutral, PublicKeyToken=24eec0d8c86cda1e, processorArchitecture=MSIL\" />
  -<Reference Include=\"System.Device\" />
  -<Reference Include=\"System.Servicemodel\" />"
  -                    references.Add("mapsReferences", referencesBuilder.ToString())
  -                if not (xmlns.ContainsKey("mapsXmlns")) then
  -                    append xmlnsBuilder <| "\nxmlns:maps=\"clr-namespace:Microsoft.Phone.Controls.Maps;assembly=Microsoft.Phone.Controls.Maps\""
  -                    xmlns.Add("mapsXmlns", xmlnsBuilder.ToString())
  -                if not (usings.ContainsKey("mapsUsings")) then
  -                    append usingsBuilder <| "\nusing Microsoft.Phone.Controls.Maps;
  -using System.Device.Location;"
  -                    usings.Add("mapsUsings", usingsBuilder.ToString())
                   builderAppend <| "\nint count = 0;
   int length = patients.Length;
   StringBuilder latitude = new StringBuilder();
  
positive.code:                 appendXaml <| "\n" + depthTab + "<phone:WebBrowser x:Name=\"" + name + "\" IsScriptEnabled=\"True\" Height=\"763\" Width=\"475\" />"
                  appendConstructor <| "\n" + name + ".Navigate(new Uri(\"" + (tryGetAttribute name "url") + "\", UriKind.RelativeOrAbsolute));"
              | "Map" ->
                  let name = tryGetAttribute name "id"
                  appendXaml <| "\n" + depthTab + "<maps:Map Name=\"" + name + "\" HorizontalAlignment=\"Stretch\" VerticalAlignment=\"Stretch\"
              ScaleVisibility=\"Visible\"
  
negative.code:     SupportedOrientations=\"Portrait\" Orientation=\"Portrait\"
      shell:SystemTray.IsVisible=\"True\">\n")
  
                      appendCs <| "\nnamespace " + projectName + "
  {
  public partial class " + fileName + ": PhoneApplicationPage
  {\n"
  