anchor.diff:                  let elementMold = typeToMold3 None elementType molder
                   moldRef := List (pathOpt, elementMold)
               else
  -                if molder.ForceIdentification
  +                if molder.RequireIdentification
                   then failwith "Could not identity a type for molding."
                   else moldRef := Unidentified pathOpt
               moldRef.Value
           | (true, moldRef) -> moldRef.Value
   
  -    let typeToMold ty molder =
  -        typeToMold3 None ty molder
  -
  -    let moldToPrimitive primitive (_ : Molder) =
  +    let private moldToPrimitive primitive (_ : Molder) =
           match primitive with
           | Unit -> typeof<FSharp.Core.Unit>
           | Boolean -> typeof<System.Boolean>
  
positive.code:         | Unidentified _ -> typeof<obj>
  
      let rec moldToInstance mold molder =
          let pathOpt = getPathOpt mold molder
          match Map.tryFind pathOpt molder.Rules with
          | Some rule ->
              match rule with
              | Constant value -> value
  
negative.code:         let ty = moldToType mold molder
          ty
  
      let make randomizing requireIdentification randomizingSeed instantiationRules =
          { Randomizing = randomizing
            RequireIdentification = requireIdentification
            Random = Random randomizingSeed 
            InstantiationRules = instantiationRules
            Cache = Dictionary<Path option * Type, Mold ref> () }
  
      let makeEmpty () =
  