anchor.diff:                Int64 = fun value optOrigin -> Bool ((value = 0L), optOrigin)
                 Single = fun value optOrigin -> Bool ((value = 0.0f), optOrigin)
                 Double = fun value optOrigin -> Bool ((value = 0.0), optOrigin)
  -              Vector2 = fun _ optOrigin -> Violation.make ("invalidArgumentType/unary/conversion/bool", "Cannot convert a vector to a bool.", optOrigin)
  +              Vector2 = fun _ optOrigin -> Violation (["invalidArgumentType"; "unary"; "conversion"; "bool"], "Cannot convert a vector to a bool.", optOrigin)
                 String = fun value optOrigin -> Bool (scvalue value, optOrigin)
  -              List = fun _ optOrigin -> Violation.make ("invalidArgumentType/unary/conversion/bool", "Cannot convert a list to a bool.", optOrigin) }
  +              List = fun _ optOrigin -> Violation (["invalidArgumentType"; "unary"; "conversion"; "bool"], "Cannot convert a list to a bool.", optOrigin) }
       
           let Int =
               { Bool = fun value optOrigin -> Int ((if value then 1 else 0), optOrigin)
  
positive.code: 
  [<RequireQualifiedAccess; CompilationRepresentation (CompilationRepresentationFlags.ModuleSuffix)>]
  module Scripting =
  
      [<RequireQualifiedAccess>]
      module Violation =
          
          let make (categoriesStr : string, msg, optOrigin) =
              let categories = categoriesStr.Split [|'/'|] |> List.ofArray
              Violation (categories, msg, optOrigin)
  
      [<RequireQualifiedAccess>]
      module Unary =
  
negative.code:               Double = fun left right optOrigin -> Bool ((left > right), optOrigin)
                Vector2 = fun left right optOrigin -> Bool ((left.LengthSquared > right.LengthSquared), optOrigin)
                String = fun left right optOrigin -> Bool ((left > right), optOrigin)
                List = fun _ _ optOrigin -> Violation (["invalidArgumentType"; "binary"; "comparison"; "gt"], "Cannot compare lists.", optOrigin) }
      
          let LtEq =
              { Bool = fun left right optOrigin -> Bool ((left <= right), optOrigin)
  