anchor.diff:      let model =
           { MainModel.Default with 
               Sort = Some (originalPathSort.Sort, originalPathSort.Descending)
  -            Location = location
               History = historyWithPathSort location originalPathSort
  -        }
  +        }.WithLocation location
   
       // Act
       let resultModel = Nav.sortList PathSort.Default.Sort model
  
positive.code:     let model =
          { MainModel.Default with 
              Sort = Some (originalPathSort.Sort, originalPathSort.Descending)
              Location = location
              History = History.Default
          }
      let fs = createFs()
  
      // Act
  
negative.code:     let model =
          { MainModel.Default with 
              Sort = Some (originalPathSort.Sort, originalPathSort.Descending)
              History = historyWithPathSort pathSortLocation originalPathSort
          }.WithLocation modelLocation
  
      // Act
      let resultModel = Nav.sortList Name model
  