anchor.diff:  open System.Diagnostics
   open System.Threading
   open System.Runtime.InteropServices
  -
   
   module InteropNative = 
       [<DllImport("user32.dll", EntryPoint = "SetWindowPos")>]
  
positive.code:         let HWND_NOTOPMOST = new IntPtr -2;
          let SWP_SHOWWINDOW = 0x0040u
          
          let topWindow = InteropNative.SetWindowPos (openingProcess.MainWindowHandle, HWND_TOPMOST, 0, 0, 800, 600, SWP_SHOWWINDOW)
          let noTopWIndow = InteropNative.SetWindowPos (openingProcess.MainWindowHandle, HWND_NOTOPMOST, 0, 0, 800, 600, SWP_SHOWWINDOW)
  
          openingProcess.Id
          // printfn "process: %d" openingProcess.Id
              
              
  
  
negative.code:             int cx,                     // width
              int cy,                     // height
              uint32 uFlags);             // window positioning flags
  
      [<Struct>]
      type RECT =
          val Left: int
          val Top: int
          val Right: int
          val Bottom: int
  
      [<DllImport("user32.dll")>]
      extern bool GetWindowRect(IntPtr hWnd, RECT& lpRect)
  
  module PopOpen =
      let Open (filePath: string) = 
  