anchor.diff:      let ofList (list : 'T list) : vector<'T> =
           // Preconditions
           checkNonNull "list" list
  -        
  -        notImpl "Vector.ofList"
  +
  +        match list with
  +        | [] -> empty
  +        | _ ->
  +            Array.ofList list
  +            |> vector.UnsafeCreate
   
       //
       [<CompiledName("OfSeq")>]
  
positive.code:         // Preconditions
          checkInitialized "vector1" vector1
          checkInitialized "vector2" vector2
          
          notImpl "Vector.append"
  
      /// Returns the average of the elements in a vector.
      [<CompiledName("Average")>]
      let inline average (vector : vector<'T>) : ^T =
          // Preconditions
          checkInitialized "vector" vector
          
          notImpl "Vector.average"
  
      //
      [<CompiledName("AverageBy")>]
      let inline averageBy (projection : 'T -> ^U) (vector : vector<'T>) : ^U =
          // Preconditions
          checkInitialized "vector" vector
          
          notImpl "Vector.averageBy"
  
  
negative.code: 
      //
      [<CompiledName("MapIndexed")>]
      let mapi (mapping : int -> 'T -> 'U) (vec : vector<'T>) : vector<'U> =
          // Preconditions
          checkInitialized "vec" vec
          
          // If the vector is empty, return immediately.
          if isEmpty vec then empty
          else
              Array.mapi mapping vec.Elements
              |> vector.UnsafeCreate
  
      //
      [<CompiledName("MapIndexed2")>]
  