; Tue Sep 23 00:45:28 EDT 2003
;
;+ (version "1.8")
;+ (build "Build 1074")
(defclass %3ACLIPS_TOP_LEVEL_SLOT_CLASS
(is-a USER)
(role concrete)
(single-slot ContactLanguageDest
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000207):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot UndgCode
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000257):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot categoryTotal
(type INSTANCE)
;+ (allowed-classes CategoryTotal)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot TechnicalName
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000264):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot refers
;+ (comment "(&%refers ?OBJ1 ?OBJ2) means that ?OBJ1 mentions or includes a reference to ?OBJ2. Note that &%refers is more general in meaning than &%represents, because presumably something can represent something else only if it refers to this other thing. For example, an article whose topic is a recent change in the price of oil may refer to many other things, e.g. the general state of the economy, the weather in California, the prospect of global warming, the options for alternative energy sources, the stock prices of various oil companies, etc.")
(type INSTANCE)
;+ (allowed-classes Entity)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot MereologicalProductFn
;+ (comment "(&%MereologicalProductFn ?OBJ1 ?OBJ2) denotes the &%Object consisting of the parts which belong to both ?OBJ1 and ?OBJ2.")
(type INSTANCE)
;+ (allowed-classes Object)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot DescriptionID
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000450):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot ListFn
;+ (comment " A &%Function that takes any number of arguments and returns the &%List containing those arguments in exactly the same order.")
(type INSTANCE)
;+ (allowed-classes List)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot StartDateTime
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000443):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot PastFn
;+ (comment "A &%UnaryFunction that maps a &%TimePosition to the &%TimeInterval that meets it and that begins at &%NegativeInfinity.")
(type INSTANCE)
;+ (allowed-classes TimeInterval)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot %3AAXIOMS
;+ (comment "Axioms from SUMO or other sources, constraining the meaning of the slot.")
(type STRING)
;+ (cardinality 0 1)
;+ (associated-facet UBLinv014_00277)
(create-accessor read-write))
(single-slot hasCodeListName
;+ (comment "The name of the list of codes of which this code is one element.")
(type STRING)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot PricingCurrencyCode
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL700008):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot ListConcatenateFn
;+ (comment "A &%Function that returns the concatenation of the two &%Lists that are given as arguments. For example, the value of (&%ListConcatenateFn (&%ListFn &%Monday &%Tuesday) (&%ListFn &%Wednesday &%Thursday)) would be (&%ListFn &%Monday &%Tuesday &%Wednesday &%Thursday).")
(type INSTANCE)
;+ (allowed-classes List)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot superficialPart
;+ (comment "(&%superficialPart ?OBJ1 ?OBJ2)\nmeans that ?OBJ1 is a part of ?OBJ2 that has no interior parts of its own\n(or, intuitively, that only overlaps those parts of ?OBJ2 that are\nexternally connected with the mereological complement of ?OBJ2). This too\nis a transitive relation closed under &%MereologicalSumFn and\n&%MereologicalProductFn.\n")
(type INSTANCE)
;+ (allowed-classes Object)
;+ (cardinality 0 1)
;+ (subslot-of part)
(create-accessor read-write))
(single-slot home
;+ (comment "The relation between a &%Human and a home of the &%Human.\n\nA very basic notion of living within something else. (&%inhabits ?ORGANISM ?OBJECT) means that ?OBJECT is the residence, nest, home, etc. of ?ORGANISM.")
(type INSTANCE)
;+ (allowed-classes StationaryArtifact)
;+ (cardinality 0 1)
;+ (subslot-of inhabits)
(create-accessor read-write))
(single-slot true
;+ (comment "The &%BinaryPredicate that relates a &%Sentence to its &%TruthValue.\n\nThis &%Predicate holds between an instance of &%Entity and an instance of &%Attribute. (property ?ENTITY ?ATTR) means that ?ENTITY has the &%Attribute ?ATTR.")
(type INSTANCE)
;+ (allowed-classes Attribute)
;+ (cardinality 0 1)
;+ (subslot-of property)
(create-accessor read-write))
(single-slot TimeIntervalFn
;+ (comment "A &%BinaryFunction that takes two &%TimePoints as arguments and returns the &%TimeInterval defined by these two &%TimePoints. Note that the first &%TimePoint must occur earlier than the second &%TimePoint.")
(type INSTANCE)
;+ (allowed-classes TimeInterval)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot meetsTemporally
;+ (comment "(&%meetsTemporally ?INTERVAL1 ?INTERVAL2) means that the terminal point of the &%TimeInterval ?INTERVAL1 is the initial point of the &%TimeInterval ?INTERVAL2.")
(type INSTANCE)
;+ (allowed-classes TimeInterval)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot AccountCode
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000091):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot VelocityFn
;+ (comment "Specifies the velocity of an object, i.e. the speed and the direction of the speed. For example (&%VelocityFn (&%MeasureFn 55 &%Mile) (&%MeasureFn 2 &%HourDuration) ?REFERENCE &%North) denotes the velocity of 55 miles per hour North of the given reference point ?REFERENCE.")
(type INSTANCE)
;+ (allowed-classes TimeDuration)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot located
;+ (comment "(&%located ?PHYS ?OBJ) means that ?PHYS is &%partlyLocated\nat ?OBJ, and there is no &%part or &%subProcess of ?PHYS that is not &%located at ?OBJ.\n")
(type INSTANCE)
;+ (allowed-classes Object)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot BackFn
;+ (comment "A &%Function that maps an &%Object to the side that is opposite the &%FrontFn of the &%Object. Note that this is a partial function, since some &%Objects do not have sides, e.g. apples and spheres. Note too that the &%range of this &%Function is indefinite in much the way that &%ImmediateFutureFn and &%ImmediatePastFn are indefinite. Although this indefiniteness is undesirable from a theoretical standpoint, it does not have significant practical implications, since there is widespread intersubjective agreement about the most common cases.")
(type INSTANCE)
;+ (allowed-classes SelfConnectedObject)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot TransitDirectionCode
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000593):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot hasMimeCode
;+ (comment "The code name for a particular conversion method of binary to printable characters and back.")
(type INSTANCE)
;+ (allowed-classes CodeType)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot FullnessIndicatorCode
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000648):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot DeliverToAddress
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000168):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot ReceivedQuantity
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000243):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot piece
;+ (comment "A specialized common sense notion of part for arbitrary parts of &%Substances. Quasi-synonyms are: chunk, hunk, bit, etc. Compare &%component, the other subrelation of &%part.\n")
(type INSTANCE)
;+ (allowed-classes Substance)
;+ (cardinality 0 1)
;+ (subslot-of part)
(create-accessor read-write))
(single-slot RiskResponsibilityCode
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000184):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot MinimumQuantity
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000062):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot representation
;+ (comment "The physical representation of this Abstract concept.")
(type INSTANCE)
;+ (allowed-classes Document-Physical)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot exactlyLocated
;+ (comment "The actual, minimal location of an\nObject. This is a subrelation of the more general &%Predicate\n&%located.\n\n\n(&%located ?PHYS ?OBJ) means that ?PHYS is &%partlyLocated\nat ?OBJ, and there is no &%part or &%subProcess of ?PHYS that is not &%located at ?OBJ.\n")
(type INSTANCE)
;+ (allowed-classes Object)
;+ (cardinality 0 1)
;+ (subslot-of located)
(create-accessor read-write))
(single-slot side
;+ (comment "(&%side ?SIDE ?OBJECT) means that ?SIDE is a side of the object, as opposed to the &%top or &%bottom.\n")
(type INSTANCE)
;+ (allowed-classes Object)
;+ (cardinality 0 1)
;+ (subslot-of superficialPart)
(create-accessor read-write))
(single-slot CoordinateSystemCode
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000337):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot believes
;+ (comment "The epistemic predicate of belief. (&%believes ?AGENT ?FORMULA) means that ?AGENT believes the proposition expressed by ?FORMULA.")
(type INSTANCE)
;+ (allowed-classes Formula)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot ContainedPackage
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000011):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot hasField2
;+ (comment "hasField relates a StructuredText to the fields that comprise its structure. \nFor multiple subfield, see hasField1, hasField2, etc.")
(type INSTANCE)
;+ (allowed-classes Text-Abstract)
;+ (cardinality 0 1)
;+ (subslot-of hasField)
(create-accessor read-write))
(single-slot MaxFn
;+ (comment "(&%MaxFn ?NUMBER1 ?NUMBER2) is the largest of ?NUMBER1 and ?NUMBER2. In cases where ?NUMBER1 is equal to ?NUMBER2, &%MaxFn returns one of its arguments.")
(type INSTANCE)
;+ (allowed-classes Quantity)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot CardAccount
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000430):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot MonthFn
;+ (comment "A &%BinaryFunction that maps a subclass of &%Month and a subclass of &%Year to the class containing the &%Months corresponding to thos &%Years. For example (&%MonthFn &%January (&%YearFn 1912)) is the class containing the eighth\n&%Month, i.e. August, of the &%Year 1912. For another example, (&%MonthFn &%August &%Year) is equal to &%August, the class of all months of August. Note that this function returns a &%Class as a value. The reason for this is that the related functions, viz. DayFn, HourFn, MinuteFn, and SecondFn, are used to generate both specific &%TimeIntervals and recurrent intervals, and the only way to do this is to make the domains and ranges of these functions classes rather than individuals.\n")
(type SYMBOL)
;+ (allowed-parents Month)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot SineFn
;+ (comment "(&%SineFn ?DEGREE) is the sine of the &%PlaneAngleMeasure ?DEGREE. The sine of ?DEGREE is the ratio of the side opposite ?DEGREE to the hypotenuse in a right-angled triangle.")
(type INSTANCE)
;+ (allowed-classes RealNumber)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot MinimumTransportTemperatureMeasure
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000273):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot LineitemCountQuantity
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL700009):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot MaximumBackorderQuantity
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000064):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot hasSkill
;+ (comment "Similar to the &%capability &%Predicate with the additional restriction that the ability be practised/demonstrated to some measurable degree.")
(type INSTANCE)
;+ (allowed-classes Agent)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot hasDeliveryRequirement
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000024):\n")
(type INSTANCE)
;+ (allowed-classes DeliveryRequirementType)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot DurationMeasure
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000445):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot Country
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000047):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot hasLanguageID
;+ (comment "The identifier for the language of the code list. It is an instance of LanguageIdentifier, which may be an abbreviation (e.g. 'en' = English).")
(type INSTANCE)
;+ (allowed-classes LanguageIdentifier)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot ReceivedDateDateTime
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000249):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot legalRelation
;+ (comment "(&%legalRelation ?AGENT1 ?AGENT2) means there is a relationship involving legal obligations between ?AGENT1 and ?AGENT2. Some examples include marriage, adoption, etc.\n")
(type INSTANCE)
;+ (allowed-classes CognitiveAgent)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot TotalPackagesCountQuantity
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL100013):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot faces
;+ (comment "(&%faces ?OBJ ?DIRECTION) means that the front of ?OBJ (see &%FrontFn) is positioned towards the compass direction ?DIRECTION. More precisely, it means that if a line were extended from the center of ?DIRECTION, the line would intersect with the front of ?OBJ before it intersected with its back (see &%BackFn).")
(type INSTANCE)
;+ (allowed-classes DirectionalAttribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot equivalentContentInstance
;+ (comment "A &%BinaryPredicate relating two\ninstances of &%ContentBearingObject. (&%equivalentContentInstance\n?OBJ1 ?OBJ2) means that the content expressed by ?OBJ1 is identical to the content expressed by ?OBJ2. An example would be the relationship between a handwritten draft of a letter to one's lawyer and a typed copy of the same letter. Note that (&%equivalentContentInstance ?OBJ1 ?OBJ2) implies (&%subsumesContentInstance ?OBJ1 ?OBJ2) and\n(&%subsumesContentInstance ?OBJ2 ?OBJ2).\n")
(type INSTANCE)
;+ (allowed-classes ContentBearingObject)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot taxTotal
(type INSTANCE)
;+ (allowed-classes TaxTotal)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot ExpiryDate
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000100):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot HazardousItem
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000300):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot PlacardNotation
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000254):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot greaterThan
;+ (comment "(&%greaterThan ?NUMBER1 ?NUMBER2) is true just in case the &%Quantity ?NUMBER1 is greater than the &%Quantity ?NUMBER2.")
(type INSTANCE)
;+ (allowed-classes Quantity)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot FinancialInstitution
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000222):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot orientation
;+ (comment "A general &%Predicate for indicating how two &%Objects are oriented with respect to one another. For example,\n(orientation ?OBJ1 ?OBJ2 North) means that ?OBJ1 is north of ?OBJ2, and (orientation ?OBJ1 ?OBJ2 Vertical) means that ?OBJ1 is positioned vertically with respect to ?OBJ2.\n")
(type INSTANCE)
;+ (allowed-classes Object)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot ShippingContact
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000556):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot MinimalCutSetFn
;+ (comment "A &%UnaryFunction that assigns a &%Graph the &%Class of &%GraphPaths which comprise cutsets for the &%Graph and which have the least number of &%GraphArcs.")
(type INSTANCE)
;+ (allowed-classes GraphPath)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot MereologicalSumFn
;+ (comment "(&%MereologicalSumFn ?OBJ1 ?OBJ2) denotes the &%Object consisting of the parts which belong to either ?OBJ1 or ?OBJ2.")
(type INSTANCE)
;+ (allowed-classes Object)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot HandlingUnitReceiptLine
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000470):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot %3C%3D%3E
;+ (comment "The truth-functional connective of bi-implication.")
(type INSTANCE)
;+ (allowed-classes Formula)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot SkinFn
;+ (comment "A &%UnaryFunction that maps a &%Hole to the skin of the &%Hole. The skin of a &%Hole is the fusion of those superficial parts (see &%superficialPart) of the &%Hole's principal host (see &%PrincipalHostFn) with which the &%Hole is externally connected.")
(type INSTANCE)
;+ (allowed-classes Object)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot decreasesLikelihood
;+ (comment "One of the basic &%ProbabilityRelations. (&%decreasesLikelihood ?FORMULA1 ?FORMULA2) means that ?FORMULA2 is less likely to be true if ?FORMULA1 is true.")
(type INSTANCE)
;+ (allowed-classes Formula)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot BeginNodeFn
;+ (comment "A &%UnaryFunction that maps a &%GraphPath to the &%GraphNode that is the beginning of the &%GraphPath. Note that, unlike &%InitialNodeFn (which relates a &%GraphArc to a &%GraphNode), &%BeginNodeFn is a total function - every &%GraphPath has a beginning.")
(type INSTANCE)
;+ (allowed-classes GraphNode)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot BasePrice
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000070):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot GrossWeightMeasure
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000019):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot date
;+ (comment "A &%BinaryPredicate that specifies a &%TimePosition in absolute calendar time, at the resolution of one day, for a particular &%Object or &%Process.")
(type INSTANCE)
;+ (allowed-classes Day)
;+ (cardinality 0 1)
(create-accessor read-write))
(multislot disjointRelation
;+ (type ANY)
(create-accessor read-write))
(single-slot irreflexiveOn
;+ (comment "A &%BinaryRelation is irreflexive on a &%SetOrClass only if no instance of the &%SetOrClass bears the relation to itself.")
(type INSTANCE)
;+ (allowed-classes SetOrClass)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot EndFn
;+ (comment "A &%UnaryFunction that maps a &%TimeInterval to the &%TimePoint at which the interval ends.")
(type INSTANCE)
;+ (allowed-classes TimePoint)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot GreatestCommonDivisorFn
;+ (comment "(GreatestCommonDivisorFn ?Number1 ?Number2 . . . . ?Number) returns the greatest comon divisor of ?Number1 through ?Number.")
(type INSTANCE)
;+ (allowed-classes Integer)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot surface
;+ (comment "(&%surface ?OBJ1 ?OBJ2) means that ?OBJ1 is a maximally connected &%superficialPart of ?OBJ2. Note that some &%SelfConnectedObjects have more than one surface, e.g. a hollow object like a tennis ball has both an inner and an outer surface.")
(type INSTANCE)
;+ (allowed-classes SelfConnectedObject)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot between
;+ (comment "(between ?OBJ1 ?OBJ2 ?OBJ3) means that ?OBJ2 is spatially located between ?OBJ1 and ?OBJ3. Note that this implies that ?OBJ2 is directly between ?OBJ1 and ?OBJ3, i.e. the projections of ?OBJ1 and ?OBJ3 overlap with ?OBJ2.")
(type INSTANCE)
;+ (allowed-classes Object)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot %3ADomain4Value
;+ (comment "The value of the fifth argument")
(type INSTANCE)
;+ (allowed-classes Entity)
;+ (cardinality 0 1)
;+ (associated-facet UBLinv018t_00304)
(create-accessor read-write))
(single-slot legalTotals
(type INSTANCE)
;+ (allowed-classes LegalTotals)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot hasMeasure
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000305):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot PartyTaxScheme
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000094):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot increasesLikelihood
;+ (comment "One of the basic &%ProbabilityRelations. (&%increasesLikelihood ?FORMULA1 ?FORMULA2) means that ?FORMULA2 is more likely to be true if ?FORMULA1 is true.")
(type INSTANCE)
;+ (allowed-classes Formula)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot subCollection
;+ (comment "(&%subCollection ?COLL1 ?COLL2) means that the &%Collection ?COLL1 is a proper part of the &%Collection ?COLL2.")
(type INSTANCE)
;+ (allowed-classes Collection)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot ToFollowQuantity
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000191):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot developmentalForm
;+ (comment "(&%developmentalForm ?OBJECT ?FORM) means that ?FORM is an earlier stage in the individual maturation of ?OBJECT. For example, tadpole and caterpillar are &%developmentalForms of frogs and butterflies, respectively.")
(type INSTANCE)
;+ (allowed-classes DevelopmentalAttribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot Note
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000436):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot graphPart
;+ (comment "A basic relation for &%Graphs and their parts. (&%graphPart ?PART ?GRAPH) means that ?PART is a &%GraphArc or &%GraphNode of the &%Graph ?GRAPH.")
(type INSTANCE)
;+ (allowed-classes Graph)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot ExponentiationFn
;+ (comment "(&%ExponentiationFn ?NUMBER ?INT) returns the &%RealNumber ?NUMBER raised to the power of the &%Integer ?INT.")
(type INSTANCE)
;+ (allowed-classes Quantity)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot cat%3AID
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL700005):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot capability
;+ (comment "(&%capability ?PROCESS ?ROLE ?OBJ) means that ?OBJ has the ability to play the role of ?ROLE in &%Processes of type ?PROCESS.")
(type INSTANCE)
;+ (allowed-classes CaseRole)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot material
;+ (comment "(&%material ?SUBSTANCE ?OBJECT) means that ?OBJECT is structurally made up in part of ?SUBSTANCE. This relation encompasses the concepts of 'composed of', 'made of', and 'formed of'. For example, plastic is a &%material of my computer monitor. Compare &%part and its subrelations, viz &%component and &%piece.\n **Note that first argument is a class, not an instance")
(type INSTANCE)
;+ (allowed-classes CorpuscularObject)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot cat%3AOrderLine
;+ (comment "UBL-element Jul 26-03 (UBL-ID=):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot represents
;+ (comment "A very general semiotics &%Predicate. (&%represents ?THING ?ENTITY) means that ?THING in some way indicates, expresses, connotes, pictures, describes, etc. ?ENTITY. The &%Predicates &%containsInformation and &%realization are subrelations of &%represents. Note that &%represents is a subrelation of &%refers, since something can\nrepresent something else only if it refers to this other thing. See the\ndocumentation string for &%names.\n\n(&%refers ?OBJ1 ?OBJ2) means that ?OBJ1 mentions or includes a reference to ?OBJ2. Note that &%refers is more general in meaning than &%represents, because presumably something can represent something else only if it refers to this other thing. For example, an article whose topic is a recent change in the price of oil may refer to many other things, e.g. the general state of the economy, the weather in California, the prospect of global warming, the options for alternative energy sources, the stock prices of various oil companies, etc.")
(type INSTANCE)
;+ (allowed-classes Entity)
;+ (cardinality 0 1)
;+ (subslot-of refers)
(create-accessor read-write))
(single-slot wears
;+ (comment "(&%wears ?AGENT ?CLOTHING) means that ?AGENT is wearing\nthe item of &%Clothing ?CLOTHING.\n")
(type INSTANCE)
;+ (allowed-classes Clothing)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot traverses
;+ (comment "(&%traverses ?OBJ1 ?OBJ2) means that ?OBJ1 crosses or extends across ?OBJ2. Note that &%crosses and &%penetrates are subrelations of &%traverses.")
(type INSTANCE)
;+ (allowed-classes Object)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot LineidID
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000478):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot hasAddress
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000093):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot TaxTypeCode
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000624):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(multislot morphological_form
(type STRING)
(create-accessor read-write))
(single-slot TypeCode
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000098):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot FutureFn
;+ (comment "A &%UnaryFunction that maps a &%TimePosition to the &%TimeInterval which it meets and which ends at &%PositiveInfinity.")
(type INSTANCE)
;+ (allowed-classes TimeInterval)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot WhereFn
;+ (comment "Maps an &%Object and a &%TimePoint at which the &%Object exists to the &%Region where the &%Object existed at that &%TimePoint.")
(type INSTANCE)
;+ (allowed-classes Region)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot sideOfFigure
;+ (comment "(&%sideOfFigure ?SIDE ?FIGURE) means that the\n&%OneDimensionalFigure ?SIDE is a side of the &%GeometricFigure ?FIGURE.\n")
(type INSTANCE)
;+ (allowed-classes GeometricFigure)
;+ (cardinality 0 1)
;+ (subslot-of geometricPart)
(create-accessor read-write))
(single-slot EndDateTimeDate
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000586):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot usageFrequency
;+ (comment "usageFrequency relates a word - string of characters -- to the frequency with which that word refers to the particular concept (ontology class). The sum of all frequencies for a particular word in a particular language should add to 1.0 --\nbut all usages of a particulaar word will not usually be visible in any one screen. There is no significance to the total number of words that might label a concept-class, nor to the total frequencies in all languages.")
(type FLOAT)
(range 0.0 1.0)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot connects
;+ (comment "The relationship between three things, when one of the three things connects the other two. More formally, (&%connects ?OBJ1 ?OBJ2 ?OBJ3) means that (&%connected ?OBJ1 ?OBJ2) and (&%connected ?OBJ1 ?OBJ3) and not (&%connected ?OBJ2 ?OBJ3).")
(type INSTANCE)
;+ (allowed-classes SelfConnectedObject)
;+ (cardinality 0 1)
(create-accessor read-write))
(multislot inhibits
;+ (type ANY)
(create-accessor read-write))
(single-slot consistent
;+ (comment "(&%consistent ?PROP1 ?PROP2) means that the two &%Propositions ?PROP1 and ?PROP2 are consistent with one another, i.e. it is possible for both of them to be true at the same time.\n")
(type INSTANCE)
;+ (allowed-classes Proposition)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot MagnitudeFn
;+ (comment "The magnitude of a &%ConstantQuantity is the numeric value for the quantity. In other words, &%MagnitudeFn converts a &%ConstantQuantity with an associated &%UnitOfMeasure into an ordinary &%RealNumber. For example, the magnitude of the &%ConstantQuantity 2 &%Kilometers is the &%RealNumber 2. Note that the magnitude of a quantity in a given unit times that unit is equal to the original quantity.")
(type INSTANCE)
;+ (allowed-classes RealNumber)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot arcWeight
;+ (comment "This predicate indicates the value of a &%GraphArc in a &%Graph. This could map to the length of a road in a road network or the flow rate of a pipe in a plumbing system.")
(type INSTANCE)
;+ (allowed-classes RealNumber)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot IntegerSquareRootFn
;+ (comment "(&%IntegerSquareRootFn ?NUMBER) returns the integer square root of ?NUMBER.")
(type INSTANCE)
;+ (allowed-classes NonnegativeInteger)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot PackQuantity
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000288):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot PathWeightFn
;+ (comment "A &%UnaryFunction that maps a &%GraphPath to the sum of the &%arcWeights on the &%GraphArcs in the &%GraphPath.")
(type INSTANCE)
;+ (allowed-classes RealNumber)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot parallel
;+ (comment "(&%parallel ?LINE1 ?LINE2) means that the &%OneDimensionalFigures ?LINE1 and ?LINE2 are parallel to one another, i.e. they are equidistant from one another at every point.\n")
(type INSTANCE)
;+ (allowed-classes OneDimensionalFigure)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot destination
;+ (comment "(destination ?PROCESS ?GOAL) means that ?GOAL is the target or goal of the Process ?PROCESS. For example, Danbury would be the destination in the following proposition: Bob went to Danbury. Note that this is a very general &%CaseRole and, in particular, that it covers the concepts of 'recipient' and 'beneficiary'. Thus, John would be the &%destination in the following proposition: Tom gave a book to John.")
(type INSTANCE)
;+ (allowed-classes Entity)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot TransportModeCode
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000591):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot expressedInLanguage
;+ (comment "(&%expressedInLanguage ?EXPRESS ?LANG) means that ?EXPRESS is expressed in &%Language ?LANG.")
(type INSTANCE)
;+ (allowed-classes Language)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot RejectActionCode
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000248):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot TaxCurrencyType
(type SYMBOL)
;+ (allowed-parents CurrencyMeasure)
;+ (cardinality 0 1)
(create-accessor read-write))
(multislot cat%3AInvoiceLine
;+ (comment "UBL-element Jul 26-03 (UBL-ID=):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
(cardinality 1 ?VARIABLE)
(create-accessor read-write))
(single-slot PrimaryAccountNumberID
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000097):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot OrderContact
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000557):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot SellersID
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000379):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot OrderLine
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000171):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot angularMeasure
;+ (comment "(&%angularMeasure ?ANGLE ?MEASURE) means that the two-dimensional geometric angle ?ANGLE has the &%PlaneAngleMeasure of ?MEASURE.\n")
(type INSTANCE)
;+ (allowed-classes PlaneAngleMeasure)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot MegaFn
;+ (comment "A &%UnaryFunction that maps a &%UnitOfMeasure into a &%UnitOfMeasure that is equal to 1,000,000 units of the original &%UnitOfMeasure. For example, (&%KiloFn &%Hertz) is 1,000,000 &%Hertz.")
(type INSTANCE)
;+ (allowed-classes UnitOfMeasure)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot DenominatorFn
;+ (comment "(&%DenominatorFn ?NUMBER) returns the denominator of the canonical reduced form of the &%RealNumber ?NUMBER.")
(type INSTANCE)
;+ (allowed-classes Integer)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot cat%3ANetNetWeightMeasure
;+ (comment "UBL-element Jul 26-03 (UBL-ID=):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot InvoiceQuantity
;+ (comment "Quantity of unitCode(s). See unitCode slot.")
(type INTEGER)
;+ (cardinality 1 1)
(create-accessor read-write))
(single-slot inList
;+ (comment "The analog of &%element and &%instance for &%Lists. (&%inList ?OBJ ?LIST) means that ?OBJ is in the &%List ?LIST. For example, (&%inList &%Tuesday (&%ListFn &%Monday &%Tuesday &%Wednesday)) would be true.")
(type INSTANCE)
;+ (allowed-classes List)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot equivalentContentClass
;+ (comment "A &%BinaryPredicate that relates two\nsubclasses of &%ContentBearingObject. (&%equivalentContentClass ?CLASS1\n?CLASS2) means that the content expressed by each instance of ?CLASS1 is\nalso expressed by each instance of ?CLASS2, and vice versa. An example would be the relationship between English and Russian editions of Agatha Christie's 'Murder on the Orient Express'. Note that\n(&%equivalentContentClass ?CLASS1 ?CLASS2) implies (&%subsumesContentClass\n?CLASS1 ?CLASS2) and (&%subsumesContentClass ?CLASS2 ?CLASS1).\n\nNOTE: Domain1 is a class\nA &%BinaryPredicate that relates two subclasses of &%ContentBearingObject. (&%subsumesContentClass ?CLASS1 ?CLASS2) means that the content expressed by each instance of ?CLASS2 is\nalso expressed by each instance of ?CLASS1. Examples include the\nrelationship between a poem and one of its stanzas or between a book and\none of its chapters. Note that this is a relation between subclasses of &%ContentBearingObject, rather than instances. If one wants to relate instances, the &%Predicate &%subsumesContentInstance can be used. Note that &%subsumesContentClass is needed in many cases. Consider, for example, the relation between the King James edition of the Bible and its Book of Genesis. This relation holds for every copy of this edition and not just for a single instance.\n")
(type SYMBOL)
;+ (allowed-parents ContentBearingObject)
;+ (cardinality 0 1)
;+ (subslot-of subsumesContentClass)
(create-accessor read-write))
(single-slot TangentFn
;+ (comment "(&%TangentFn ?DEGREE) is the tangent of the &%PlaneAngleMeasure ?DEGREE. The tangent of ?DEGREE is the ratio of the side opposite ?DEGREE to the side next to ?DEGREE in a right-angled triangle.")
(type INSTANCE)
;+ (allowed-classes RealNumber)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot AssignmentFn
;+ (comment "If F is a function with a value for the objects denoted by N1,..., NK, then the term (AssignmentFn F N1 ... NK) denotes the value of applying F to the objects denoted by N1,..., NK. Otherwise, the value is undefined.")
(type INSTANCE)
;+ (allowed-classes Entity)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot reflexiveOn
;+ (comment "A &%BinaryRelation is reflexive on a &%SetOrClass only if every instance of the &%SetOrClass bears the relation to itself.")
(type INSTANCE)
;+ (allowed-classes SetOrClass)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot sellerTransaction
(type INSTANCE)
;+ (allowed-classes Selling)
;+ (cardinality 1 1)
(create-accessor read-write))
(single-slot domain
;+ (comment "Provides a computationally and heuristicallyconvenient mechanism for declaring the argument types of a given relation. The formula (&%domain ?REL ?INT ?CLASS) means that the ?INT'th element of each tuple in the relation ?REL must be an instance of ?CLASS. Specifying argumenttypes is very helpful in maintaining ontologies. Representation systems can use these specifications to classify terms and check integrity constraints. If the restriction on the argument type of a &%Relation is not captured by a &%SetOrClass already defined in the ontology, one can specify a &%SetOrClass compositionally with the functions &%UnionFn, &%IntersectionFn, etc.")
(type INSTANCE)
;+ (allowed-classes PositiveInteger)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot crosses
;+ (comment "(crosses ?OBJ1 ?OBJ2) means that\n&%Object ?OBJ1 &%traverses Object ?OBJ2, without being &%connected\nto it.\n\n(&%traverses ?OBJ1 ?OBJ2) means that ?OBJ1 crosses or extends across ?OBJ2. Note that &%crosses and &%penetrates are subrelations of &%traverses.")
(type INSTANCE)
;+ (allowed-classes Object)
;+ (cardinality 0 1)
;+ (subslot-of traverses)
(create-accessor read-write))
(single-slot TemporalCompositionFn
;+ (comment "The basic &%Function for expressing the composition of larger &%TimeIntervals out of smaller &%TimeIntervals. For example, if &%ThisSeptember is an &%instance of &%September, (&%TemporalCompositionFn &%ThisSeptember &%Day) denotes the &%Class of consecutive days that make up &%ThisSeptember. Note that one can obtain the number of instances of this &%Class by using the function &%CardinalityFn.")
(type SYMBOL)
;+ (allowed-parents TimeInterval)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot HouseNumber
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000037):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot NumeratorFn
;+ (comment "(&%NumeratorFn ?NUMBER) returns the numerator of the canonical reduced form ?NUMBER.")
(type INSTANCE)
;+ (allowed-classes Integer)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot SizeTypeCode
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000646):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot EmsNumberCode
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000263):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot ReplacedOrderLine
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000503):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot larger
;+ (comment "(&%larger ?OBJ1 ?OBJ2) simply means that ?OBJ1 is larger, with respect to all &%LengthMeasures, than ?OBJ2.")
(type INSTANCE)
;+ (allowed-classes Object)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot subsumesContentClass
;+ (comment "NOTE: Domain1 is a class\nA &%BinaryPredicate that relates two subclasses of &%ContentBearingObject. (&%subsumesContentClass ?CLASS1 ?CLASS2) means that the content expressed by each instance of ?CLASS2 is\nalso expressed by each instance of ?CLASS1. Examples include the\nrelationship between a poem and one of its stanzas or between a book and\none of its chapters. Note that this is a relation between subclasses of &%ContentBearingObject, rather than instances. If one wants to relate instances, the &%Predicate &%subsumesContentInstance can be used. Note that &%subsumesContentClass is needed in many cases. Consider, for example, the relation between the King James edition of the Bible and its Book of Genesis. This relation holds for every copy of this edition and not just for a single instance.\n")
(type SYMBOL)
;+ (allowed-parents ContentBearingObject)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot ShipmentStage
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000026):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot possesses
;+ (comment "&%Relation that holds between an &%Agent and an &%Object when the &%Agent has ownership of the &%Object.")
(type INSTANCE)
;+ (allowed-classes Object)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot holdsDuring
;+ (comment "(&%holdsDuring ?TIME ?FORMULA) means that the proposition denoted by ?FORMULA is true in the time frame ?TIME. Note that this implies that ?FORMULA is true at every &%TimePoint which is a &%temporalPart of ?TIME.")
(type INSTANCE)
;+ (allowed-classes Formula)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot hasAttribute
;+ (comment "(hasAttribute ?OBJECT ?PROPERTY) means that ?PROPERTY is a &%Attribute of ?OBJECT. For example, (&%attribute &%MyLittleRedWagon &%Red).\n IN SUMO this is simply 'attribute'.")
(type INSTANCE)
;+ (allowed-classes Attribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot SUO-name
(type STRING)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot mother
;+ (comment "The general relationship of motherhood. (&%mother ?CHILD ?MOTHER) means that ?MOTHER is the biological mother of ?CHILD.")
(type INSTANCE)
;+ (allowed-classes Organism)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot UnionFn
;+ (comment "A &%BinaryFunction that maps two &%SetOrClasses to the union of these &%SetOrClasses. An object is an &%element of the union of two &%SetOrClasses just in case it is an &%instance of either &%SetOrClass.")
(type INSTANCE)
;+ (allowed-classes SetOrClass)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot ImmediatePastFn
;+ (comment "A &%UnaryFunction that maps a &%TimePosition to a short, indeterminate &%TimeInterval that immediately precedes the &%TimePosition.")
(type INSTANCE)
;+ (allowed-classes TimeInterval)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot SignumFn
;+ (comment "(SignumFn ?NUMBER) denotes the sign of ?NUMBER. This is one of the following values: -1, 1, or 0.")
(type INSTANCE)
;+ (allowed-classes Integer)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot hasCodeListAgency
;+ (comment "The name of the Agency that maintains the Code list. This duplicates the agency name under the entry for the code list itself.")
(type STRING)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot component
;+ (comment "A specialized common sense notion of part\nfor heterogeneous parts of complexes. (&%component ?COMPONENT ?WHOLE)\nmeans that ?COMPONENT is a component of ?WHOLE. Examples of component\ninclude the doors and walls of a house, the states or provinces of a\ncountry, or the limbs and organs of an animal. Compare &%piece, which\nis also a subrelation of &%part.\n")
(type INSTANCE)
;+ (allowed-classes CorpuscularObject)
;+ (cardinality 0 1)
;+ (subslot-of part)
(create-accessor read-write))
(single-slot Street
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000034):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot PostalZone
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000041):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot %3ADomain4Class
;+ (comment "The class of the fifth argument")
(type SYMBOL)
;+ (allowed-parents Entity)
;+ (cardinality 0 1)
;+ (associated-facet UBLinv018t_00302)
(create-accessor read-write))
(single-slot Code
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000142):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot equal
;+ (comment "(equal ?ENTITY1 ?ENTITY2) is true just in case ?ENTITY1 is identical with ?ENTITY2.")
(type INSTANCE)
;+ (allowed-classes Entity)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot subset
;+ (comment "(subset ?SET1 ?SET2) is true just in case the &%elements of the &%Set ?SET1 are also &%elements of the &%Set ?SET2.\n\n(&%subclass ?CLASS1 ?CLASS2) means that ?CLASS1 is a subclass of ?CLASS2, i.e. every instance of ?CLASS1 is also an instance of ?CLASS2. A class may have multiple superclasses and subclasses.")
(type INSTANCE)
;+ (allowed-classes Set)
;+ (cardinality 0 1)
;+ (subslot-of subclass)
(create-accessor read-write))
(single-slot engineeringSubcomponent
;+ (comment "(&%engineeringSubcomponent ?SUB ?SUPER) means that the &%EngineeringComponent ?SUB is structurally a &%properPart ?SUPER. This relation is an &%AsymmetricRelation, since two &%EngineeringComponents cannot be subcomponents of each other.")
(type INSTANCE)
;+ (allowed-classes EngineeringComponent)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot ValidityDurationMeasure
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL100009):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot DescriptionCode
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000446):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot CancelledByDate
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL100008):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot EndDateTime
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000444):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot wife
;+ (comment "(&%wife ?WOMAN ?MAN) means that ?WOMAN is the wife of ?MAN.\n")
(type INSTANCE)
;+ (allowed-classes Man)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot MicroFn
;+ (comment "A &%UnaryFunction that maps a &%UnitOfMeasure into a &%UnitOfMeasure that is equal to .000001 units of the original &%UnitOfMeasure. For example, (&%MicroFn &%Meter) is .000001 &%Meters.")
(type INSTANCE)
;+ (allowed-classes UnitOfMeasure)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot AdditionalStreet
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000035):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot successorAttribute
;+ (comment "(&%successorAttribute ?ATTR1 ?ATTR2) means that ?ATTR2 is the &%Attribute that comes immediately after ?ATTR1 on the scale that they share.")
(type INSTANCE)
;+ (allowed-classes Attribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot Information
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000650):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot ForeignExchangeContract
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000218):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot age
;+ (comment "Simply relates an &%Object to a &%ConstantQuantity specifying the age of the &%Object.\n")
(type INSTANCE)
;+ (allowed-classes TimeDuration)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot OrderedPackage
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000376):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot holdsRight
;+ (comment "Expresses a relationship between a &%Formula and a &%CognitiveAgent whereby the &%CognitiveAgent has the right to bring it about that the &%Formula is true.")
(type INSTANCE)
;+ (allowed-classes CognitiveAgent)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot OwnerPartyTypeCode
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000645):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot IntersectionFn
;+ (comment "A &%BinaryFunction that maps two %SetOrClasses to the intersection of these &%SetOrClasses. An object is an instance of the intersection of two &%SetOrClasses just in case it is an instance of both of those &%SetOrClasses.")
(type INSTANCE)
;+ (allowed-classes SetOrClass)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot hasNumberFormat
;+ (comment "For the UBL specification, the format of the number is required. For example, decimal or scientific notation could be used. This concept is abstract, and though it might at first be thought that the format is only a property of the physical representation of a number, in fact it is also an abstract property of a number, when the number is a mental object used in communication. The abstract value of the number does not change. The format may be a strucutred test (as in scientific notation) but may be a simple string, as for unsigned integers.")
(type INSTANCE)
;+ (allowed-classes Text-Abstract)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot %3ADomain2Class
;+ (comment "The third argument of a higher-arity relation, after usual domain and range.")
(type SYMBOL)
;+ (allowed-parents Entity)
;+ (cardinality 0 1)
;+ (associated-facet SUMO148_00000)
(create-accessor read-write))
(single-slot frequency
;+ (comment "(frequency ?PROC ?TIME) means that the &%Process type of ?PROC recurs after every interval of ?TIME.")
(type INSTANCE)
;+ (allowed-classes TimeDuration)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot Condition
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000663):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot son
;+ (comment "The general relationship of being a son.\n(&%son ?CHILD ?PARENT) means that ?CHILD is the biological son of ?PARENT.\n\nThe general relationship of parenthood. (&%parent ?CHILD ?PARENT) means that ?PARENT is a biological parent of ?CHILD.")
(type INSTANCE)
;+ (allowed-classes Organism)
;+ (cardinality 0 1)
;+ (subslot-of parent)
(create-accessor read-write))
(single-slot occupiesPosition
;+ (comment "(&%occupiesPosition ?PERSON ?POSITION ?ORG) means that ?PERSON holds the &%Position ?POSITION at &%Organization ?ORG. For example, (&%occupiesPosition &%TomSmith &%ResearchDirector &%AcmeLaboratory) means that &%TomSmith is a research director at Acme Labs.")
(type INSTANCE)
;+ (allowed-classes Position)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot ToBePaidTotalAmount
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000335):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot SellersItemIdentification
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000292):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot RationalNumberFn
;+ (comment "(&%RationalNumberFn ?NUMBER) returns the rational representation of ?NUMBER.")
(type INSTANCE)
;+ (allowed-classes RationalNumber)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot HandlingTypeCode
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000016):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot CommodityCode
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000119):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot PriceAmount
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000072):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot ProviderTypeCode
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000644):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot NetVolumeMeasure
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000023):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot cat%3AExchangeRate
;+ (comment "UBL-element Jul 26-03 (UBL-ID=):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot InvoiceCurrencyCode
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL700006):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot not
;+ (comment "The truth-functional connective of negation.")
(type INSTANCE)
;+ (allowed-classes Formula)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot hasListIdentifier
;+ (comment "points to the identifier (if any) of the Code list containing this code.")
(type INSTANCE)
;+ (allowed-classes UBL-Identifier)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot Floor
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000032):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot PowerSetFn
;+ (comment "(&%PowerSetFn ?CLASS) maps the &%SetOrClass ?CLASS to the &%SetOrClass of all &%subclasses of ?CLASS.")
(type INSTANCE)
;+ (allowed-classes SetOrClass)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot AcknowledgementResponseCode
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL100004):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot cat%3AFreightForwarderParty
;+ (comment "UBL-element Jul 26-03 (UBL-ID=):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(multislot hasField4
;+ (comment "hasField relates a StructuredText to the fields that comprise its structure. \nFor multiple subfield, see hasField1, hasField2, etc.")
(type INSTANCE)
;+ (allowed-classes Text-Abstract)
(cardinality 2 ?VARIABLE)
;+ (subslot-of hasField)
(create-accessor read-write))
(single-slot TypeCodeID
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000427):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot grounding
(type INSTANCE)
;+ (allowed-classes Grounding)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot TaxPointDate
(type INSTANCE)
;+ (allowed-classes TimePosition)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot hasSchemeAgencyID
;+ (comment "The identifier of the agency that maintains the identification scheme.")
(type INSTANCE)
;+ (allowed-classes UBL-Identifier)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot cooccur
;+ (comment "(&%cooccur ?THING1 ?THING2) means that the &%Object or &%Process ?THING1 occurs at the same time as, together with, or jointly with the &%Object or &%Process ?THING2. This covers the following temporal relations: is co-incident with, is concurrent with, is contemporaneous with, and is concomitant with.")
(type INSTANCE)
;+ (allowed-classes Physical)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot temporallyBetween
;+ (comment "(&%temporallyBetween ?POINT1 ?POINT2 ?POINT3) means that the &%TimePoint ?POINT2 is between the &%TimePoints ?POINT1 and ?POINT3, i.e. ?POINT1 is before ?POINT2 and ?POINT2 is before ?POINT3.")
(type INSTANCE)
;+ (allowed-classes TimePoint)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot desires
;+ (comment "(&%desires ?AGENT ?FORMULA) means that ?AGENT wants to bring about the state of affairs expressed by ?FORMULA. Note that there is no implication that what is desired by the agent is not already true. Note too that &%desires is distinguished from &%wants only in that the former is a &%PropositionalAttitude, while &%wants is an &%ObjectAttitude.")
(type INSTANCE)
;+ (allowed-classes Formula)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot holds
;+ (comment "(holds P N1 ... NK) is true just in case the tuple of objects denoted by N1,..., NK is an element of the &%Relation P.")
(type INSTANCE)
;+ (allowed-classes List)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot LeastCommonMultipleFn
;+ (comment "(&%LeastCommonMultipleFn \n?NUMBER1 ?NUMBER2 ... ?NUMBER) returns the least common multiple of \n?NUMBER1 through ?NUMBER.")
(type INSTANCE)
;+ (allowed-classes Integer)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot cat%3ALegalTotals
;+ (comment "UBL-element Jul 26-03 (UBL-ID=):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 1 1)
(create-accessor read-write))
(single-slot property
;+ (comment "This &%Predicate holds between an instance of &%Entity and an instance of &%Attribute. (property ?ENTITY ?ATTR) means that ?ENTITY has the &%Attribute ?ATTR.")
(type INSTANCE)
;+ (allowed-classes Attribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot ReferencedReceiptLine
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000281):\n")
(type INSTANCE)
;+ (allowed-classes ReceiptLineType)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot familyRelation
;+ (comment "A very general &%Predicate for biological relationships. (&%familyRelation ?ORGANISM1 ?ORGANISM2) means that ?ORGANISM1 and ?ORGANISM2 are biologically derived from a common ancestor.")
(type INSTANCE)
;+ (allowed-classes Organism)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot rangeSubclass
;+ (comment "(&%rangeSubclass ?FUNCTION ?CLASS) means that all of the values assigned by ?FUNCTION are &%subclasses of ?CLASS.")
(type INSTANCE)
;+ (allowed-classes SetOrClass)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot MultiplierFactorQuantity
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000052):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot trichotomizingOn
;+ (comment "A &%BinaryRelation ?REL is trichotomizing on a &%SetOrClass only if, for all instances ?INST1 and ?INST2 of the &%SetOrClass, at least one of the following holds: (?REL ?INST1 ?INST2),(?REL ?INST2 ?INST1) or (equal ?INST1 ?INST2).")
(type INSTANCE)
;+ (allowed-classes SetOrClass)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot IntervalFn
;+ (comment "A &%BinaryFunction that maps two &%ConstantQuantities to the &%Class of &%ConstantQuantities that comprise the interval from the first &%ConstantQuantity to the second &%ConstantQuantity. For example, (&%IntervalFn (&%MeasureFn 8 &%Meter) (&%MeasureFn 14 &%Meter)) would return the &%Class of &%ConstantQuantities between 8 and 14 meters in length.")
(type SYMBOL)
;+ (allowed-parents ConstantQuantity)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot DispositionCode
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000647):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot attends
;+ (comment "(&%attends ?DEMO ?PERSON) means that ?PERSON attends, i.e. is a member of the audience, of the performance event ?DEMO.\n\n(&%experiencer ?PROCESS ?AGENT) means that ?AGENT experiences the &%Process ?PROCESS. For example, Yojo is the &%experiencer of seeing in the following proposition: Yojo sees the fish. Note that &%experiencer, unlike &%agent, does not entail a causal relation between its arguments.")
(type INSTANCE)
;+ (allowed-classes Human)
;+ (cardinality 0 1)
;+ (subslot-of experiencer)
(create-accessor read-write))
(single-slot relatedExternalConcept
;+ (comment "Used to signify a three-place relation between a concept in an external knowledge source, a concept in the SUMO, and the name of the other knowledge source.")
(type INSTANCE)
;+ (allowed-classes Entity)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot SourceCurrencyCode
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000210):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot cat%3ANetVolumeMeasure
;+ (comment "UBL-element Jul 26-03 (UBL-ID=):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot LocationCoordinates
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000165):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot OrderLineID
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000189):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot immediateSubclass
;+ (comment "A &%SetOrClass ?CLASS1 is an &%immediateSubclass\nof another &%SetOrClass ?CLASS2 just in case ?CLASS1 is a subclass of ?CLASS2 and\nthere is no other subclass of ?CLASS2 such that ?CLASS1 is also a subclass of it.\n\n\n(&%subclass ?CLASS1 ?CLASS2) means that ?CLASS1 is a subclass of ?CLASS2, i.e. every instance of ?CLASS1 is also an instance of ?CLASS2. A class may have multiple superclasses and subclasses.")
(type INSTANCE)
;+ (allowed-classes SetOrClass)
;+ (cardinality 0 1)
;+ (subslot-of subclass)
(create-accessor read-write))
(single-slot FiBranch
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000412):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot InhouseMail
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000038):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot connectedEngineeringComponents
;+ (comment "This is the most general connection relation between &%EngineeringComponents. If (&%connectedEngineeringComponents ?COMP1 ?COMP2), then neither ?COMP1 nor ?COMP2 can be an &%engineeringSubcomponent of the other. The relation &%connectedEngineeringComponents is a &%SymmetricRelation; there is no information in the direction of connection between two components. It is also an &%IrreflexiveRelation; no &%EngineeringComponent bears this relation to itself. Note that this relation does not associate a name or type with the connection.")
(type INSTANCE)
;+ (allowed-classes EngineeringComponent)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot TimingComplaintCode
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000250):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot MilliFn
;+ (comment "A &%UnaryFunction that maps a &%UnitOfMeasure into a &%UnitOfMeasure that is equal to .001 units of the original &%UnitOfMeasure. For example, (&%MilliFn &%Ampere) is .001 &%Amperes.")
(type INSTANCE)
;+ (allowed-classes UnitOfMeasure)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot instance
;+ (comment "An object is an &%instance of a &%SetOrClass if it is included in that &%SetOrClass. An individual may be an instance of many classes, some of which may be subclasses of others. Thus, there is no assumption in the meaning of &%instance about specificity or uniqueness.")
(type INSTANCE)
;+ (allowed-classes SetOrClass)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot cat%3AAllowanceCharge
;+ (comment "UBL-element Jul 26-03 (UBL-ID=):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot cat%3ANetWeightMeasure
;+ (comment "UBL-element Jul 26-03 (UBL-ID=):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot range
;+ (comment "Gives the range of a function. In other words, (&%range ?FUNCTION ?CLASS) means that all of the values assigned by ?FUNCTION are &%instances of ?CLASS.")
(type INSTANCE)
;+ (allowed-classes SetOrClass)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot hasUnit
;+ (comment "hasUnit points to the unit of measure in a reified PhysicalQuantity. This is an instance of unit. THe instances have not yet been included in the UBL ontology: 9-20-2003")
(type INSTANCE)
;+ (allowed-classes UnitOfMeasure)
;+ (cardinality 1 1)
(create-accessor read-write))
(single-slot DistrictAddr
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000162):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot duration
;+ (comment "(&%duration ?POS ?TIME) means that the duration of the &%TimePosition ?POS is ?TIME. Note that this &%Predicate can be used in conjunction with the &%Function &%WhenFn to specify the duration of any instance of &%Physical.")
(type INSTANCE)
;+ (allowed-classes TimeDuration)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot width
;+ (comment "&%BinaryPredicate that is used to state the measure of an &%Object from side to side at its widest span.\n\n&%BinaryPredicate that is used to state the measure of an &%Object from one point to another point along its surface. Note that the difference between the predicates &%length and &%distance is that the &%length is used to state the &%LengthMeasure of one of the dimensions of a single object, while &%distance is used to state the &%LengthMeasure that separates two distinct objects.")
(type INSTANCE)
;+ (allowed-classes LengthMeasure)
;+ (cardinality 0 1)
;+ (subslot-of length)
(create-accessor read-write))
(single-slot premise
;+ (comment "(&%premise ?ARGUMENT ?PROPOSITION) means that the\n&%Proposition ?PROPOSITION is an explicit assumption of the &%Argument\n?ARGUMENT.\n")
(type INSTANCE)
;+ (allowed-classes Proposition)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot invoiceItem
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000283):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot hasReferent
;+ (comment "hasReferenent points from an abstract text to some entity to which it refers -- it may name that entity or have some poart that names the entity.")
(type INSTANCE)
;+ (allowed-classes Entity)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot editor
;+ (comment "(&%editor ?AGENT ?TEXT) means that ?AGENT is an editor of ?TEXT.")
(type INSTANCE)
;+ (allowed-classes Text-Physical)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot LatitudeDegreesMeasure
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000338):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot CosineFn
;+ (comment "(&%CosineFn ?DEGREE) returns the cosine of the &%PlaneAngleMeasure ?DEGREE. The cosine of ?DEGREE is the ratio of the side next to ?DEGREE to the hypotenuse in a right-angled triangle.")
(type INSTANCE)
;+ (allowed-classes RealNumber)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot containsInformation
;+ (comment "A subrelation of &%represents. This predicate relates a &%ContentBearingObject to the &%Proposition that is expressed by the &%ContentBearingObject. Examples include the relationships between a physical novel and its story and between a printed score and its musical content.")
(type INSTANCE)
;+ (allowed-classes Proposition)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot CountryAddr
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000164):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot closedOn
;+ (comment "A &%BinaryFunction is closed on a &%SetOrClass if it is defined for all instances of the &%SetOrClass and its value is always an instance of the &%SetOrClass.")
(type INSTANCE)
;+ (allowed-classes SetOrClass)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot TransportEquipment
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000027):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot partiallyFills
;+ (comment "(&%partiallyFills ?OBJ ?HOLE) means that ?OBJ &%completelyFills some part of ?HOLE. Note that if (&%partiallyFills\n?OBJ1 ?HOLE) and (&%part ?OBJ1 ?OBJ2), then (&%partiallyFills ?OBJ2 ?HOLE). Note too that a partial filler need not be wholly inside a hole (it may\nstick out), which means that every complete filler also qualifies as\n(is a limit case of) a partial one.\n")
(type INSTANCE)
;+ (allowed-classes Hole)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot SuccessorFn
;+ (comment "A &%UnaryFunction that maps an &%Integer to its successor, e.g. the successor of 5 is 6.")
(type INSTANCE)
;+ (allowed-classes Integer)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot CustomerCode
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000099):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot SubstituteForOrderLine
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000394):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot CeilingFn
;+ (comment "(&%CeilingFn ?NUMBER) returns the smallest &%Integer greater than or equal to the &%RealNumber ?NUMBER.")
(type INSTANCE)
;+ (allowed-classes Integer)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot RelevantLocation
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000182):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot instrument
;+ (comment "(instrument ?EVENT ?TOOL) means that ?TOOL is used by an agent in bringing about ?EVENT and that ?TOOL is not changed by ?EVENT. For example, the key is an &%instrument in the following proposition: The key opened the door. Note that &%instrument\nand &%resource cannot be satisfied by the same ordered pair.\n\n(&%patient ?PROCESS ?ENTITY) means that ?ENTITY is a participant in ?PROCESS that may be moved, said, experienced, etc. For example, the direct objects in the sentences 'The cat swallowed the canary' and 'Billy likes the beer' would be examples of &%patients. Note that the &%patient of a &%Process may or may not undergo structural change as a result of the &%Process. The &%CaseRole of &%patient is used when one wants to specify as broadly as possible the object of a &%Process.")
(type INSTANCE)
;+ (allowed-classes Object)
;+ (cardinality 0 1)
;+ (subslot-of patient)
(create-accessor read-write))
(single-slot TransportEmergencyCardCode
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000269):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot lineMeasure
;+ (comment "(&%lineMeasure ?LINE ?MEASURE) means that the straight line ?LINE has the &%LengthMeasure of ?MEASURE.\n")
(type INSTANCE)
;+ (allowed-classes LengthMeasure)
;+ (cardinality 0 1)
(create-accessor read-write))
(multislot consistsOf
;+ (comment "consistsOf points from a physical object to the substance of which it is composed. This is usually used for objects that are relatively homogeneous, but could be used to enumerate all of the component substances.")
(type INSTANCE)
;+ (allowed-classes Substance)
(create-accessor read-write))
(single-slot RefrigerationStatusIndicator
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000649):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot inhabits
;+ (comment "A very basic notion of living within something else. (&%inhabits ?ORGANISM ?OBJECT) means that ?OBJECT is the residence, nest, home, etc. of ?ORGANISM.")
(type INSTANCE)
;+ (allowed-classes Object)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot hasField1
;+ (comment "hasField relates a StructuredText to the fields that comprise its structure. ")
(type INSTANCE)
;+ (allowed-classes Text-Abstract)
;+ (cardinality 1 1)
;+ (inverse-slot isFieldOf)
;+ (subslot-of hasField)
(create-accessor read-write))
(single-slot subGraph
;+ (comment "The relation between two &%Graphs when one &%Graph is a part of the other. (&%subGraph ?GRAPH1 ?GRAPH2) means that ?GRAPH1 is a part of ?GRAPH2.")
(type INSTANCE)
;+ (allowed-classes Graph)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot bottom
;+ (comment "(&%bottom ?BOTTOM ?OBJECT) holds if ?BOTTOM is the\nlowest or deepest maximal superficial part of ?OBJECT.\n")
(type INSTANCE)
;+ (allowed-classes Object)
;+ (cardinality 0 1)
;+ (subslot-of superficialPart)
(create-accessor read-write))
(single-slot PerFn
;+ (comment "&%PerFn maps two instances of &%ConstantQuantity to the &%FunctionQuantity composed of these two instances. For example, (&%PerFn (&%MeasureFn 2 (&%MicroFn &%Gram)) (&%MeasureFn 1 (&%KiloFn &%Gram))) denotes the &%FunctionQuantity of 2 micrograms per kiogram. This function is useful, because it allows the knowledge engineer to dynamically generate instances of &%FunctionQuantity.")
(type INSTANCE)
;+ (allowed-classes FunctionQuantity)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot RoomAddr
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000033):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot ShipmentInformation
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000018):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot prefers
;+ (comment "(&%prefers ?AGENT ?FORMULA1 ?FORMULA2) means that &%CognitiveAgent ?AGENT prefers the state of affairs expressed by ?FORMULA1over the state of affairs expressed by ?FORMULA2 all things being equal.")
(type INSTANCE)
;+ (allowed-classes Formula)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot forall
;+ (comment "The universal quantifier of predicate logic.")
(type INSTANCE)
;+ (allowed-classes Formula)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot TimezoneOffsetMeasure
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000046):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot lineExtensionAmountCurrency
(type SYMBOL)
;+ (allowed-parents CurrencyMeasure)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot FloorAddr
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000149):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot Description
(type INSTANCE)
;+ (allowed-classes BinaryPredicate)
;+ (value [SUMO148_00011])
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot MinuteFn
;+ (comment "A &%BinaryFunction that assigns a &%PositiveRealNumber and a subclass of &%Hours to the &%Minutes within each &%Hour corresponding to that &%PositiveRealNumber. For example, (&%MinuteFn 30 (&%HourFn 17 &%Day)) is the &%Class of all 5:30's in the afternoon. For another example, (&%MinuteFn 15 &%Hour) would return the class of all instances of quarter past the hour. For still another example, (&%MinuteFn 15 (&%HourFn 14 (&%DayFn 18 (&%MonthFn 8 (YearFn 1912))))) denotes 15 minutes after 2 PM on the 18th day of August 1912.")
(type SYMBOL)
;+ (allowed-parents Minute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot FrontFn
;+ (comment "A &%Function that maps an &%Object to the side that generally receives the most attention or that typically faces the direction in which the &%Object moves. Note that this is a partial function, since some &%Objects do not have sides, e.g. apples and spheres. Note too that the &%range of this &%Function is indefinite in much the way that &%ImmediateFutureFn and &%ImmediatePastFn are indefinite.\nAlthough this indefiniteness is undesirable from a theoretical standpoint, it does not have significant practical implications, since there is widespread intersubjective agreement about the most common cases.\n")
(type INSTANCE)
;+ (allowed-classes SelfConnectedObject)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot ToFollowActionCode
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000482):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(multislot %3AisInModule
;+ (comment ":IsInModule is a slot that attaches to both :UBL-SLOT and :UBL-CLASS.\nIt is used to organize the concepts in related groupings. Initially, the modules specified will be those of the SUMO ontology.\n we allow a concpet to be inmore than one module, but in order to reproduce the structure of a particular KIF file, only one module should be specified.")
(type INSTANCE)
;+ (allowed-classes Module)
;+ (associated-facet UBLinv018t_00322)
(create-accessor read-write))
(multislot contraryAttribute
;+ (type ANY)
(create-accessor read-write))
(single-slot exhaustiveDecomposition
;+ (comment "An &%exhaustiveDecomposition of a &%Class C is a set of subclasses of C such that every subclass of C either is an element of the set or is a subclass of an element of the set. Note: this does not necessarily mean that the elements of the set are disjoint (see &%partition - a &%partition is a disjoint exhaustive decomposition.)")
(type INSTANCE)
;+ (allowed-classes Class)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot MaximumQuantity
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000063):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot %3ADomain2Type
;+ (comment "Specifies whether the argument is an instance of the indicated class or a subclass.")
(type SYMBOL)
(allowed-values Instance Class)
;+ (cardinality 0 1)
;+ (associated-facet UBLinv018_00288)
(create-accessor read-write))
(single-slot LineExtensionAmount
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000060):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot temporallyBetweenOrEqual
;+ (comment "(&%temporallyBetweenOrEqual ?POINT1 ?POINT2 ?POINT3) means that the &%TimePoint ?POINT1 is before or equal to the &%TimePoint ?POINT2 and ?POINT2 is before or equal to the &%TimePoint ?POINT3.")
(type INSTANCE)
;+ (allowed-classes TimePoint)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot ImmediateFamilyFn
;+ (comment "(&%ImmediateFamilyFn ?PERSON) denotes the immediate family of ?PERSON, i.e. the &%Group consisting of the &%parents of ?PERSON and anyone of whom ?PERSON is a &%parent.\n")
(type INSTANCE)
;+ (allowed-classes FamilyGroup)
;+ (cardinality 0 1)
(create-accessor read-write))
(multislot hasField8
;+ (comment "hasField relates a StructuredText to the fields that comprise its structure. \nFor multiple subfield, see hasField1, hasField2, etc.")
(type INSTANCE)
;+ (allowed-classes Text-Abstract)
(cardinality 2 ?VARIABLE)
;+ (subslot-of hasField)
(create-accessor read-write))
(single-slot MinimalWeightedPathFn
;+ (comment "This &%BinaryFunction assigns two &%GraphNodes to the &%GraphPath with the smallest sum of weighted arcs between the two &%GraphNodes.")
(type INSTANCE)
;+ (allowed-classes GraphPath)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot confersRight
;+ (comment "Expresses the relationship between a &%Formula, an &%Entity, and a &%CognitiveAgent when the &%Entity authorizes the &%CognitiveAgent to bring it about that the &%Formula is true.")
(type INSTANCE)
;+ (allowed-classes Entity)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot BuyersOrderID
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000484):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot handlingTemperature
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000260):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot AdditionFn
;+ (comment "If ?NUMBER1 and ?NUMBER2 are &%Numbers, then (&%AdditionFn ?NUMBER1 ?NUMBER2) is the arithmetical sum of these numbers.")
(type INSTANCE)
;+ (allowed-classes Quantity)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot usageType
;+ (comment "usageType describes the context in which a word is used as a label for a particular concept.")
(type SYMBOL)
(allowed-values preferred slang technical deprecated)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot BeginFn
;+ (comment "A &%UnaryFunction that maps a &%TimeInterval to the &%TimePoint at which the interval begins.")
(type INSTANCE)
;+ (allowed-classes TimePoint)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot YearFn
;+ (comment "A &%UnaryFunction that maps a number to the corresponding calendar &%Year. For example, (&%YearFn 1912) returns the &%Class containing just one instance, the year of 1912. As might be expected, positive integers return years in the Common Era, while negative integers return years in B.C.E. Note that this function returns a &%Class as a value. The reason for this is that the related functions, viz. &%MonthFn, &%DayFn, &%HourFn, &%MinuteFn, and &%SecondFn, are used to generate both specific &%TimeIntervals and recurrent intervals, and the only way to do this is to make the domains and ranges of these functions classes rather than individuals.")
(type INSTANCE)
;+ (allowed-classes Year)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot FloorFn
;+ (comment "(&%FloorFn ?NUMBER) returns the largest &%Integer less than or equal to the &%RealNumber ?NUMBER.")
(type INSTANCE)
;+ (allowed-classes Integer)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot AbsoluteValueFn
;+ (comment "The value of (&%AbsoluteValueFn ?NUMBER) is the absolute value of the &%RealNumber ?NUMBER.")
(type INSTANCE)
;+ (allowed-classes NonnegativeRealNumber)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot pathLength
;+ (comment "A &%BinaryPredicate that specifies the length (in number of &%GraphNodes) of a &%GraphPath.(&%pathLength ?PATH ?NUMBER) means that there are ?NUMBER nodes in the &%GraphPath ?PATH.")
(type INSTANCE)
;+ (allowed-classes PositiveInteger)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot PaymentChannelCode
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000429):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot finishes
;+ (comment "(&%finishes ?INTERVAL1 ?INTERVAL2) means that ?INTERVAL1 and ?INTERVAL2 are both &%TimeIntervals that have the same ending &%TimePoint and that ?INTERVAL2 begins before ?INTERVAL1.")
(type INSTANCE)
;+ (allowed-classes TimeInterval)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot ExtensionFn
;+ (comment "A &%UnaryFunction that maps a &%Class into the instance of &%Attribute that specifies the condition(s) for membership in the &%Class.")
(type INSTANCE)
;+ (allowed-classes Class)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot completelyFills
;+ (comment "(&%completelyFills ?OBJ ?HOLE)\nmeans that some &%part of the &%Object ?OBJ fills the &%Hole ?HOLE.\nNote that if (&%completelyFills ?OBJ1 ?HOLE) and (&%part\n?OBJ1 ?OBJ2), then (&%completelyFills ?OBJ2 ?HOLE).\n")
(type INSTANCE)
;+ (allowed-classes Hole)
;+ (cardinality 0 1)
;+ (subslot-of partiallyFills)
(create-accessor read-write))
(single-slot CityName
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000040):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot subProposition
;+ (comment "(&%subProposition ?PROP1 ?PROP2) means that ?PROP1 is a &%Proposition which is a proper part of the &%Proposition ?PROP2. In other words, &%subProposition is the analogue of &%properPart for chunks of abstract content.")
(type INSTANCE)
;+ (allowed-classes Proposition)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot FromEventCode
(type STRING)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot grasps
;+ (comment "The state of grasping an &%Object. (&%grasps ?ANIMAL ?OBJ) means that the &%Animal ?ANIMAL is intentionally holding on to the &%Object ?OBJ.\n\n(&%meetsSpatially ?OBJ1 ?OBJ2) means that ?OBJ1 and ?OBJ2 are &%connected but that neither ?OBJ1 nor ?OBJ2 &%overlapsSpatially the other.\n\n(connected ?OBJ1 ?OBJ2) means that ?OBJ1 &%meetsSpatially ?OBJ2 or that ?OBJ1 &%overlapsSpatially ?OBJ2.")
(type INSTANCE)
;+ (allowed-classes Object)
;+ (cardinality 0 1)
;+ (subslot-of meetsSpatially)
(create-accessor read-write))
(multislot precondition
;+ (type ANY)
(create-accessor read-write))
(single-slot hole
;+ (comment "(&%hole ?HOLE ?OBJ) means that ?HOLE is a &%Hole in ?OBJ. A &%Hole is a fillable body located at the &%surface an &%Object.")
(type INSTANCE)
;+ (allowed-classes SelfConnectedObject)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot hasSchemeDataURI
;+ (comment "The URI for the data contained in the identification scheme.")
(type INSTANCE)
;+ (allowed-classes)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot connected
;+ (comment "(connected ?OBJ1 ?OBJ2) means that ?OBJ1 &%meetsSpatially ?OBJ2 or that ?OBJ1 &%overlapsSpatially ?OBJ2.")
(type INSTANCE)
;+ (allowed-classes Object)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot RegistrationAddress
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000405):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot hasDeliverySchedule
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000170):\n")
(type INSTANCE)
;+ (allowed-classes DeliveryScheduleType)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot ExemptionReasonCode
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000404):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot earlier
;+ (comment "(earlier INTERVAL1 INTERVAL2) means that INTERVAL1 ends before INTERVAL2 begins.")
(type INSTANCE)
;+ (allowed-classes TimeInterval)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot ReceivedDate
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000424):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot PricingCurrencyType
(type SYMBOL)
;+ (allowed-parents CurrencyMeasure)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot Postbox
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000030):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot CatalogueIssueDate
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000473):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot wants
;+ (comment "(&%wants ?AGENT ?OBJECT) means that ?OBJECT is desired by ?AGENT, i.e. ?AGENT believes that ?OBJECT will satisfy one of its goals. Note that there is no implication that what is wanted by an agent is not already possessed by the agent.")
(type INSTANCE)
;+ (allowed-classes Object)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot RejectReasonCode
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000247):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot brother
;+ (comment "The general relationship of being a brother. (&%brother ?MAN ?PERSON) means that ?MAN is the brother of ?PERSON.\n")
(type INSTANCE)
;+ (allowed-classes Human)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot direction
;+ (comment "(&%direction ?PROC ?ATTR) means that the &%Process ?PROC is moving in the direction ?ATTR. For example, one would use this &%Predicate to represent the fact that Max is moving &%North.")
(type INSTANCE)
;+ (allowed-classes DirectionalAttribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot immediateInstance
;+ (comment "An object is an &%immediateInstance of\na &%SetOrClass if it is an instance of the &%SetOrClass and there does not exist a\nsubclass of &%SetOrClass such that it is an instance of the subclass.\n\nAn object is an &%instance of a &%SetOrClass if it is included in that &%SetOrClass. An individual may be an instance of many classes, some of which may be subclasses of others. Thus, there is no assumption in the meaning of &%instance about specificity or uniqueness.")
(type INSTANCE)
;+ (allowed-classes SetOrClass)
;+ (cardinality 0 1)
;+ (subslot-of instance)
(create-accessor read-write))
(single-slot PeriodicalIssueFn
;+ (comment "A &%BinaryFunction that maps a subclass of &%Periodical and a number to all of the issues of the &%Periodical corresponding to the number.")
(type SYMBOL)
;+ (allowed-parents Periodical)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot RoundFn
;+ (comment "(&%RoundFn ?NUMBER) is the &%Integer closest to ?NUMBER on the number line. If ?NUMBER is halfway between two &%Integers (for example 3.5), it denotes the larger &%Integer.")
(type INSTANCE)
;+ (allowed-classes Quantity)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot hasQuantifier
;+ (comment "hasQuantifier points to the Quantifier portion of a reified PhysicalQuantity.")
(type INSTANCE)
;+ (allowed-classes Quantifier)
;+ (cardinality 1 1)
(create-accessor read-write))
(single-slot hasFormat
;+ (comment "")
(type STRING)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot representsInLanguage
;+ (comment "A very general predicate. (&%representsInLanguage ?THING ?ENTITY ?LANGUAGE) means that the &%instance of &%Physical ?THING stands for ?ENTITY in the language ?LANGUAGE.")
(type INSTANCE)
;+ (allowed-classes Entity)
;+ (cardinality 0 1)
(create-accessor read-write))
(multislot prevents
;+ (type ANY)
(create-accessor read-write))
(single-slot documentation
;+ (comment "A relation between objects in the domain of discourse and strings of natural language text. The domain of &%documentation is not constants (names), but the objects themselves. This means that one does not quote the names when associating them with their documentation.")
(type STRING)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot ShortageActionCode
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000245):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot MinimumBackorderQuantity
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000065):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot Fax
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000005):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot ExchangeMarketID
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000214):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot monetaryValue
;+ (comment "A &%BinaryPredicate that associates an &%Object with its value expressed as an instance of &%CurrencyMeasure.")
(type INSTANCE)
;+ (allowed-classes CurrencyMeasure)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot InitialNodeFn
;+ (comment "A &%UnaryFunction that maps a &%GraphArc to the initial node of the &%GraphArc. Notethat this is a partial function. In particular, the function is undefined for &%GraphArcs that are not part of a &%DirectedGraph.")
(type INSTANCE)
;+ (allowed-classes GraphNode)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot hasUBL-Identifier
;+ (comment "unique identifier for an Entity according to the UBL representation scheme.")
(type INSTANCE)
;+ (allowed-classes UBL-Identifier)
;+ (cardinality 0 1)
;+ (subslot-of ID)
(create-accessor read-write))
(single-slot representsForAgent
;+ (comment "A very general predicate. (&%representsForAgent ?THING ?ENTITY ?AGENT) means that the ?AGENT chooses to use the &%instance of &%Physical ?THING to 'stand for' ?ENTITY.")
(type INSTANCE)
;+ (allowed-classes Entity)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot TaxScheme
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000406):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot connectsEngineeringComponents
;+ (comment "&%connectsEngineeringComponents is a &%TernaryPredicate that maps from an &%EngineeringConnection to the\n&%EngineeringComponents it connects. Since &%EngineeringComponents cannot\nbe connected to themselves and there cannot be an &%EngineeringConnection\nwithout a &%connectedEngineeringComponents &%Predicate, the second and third arguments of any &%connectsEngineeringComponents relationship will always be\ndistinct for any given first argument.\n\nThe relationship between three things, when one of the three things connects the other two. More formally, (&%connects ?OBJ1 ?OBJ2 ?OBJ3) means that (&%connected ?OBJ1 ?OBJ2) and (&%connected ?OBJ1 ?OBJ3) and not (&%connected ?OBJ2 ?OBJ3).")
(type INSTANCE)
;+ (allowed-classes EngineeringComponent)
;+ (cardinality 0 1)
;+ (subslot-of connects)
(create-accessor read-write))
(single-slot time
;+ (comment "This relation holds between an instance of &%Physical and an instance of &%TimePosition just in case the temporal lifespan of the former includes the latter. The constants &%located and &%time are the basic spatial and temporal predicates, respectively.")
(type INSTANCE)
;+ (allowed-classes TimePosition)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot PenaltySurchargeRateNumeric
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000439):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot ActionCode
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000546):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot confersObligation
;+ (comment "Expresses the relationship between a a &%Formula, an &%Entity, and a &%CognitiveAgent when the &%Entity obligates the &%CognitiveAgent to bring it about that the &%Formula is true.")
(type INSTANCE)
;+ (allowed-classes Entity)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot PackSizeQuantity
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000289):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(multislot properPart
;+ (type ANY)
(create-accessor read-write))
(single-slot ancestor
;+ (comment "The transitive closure of the &%parent predicate. (&%ancestor ?DESCENDANT ?ANCESTOR) means that ?ANCESTOR is either the\n&%parent of ?DESCENDANT or the &%parent of the &%parent of &%DESCENDANT or etc.\n")
(type INSTANCE)
;+ (allowed-classes Organism)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot MeasureFn
;+ (comment "This &%BinaryFunction maps a &%RealNumber and a &%UnitOfMeasure to that &%Number of units. It is used for expressing &%ConstantQuantities. For example, the concept of three meters is represented as (&%MeasureFn 3 &%Meter).")
(type INSTANCE)
;+ (allowed-classes ConstantQuantity)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot measure
;+ (comment "A very general &%Predicate for asserting that a particular &%Object is measured by a particular &%ConstantQuantity. In general, the second argument of this &%Predicate will be an instance of the &%Function &%MeasureFn.\n UBLnote: Measures have been reified ")
(type INSTANCE)
;+ (allowed-classes PhysicalQuantity)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot hasContentName
;+ (comment "The content (name) of the Code or Identifier, a string. It may or may not be identical to the name of the instance assigned in Protege.")
(type STRING)
;+ (cardinality 1 1)
(create-accessor read-write))
(single-slot and
;+ (comment "The truth-functional connective of conjunction.")
(type INSTANCE)
;+ (allowed-classes Formula)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot IssuerPartyTypeCode
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000662):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(multislot hasField
;+ (comment "hasField relates a StructuredText to the fields that comprise its structure. \nFor multiple subfield, see hasField1, hasField2, etc.")
(type INSTANCE)
;+ (allowed-classes Text-Abstract)
(cardinality 2 ?VARIABLE)
(create-accessor read-write))
(single-slot PlacardEndorsement
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000255):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot knows
;+ (comment "The epistemic predicate of knowing. (&%knows ?AGENT ?FORMULA) means that ?AGENT knows the proposition expressed by ?FORMULA. Note that &%knows entails conscious awareness, so this &%Predicate cannot be used to express tacit or subconscious or unconscious knowledge.")
(type INSTANCE)
;+ (allowed-classes Formula)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot cat%3ALineExtensionTotalAmount
;+ (comment "UBL-element Jul 26-03 (UBL-ID=):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot TaxAmount
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000618):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot hasEncoding
;+ (comment "hasEncoding is equivalent to the UBL propery 'Binary Object. Encoding. Code'.\n")
(type INSTANCE)
;+ (allowed-classes CodeType)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot OriginCountry
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000297):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot subrelation
;+ (comment "A &%Relation R is a &%subrelation &%Relation R' if R is a &%subclass R'. This implies that every tuple of R is also a tuple of R'. Again, if R holds for some arguments arg_1, arg_2, ... arg_n, then R' holds for the same arguments. Thus, a &%Relation and its subrelation must have the same valence. In CycL, &%subrelation is called #$genlPreds.")
(type INSTANCE)
;+ (allowed-classes Relation)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot ManufacturersItemIdentification
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000293):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot LatitudeMinutesMeasure
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000339):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot LogFn
;+ (comment "(LogFn ?NUMBER ?INT) returns the logarithm of the &%RealNumber ?NUMBER in the base denoted by the &%Integer ?INT.")
(type INSTANCE)
;+ (allowed-classes RealNumber)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot minimumCardinality
;+ (comment "The smallest number of entities that can satisfy the relation.")
(type INTEGER)
;+ (cardinality 1 1)
(create-accessor read-write))
(single-slot inLanguage
;+ (comment "inLanguage relates a word -- a string of characters -- to the language in which it is a word.\nThe language may be natural or artificial -- e.g. the terms in an ontology are considered a language for this purpose.")
(type INSTANCE)
;+ (allowed-classes HumanLanguage)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot BuyersItemIdentification
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000291):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot equivalenceRelationOn
;+ (comment "A &%BinaryRelation is an &%equivalenceRelationOn a &%SetOrClass only if the relation is &%reflexiveOn the &%SetOrClass and it is both a &%TransitiveRelation and a &%SymmetricRelation.")
(type INSTANCE)
;+ (allowed-classes SetOrClass)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot E-Mail
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000006):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot CatalogueItemIdentification
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000295):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot priceAmountCurrency
(type SYMBOL)
;+ (allowed-parents CurrencyMeasure)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot MaximumMeasure
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000308):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot husband
;+ (comment "(&%husband ?MAN ?WOMAN) means that ?MAN is the husband of ?WOMAN.\n")
(type INSTANCE)
;+ (allowed-classes Woman)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot HandlingInstructions
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000015):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot distributes
;+ (comment "A &%BinaryFunction ?FUNCTION1 is distributive over another &%BinaryFunction ?FUNCTION2 just in case (?FUNCTION1 ?INST1 (?FUNCTION2 ?INST2 ?INST3)) is equal to (?FUNCTION2 (?FUNCTION1 ?INST1 ?INST2) (?FUNCTION1 ?INST1 ?INST3)), for all ?INST1, ?INST2, and ?INST3.")
(type INSTANCE)
;+ (allowed-classes BinaryFunction)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot ChipApplicationID
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000105):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot cat%3AReferencedDespatchAdvice
;+ (comment "UBL-element Jul 26-03 (UBL-ID=):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 1 1)
(create-accessor read-write))
(single-slot ListOrderFn
;+ (comment "(&%ListOrderFn ?LIST ?NUMBER) denotes the item that is in the ?NUMBER position in the &%List ?LIST. For example, (&%ListOrderFn (&%ListFn &%Monday &%Tuesday &%Wednesday) 2) would return the value &%Tuesday.")
(type INSTANCE)
;+ (allowed-classes Entity)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot cat%3AReferencedReceiptAdvice
;+ (comment "UBL-element Jul 26-03 (UBL-ID=):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot TaxCurrencyCode
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL700007):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot experiencer
;+ (comment "(&%experiencer ?PROCESS ?AGENT) means that ?AGENT experiences the &%Process ?PROCESS. For example, Yojo is the &%experiencer of seeing in the following proposition: Yojo sees the fish. Note that &%experiencer, unlike &%agent, does not entail a causal relation between its arguments.")
(type INSTANCE)
;+ (allowed-classes Agent)
;+ (cardinality 0 1)
(create-accessor read-write))
(multislot cat%3ATaxTotal
;+ (comment "UBL-element Jul 26-03 (UBL-ID=):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
(create-accessor read-write))
(single-slot radius
;+ (comment "(&%radius ?CIRCLE ?LENGTH) means that the radius of the &%Circle ?CIRCLE has a length of ?LENGTH.\n")
(type INSTANCE)
;+ (allowed-classes LengthMeasure)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot HazardousTransit
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000267):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot FlashpointMeasure
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000258):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot identityElement
;+ (comment "An object ?ID is the identity element for BinaryFunction ?FUNCTION just in case, for every instance ?INST, applying ?FUNCTION to ?INST and ?ID results in ?INST.")
(type INSTANCE)
;+ (allowed-classes Entity)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot CreditAccount
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000433):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot ImmediateFutureFn
;+ (comment "A &%UnaryFunction that maps a &%TimePosition to a short, indeterminate &%TimeInterval that immediately follows the &%TimePosition.")
(type INSTANCE)
;+ (allowed-classes TimeInterval)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot part
;+ (comment "The basic mereological relation. All other mereological relations are defined in terms of this one. (&%part ?PART ?WHOLE) simply means that the &%Object ?PART is part of the &%Object ?WHOLE. Note that, since &%part is a &%ReflexiveRelation, every &%Object is a part of itself.\n")
(type INSTANCE)
;+ (allowed-classes Object)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot HandlingCode
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000017):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot cat%3APaymentMeans
;+ (comment "UBL-element Jul 26-03 (UBL-ID=):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot ReferencedDespatchLine
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000251):\n")
(type INSTANCE)
;+ (allowed-classes DespatchLineType)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot context
(type INSTANCE)
;+ (allowed-classes Context)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot InhalationToxicityZoneCode
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000274):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot commonName
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000331):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot RelativeTimeFn
;+ (comment "A means of converting &%TimePositions between different &%TimeZones. (&%RelativeTimeFn ?TIME ?ZONE) denotes the &%TimePosition in &%CoordinatedUniversalTime that is contemporaneous with the &%TimePosition ?TIME in &%TimeZone ?ZONE. For example, (&%RelativeTimeFn (&%MeasureFn 14 &%Hour) &%EasternTimeZone) would return the value (&%MeasureFn 19 &%Hour).")
(type INSTANCE)
;+ (allowed-classes TimePosition)
;+ (cardinality 0 1)
(create-accessor read-write))
(multislot version
;+ (type ANY)
(create-accessor read-write))
(single-slot subProcess
;+ (comment "(&%subProcess ?SUBPROC ?PROC) means that ?SUBPROC is a subprocess of ?PROC. A subprocess is here understood as a temporally distinguished part (proper or not) of a &%Process.")
(type INSTANCE)
;+ (allowed-classes Process)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot DivisionFn
;+ (comment "If ?NUMBER1 and ?NUMBER2 are &%Numbers, then (&%DivisionFn ?NUMBER1 ?NUMBER2) is the result of dividing ?NUMBER1 by ?NUMBER2. An exception occurs when ?NUMBER1 = 1, in which case (&%DivisionFn ?NUMBER1 ?NUMBER2) is the reciprocal of ?NUMBER2.")
(type INSTANCE)
;+ (allowed-classes Quantity)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot SendFromAddress
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000169):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot smaller
;+ (comment "(&%smaller ?OBJ1 ?OBJ2) simply means that ?OBJ1 is smaller, with respect to all &%LengthMeasures, than ?OBJ2.")
(type INSTANCE)
;+ (allowed-classes Object)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot distance
;+ (comment "(&%distance ?OBJ1 ?OBJ2 ?QUANT) means that the shortest distance between the two objects ?OBJ1 and ?OBJ2 is ?QUANT. Note that the difference between the predicates &%length and &%distance is that the &%length is used to state the &%LengthMeasure of one of the dimensions of a single object, while &%distance is used to state the &%LengthMeasure that separates two distinct objects.")
(type INSTANCE)
;+ (allowed-classes Physical)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot TargetCurrencyCode
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000212):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot PhysicalAttribute
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000087):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot PenaltyPeriod
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000441):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot TaxTotalAmount
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL100011):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot authors
;+ (comment "(&%authors ?AGENT ?TEXT) means that ?AGENT is creatively responsible for ?TEXT. For example, Agatha Christie is author of Murder_on_the_Orient_Express.")
(type INSTANCE)
;+ (allowed-classes Text-Physical)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot CalculationRateNumeric
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000215):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot ConditionID
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000545):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot ReferencedTransportHandlingUnit
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000194):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot publishes
;+ (comment "(&%publishes ?ORG ?TEXT) means that ?ORG publishes ?TEXT. For example, Bantam Books publishes Agatha Christie's Murder_on_the_Orient_Express.")
(type INSTANCE)
;+ (allowed-classes Text-Physical)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot hasSender
;+ (comment "asSender points from a Message to the CongitiveAgent that sent the message.")
(type INSTANCE)
;+ (allowed-classes CognitiveAgent)
;+ (cardinality 1 1)
(create-accessor read-write))
(single-slot DespatchedQuantity
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000237):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot cat%3AIssueDate
;+ (comment "UBL-element Jul 26-03 (UBL-ID=):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 1 1)
(create-accessor read-write))
(single-slot TransitPeriod
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000594):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot pointOfFigure
;+ (comment "(&%pointOfFigure ?POINT ?FIGURE) means that the &%GeometricPoint ?POINT is part of the &%GeometricFigure ?FIGURE.\n")
(type INSTANCE)
;+ (allowed-classes GeometricFigure)
;+ (cardinality 0 1)
;+ (subslot-of geometricPart)
(create-accessor read-write))
(single-slot LongitudeMinutesMeasure
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000342):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot MedicalFirstAidGuideCode
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000262):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot CurrencyCode
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000053):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot cat%3AGrossVolumeMeasure
;+ (comment "UBL-element Jul 26-03 (UBL-ID=):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot TaxAmountCurrency
(type SYMBOL)
;+ (allowed-parents CurrencyMeasure)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot District
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000045):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot synonymousExternalConcept
;+ (comment "(&%synonymousExternalConcept\n?STRING ?THING ?LANGUAGE) means that the SUMO concept ?THING has the\nsame meaning as ?STRING in ?LANGUAGE.\n\nUsed to signify a three-place relation between a concept in an external knowledge source, a concept in the SUMO, and the name of the other knowledge source.")
(type INSTANCE)
;+ (allowed-classes Entity)
;+ (cardinality 0 1)
;+ (subslot-of relatedExternalConcept)
(create-accessor read-write))
(single-slot ReferencedCatalogue
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000296):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(multislot ContactLanguage
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000130):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
(cardinality 0 100)
(create-accessor read-write))
(single-slot TaxLevelCode
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000403):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot uses
;+ (comment "(&%uses ?OBJECT AGENT) means that ?OBJECT is used by ?AGENT as an instrument in an unspecified &%Process. This &%Predicate, as its corresponding axiom indicates, is a composition of the &%CaseRoles &%agent and &%instrument.")
(type INSTANCE)
;+ (allowed-classes Agent)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot inScopeOfInterest
;+ (comment "A very general &%Predicate. (&%inScopeOfInterest ?AGENT ?ENTITY) means that ?ENTITY is within the scope of interest of ?AGENT. Note that the interest indicated can be either positive or negative, i.e. the ?AGENT can have an interest in avoiding or promoting ?ENTITY.")
(type INSTANCE)
;+ (allowed-classes Entity)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot hasCategoryTotal
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000626):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot Extension
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000086):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot ToFollowReason
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000192):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot EmergencyTemperatureMeasure
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000259):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot %3ADomain4Type
;+ (comment "The type of the fifth argument, class or instance.")
(type SYMBOL)
(allowed-values Class Instance)
;+ (cardinality 0 1)
;+ (associated-facet UBLinv018t_00306)
(create-accessor read-write))
(single-slot KappaFn
;+ (comment "A class-forming operator that takes two arguments: a variable and a formula containing at least one unbound occurrence of the variable. The result of applying &%KappaFn to a variable and a formula is the &%SetOrClass of things that satisfy the formula. For example, we can denote the &%SetOrClass of prime numbers that are less than 100 with the following expression: (KappaFn ?NUMBER (and (instance ?NUMBER PrimeNumber) (lessThan ?NUMBER 100))). Note that the use of this function is discouraged, since there is currently no axiomatic support for it.")
(type INSTANCE)
;+ (allowed-classes Class)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot PositionCode
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000449):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot FromCatalogIndicator
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000290):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot PaymentDueDate
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000428):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot TeraFn
;+ (comment "A &%UnaryFunction that maps a &%UnitOfMeasure into a &%UnitOfMeasure that is equal to 1,000,000,000,000 units of the original &%UnitOfMeasure. For example, (&%TeraFn &%Hertz) is 1,000,000,000,000 &%Hertz.")
(type INSTANCE)
;+ (allowed-classes UnitOfMeasure)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot LineExtensionTotalAmount
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000334):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot cat%3ABuyerParty
;+ (comment "UBL-element Jul 26-03 (UBL-ID=):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 1 1)
(create-accessor read-write))
(single-slot MaximumAmount
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000076):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot independentProbability
;+ (comment "One of the basic &%ProbabilityRelations. (&%independentProbability ?FORMULA1 ?FORMULA2) means that the probabilities of ?FORMULA1 and ?FORMULA2 being true are independent.")
(type INSTANCE)
;+ (allowed-classes Formula)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot Department
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000039):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot partition
;+ (comment "A &%partition of a class C is a set of mutually &%disjoint classes (a subclass partition) which covers C. Every instance of C is an instance of exactly one of the subclasses \nin the partition.")
(type INSTANCE)
;+ (allowed-classes Class)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot HourFn
;+ (comment "A &%BinaryFunction that assigns a &%PositiveRealNumber and a subclass of &%Days to the &%Hours within each &%Day corresponding to that &%PositiveRealNumber. For example, (&%HourFn 12 &%Thursday) is the &%Class of all instances of noon Thursday. For another example, (&%HourFn 24 &%Day) would return the class of all instances of midnight. For still another example, (&%HourFn 14 (&%DayFn 18 (&%MonthFn 8 (YearFn 1912)))) denotes 2 PM on the 18th day of August 1912.")
(type SYMBOL)
;+ (allowed-parents Hour)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot resource
;+ (comment "(&%patient ?PROCESS ?ENTITY) means that ?ENTITY is a participant in ?PROCESS that may be moved, said, experienced, etc. For example, the direct objects in the sentences 'The cat swallowed the canary' and 'Billy likes the beer' would be examples of &%patients. Note that the &%patient of a &%Process may or may not undergo structural change as a result of the &%Process. The &%CaseRole of &%patient is used when one wants to specify as broadly as possible the object of a &%Process.")
(type INSTANCE)
;+ (allowed-classes Object)
;+ (cardinality 0 1)
;+ (subslot-of patient)
(create-accessor read-write))
(single-slot WealthFn
;+ (comment "A &%UnaryFunction that maps an &%Agent to a &%CurrencyMeasure specifying the value of the property owned by the &%Agent. Note that this &%Function is generally used in conjunction with the &%Function &%PropertyFn, e.g. (&%WealthFn (&%PropertyFn BillGates)) would return the monetary value of the sum of Bill Gates' holdings.")
(type INSTANCE)
;+ (allowed-classes CurrencyMeasure)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot parent
;+ (comment "The general relationship of parenthood. (&%parent ?CHILD ?PARENT) means that ?PARENT is a biological parent of ?CHILD.")
(type INSTANCE)
;+ (allowed-classes Organism)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot ToFollowReasonHU
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000239):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot ShortQuantity
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000244):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot %3ALOAD-SEQUENCE
;+ (comment "LOAD-SEQUENCE is a convenience slot which specifies the sequence in which a logically related block of predicates (or an axiom) was loaded from the input KIF-format file. The sole function is to allow recreation of the original sequence of statements for the convenience of the ontologist. A value of 0 is default for newly created concepts.")
(type INTEGER)
(range 0 %3FVARIABLE)
(default 0)
;+ (cardinality 1 1)
;+ (associated-facet UBLinv019_00333)
(create-accessor read-write))
(single-slot realization
;+ (comment "A subrelation of &%represents.\n(&%realization ?PROCESS ?PROP) means that ?PROCESS is a Process which expresses the content of ?PROP. Examples include a particular musical\nperformance, which realizes the content of a musical score, or the reading of a poem.\n")
(type INSTANCE)
;+ (allowed-classes Proposition)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot PackingCriteriaCode
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000270):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot identifiesLanguage
;+ (comment "points to the actual human language represented by this LanguageIdentifier.")
(type INSTANCE)
;+ (allowed-classes NaturalLanguage)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot LatitudeDirectionCode
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000340):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot LongitudeDegreesMeasure
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000341):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot lessThanOrEqualTo
;+ (comment "(&%lessThanOrEqualTo ?NUMBER1 ?NUMBER2) is true just in case the &%Quantity ?NUMBER1 is less than or equal to the &%Quantity ?NUMBER2.")
(type INSTANCE)
;+ (allowed-classes Quantity)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot overlapsPartially
;+ (comment "(&%overlapsPartially ?OBJ1 ?OBJ2) means that ?OBJ1 and ?OBJ2 have part(s) in common, but neither ?OBJ1 nor ?OBJ2 is a &%part of the other.\n\n(&%overlapsSpatially ?OBJ1 ?OBJ2) means that the &%Objects ?OBJ1 and ?OBJ2 have some parts in common. This is a reflexive and symmetric (but not transitive) relation.\n\n(connected ?OBJ1 ?OBJ2) means that ?OBJ1 &%meetsSpatially ?OBJ2 or that ?OBJ1 &%overlapsSpatially ?OBJ2.")
(type INSTANCE)
;+ (allowed-classes Object)
;+ (cardinality 0 1)
;+ (subslot-of overlapsSpatially)
(create-accessor read-write))
(single-slot altitude
;+ (comment "A &%TernaryPredicate that is used to state the &%distance between the &%top of an &%Object and another point that is below the &%top of the &%Object (often this other point will be sea level). Note that this &%Predicate can be used to specify, for example, the height of geographic features, e.g. mountains, the altitude of aircraft, and the orbit of satellites around the Earth.\n\n(&%distance ?OBJ1 ?OBJ2 ?QUANT) means that the shortest distance between the two objects ?OBJ1 and ?OBJ2 is ?QUANT. Note that the difference between the predicates &%length and &%distance is that the &%length is used to state the &%LengthMeasure of one of the dimensions of a single object, while &%distance is used to state the &%LengthMeasure that separates two distinct objects.")
(type INSTANCE)
;+ (allowed-classes Physical)
;+ (cardinality 0 1)
;+ (subslot-of distance)
(create-accessor read-write))
(single-slot RatePercentNumeric
(type INSTANCE)
;+ (allowed-classes Percent)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot hasFilename
;+ (comment "The file name that is attached to the binary encoded object.")
(type STRING)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot causes
;+ (comment "The causation relation between instances of &%Process. (&%causes ?PROCESS1 ?PROCESS2) means that the instance of &%Process ?PROCESS1 brings about the instance of &%Process ?PROCESS2, e.g. (&%causes &%Killing &%Death).")
(type INSTANCE)
;+ (allowed-classes Process)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot employs
;+ (comment "(&%employs ?ORG ?PERSON) means that ?ORG has hired ?PERSON and currently retains ?PERSON, on a salaried or contractual basis, to provide services in exchange for monetary compensation.")
(type INSTANCE)
;+ (allowed-classes CognitiveAgent)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot element
;+ (comment "(element ?ENTITY ?SET) is true just in case ?ENTITY is contained in the &%Set ?SET. An &%Entity can be an &%element of another &%Entity only if the latter is a &%Set.")
(type INSTANCE)
;+ (allowed-classes Set)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot AllowanceCharge
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000069):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot conditionalProbability
;+ (comment "One of the basic &%ProbabilityRelations. &%conditionalProbability is used to state the numeric value of a conditional probability. (&%conditionalProbability ?FORMULA1 ?FORMULA2 ?NUMBER) means that the probability of ?FORMULA2 being true given that ?FORMULA1 is true is ?NUMBER.")
(type INSTANCE)
;+ (allowed-classes Formula)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot hasCodeListVersionID
;+ (comment "The Version of the Code List used.")
(type INSTANCE)
;+ (allowed-classes UBL-Identifier)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot NetNetWeightMeasure
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000021):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot cat%3ADestinationCountry
;+ (comment "UBL-element Jul 26-03 (UBL-ID=):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot names
;+ (comment "(&%names ?STRING ?ENTITY) means that the thing ?ENTITY\nhas the &%SymbolicString ?STRING as its name. Note that &%names and &%represents are the two immediate &%subrelations of &%refers. The predicate &%names is used when the referring item is merely a tag without connotative content, while the predicate &%represents is used for referring items that have such content.\n\n(&%refers ?OBJ1 ?OBJ2) means that ?OBJ1 mentions or includes a reference to ?OBJ2. Note that &%refers is more general in meaning than &%represents, because presumably something can represent something else only if it refers to this other thing. For example, an article whose topic is a recent change in the price of oil may refer to many other things, e.g. the general state of the economy, the weather in California, the prospect of global warming, the options for alternative energy sources, the stock prices of various oil companies, etc.")
(type INSTANCE)
;+ (allowed-classes Entity)
;+ (cardinality 0 1)
;+ (subslot-of refers)
(create-accessor read-write))
(single-slot result
;+ (comment "(result ?ACTION ?OUTPUT) means that ?OUTPUT is a product of ?ACTION. For example, house is a &%result in the following proposition: Eric built a house.\n\n\n(&%patient ?PROCESS ?ENTITY) means that ?ENTITY is a participant in ?PROCESS that may be moved, said, experienced, etc. For example, the direct objects in the sentences 'The cat swallowed the canary' and 'Billy likes the beer' would be examples of &%patients. Note that the &%patient of a &%Process may or may not undergo structural change as a result of the &%Process. The &%CaseRole of &%patient is used when one wants to specify as broadly as possible the object of a &%Process.")
(type INSTANCE)
;+ (allowed-classes Entity)
;+ (cardinality 0 1)
;+ (subslot-of patient)
(create-accessor read-write))
(single-slot MinimumMeasure
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000307):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot height
;+ (comment "The height of an &%Object is the distance between its &%top and its &%bottom.\n\n&%BinaryPredicate that is used to state the measure of an &%Object from one point to another point along its surface. Note that the difference between the predicates &%length and &%distance is that the &%length is used to state the &%LengthMeasure of one of the dimensions of a single object, while &%distance is used to state the &%LengthMeasure that separates two distinct objects.")
(type INSTANCE)
;+ (allowed-classes LengthMeasure)
;+ (cardinality 0 1)
;+ (subslot-of length)
(create-accessor read-write))
(single-slot TransportMeansTypeCode
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000592):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot temporalPart
;+ (comment "The temporal analogue of the spatial &%part predicate. (&%temporalPart ?POS1 ?POS2) means that &%TimePosition ?POS1 is part of &%TimePosition ?POS2. Note that since &%temporalPart is a &%ReflexiveRelation every &%TimePostion is a &%temporalPart of itself.")
(type INSTANCE)
;+ (allowed-classes TimePosition)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot MultiplierReasonCode
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000051):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot successorAttributeClosure
;+ (comment "The transitive closure of &%successorAttribute. (&%successorAttributeClosure ?ATTR1 ?ATTR2) means that there is a chain of &%successorAttribute assertions connecting ?ATTR1 and ?ATTR2.")
(type INSTANCE)
;+ (allowed-classes Attribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot SubtractionFn
;+ (comment "If ?NUMBER1 and ?NUMBER2 are &%Numbers, then (&%SubtractionFn ?NUMBER1 ?NUMBER2) is the arithmetical difference between ?NUMBER1 and ?NUMBER2, i.e. ?NUMBER1 minus ?NUMBER2. An exception occurs when ?NUMBER1 is equal to 0, in which case (&%SubtractionFn ?NUMBER1 ?NUMBER2) is the negation of ?NUMBER2.")
(type INSTANCE)
;+ (allowed-classes Quantity)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot subAttribute
;+ (comment "Means that the second argument can be ascribed to everything which has the first argument ascribed to it.")
(type INSTANCE)
;+ (allowed-classes Attribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot ContactParty
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000265):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot contains
;+ (comment "The relation of spatial containment for two separable objects. When the two objects are not separable (e.g. an\nautomobile and one of its seats), the relation of &%part should be used.\n(&%contains ?OBJ1 ?OBJ2) means that the &%SelfConnectedObject ?OBJ1 has\na space (i.e. a &%Hole) which is at least partially filled by ?OBJ2.\n")
(type INSTANCE)
;+ (allowed-classes Object)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot toBePaidPriceTotalAmountCurrency
(type SYMBOL)
;+ (allowed-parents CurrencyMeasure)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot Name
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000003):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot cat%3AReferencedOrder
;+ (comment "UBL-element Jul 26-03 (UBL-ID=):\n")
(type INSTANCE)
;+ (allowed-classes OrderType)
;+ (cardinality 1 1)
(create-accessor read-write))
(single-slot subList
;+ (comment "(&%subList ?LIST1 ?LIST2) means that ?LIST1 is a sublist of ?LIST2, i.e. every element of ?LIST1 is an element of ?LIST2 and the elements that are common to both &%Lists have the same order in both &%Lists.")
(type INSTANCE)
;+ (allowed-classes List)
;+ (cardinality 0 1)
(create-accessor read-write))
(multislot hasField6
;+ (comment "hasField relates a StructuredText to the fields that comprise its structure. \nFor multiple subfield, see hasField1, hasField2, etc.")
(type INSTANCE)
;+ (allowed-classes Text-Abstract)
(cardinality 2 ?VARIABLE)
;+ (subslot-of hasField)
(create-accessor read-write))
(single-slot domainSubclass
;+ (comment "&%Predicate used to specify argument type restrictions of &%Predicates. The formula (&%domainSubclass ?REL ?INT ?CLASS) means that the ?INT'th element of each tuple in the relation ?REL must be a subclass of ?CLASS.")
(type INSTANCE)
;+ (allowed-classes PositiveInteger)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot diameter
;+ (comment "&%BinaryPredicate that is used to state the measure of a circular &%Object from side to side.\n")
(type INSTANCE)
;+ (allowed-classes LengthMeasure)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot agent
;+ (comment "(&%agent ?PROCESS ?AGENT) means that ?AGENT is an active determinant, either animate or inanimate, of the &%Process ?PROCESS, with or without voluntary intention. For example, water is the &%agent of erosion in the following proposition: the water eroded the coastline. For another example, Eve is an &%agent in the following proposition: Eve bit an apple.")
(type INSTANCE)
;+ (allowed-classes Agent)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot hasCodeListAgencyID
;+ (comment "The ID for the agency that maintains the code.\nDefaults to the UN/EDIFACT data element 3055 code list.")
(type INSTANCE)
;+ (allowed-classes UBL-Identifier)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot ItemMeasurement
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000088):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot SettlementPeriod
(type INSTANCE)
;+ (allowed-classes TimeDuration)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot interiorPart
;+ (comment "(&%interiorPart ?OBJ1 ?OBJ2) means\nthat ?OBJ1 is part ?OBJ2 and there is no overlap between ?OBJ1 and any &%superficialPart ?OBJ2.\n")
(type INSTANCE)
;+ (allowed-classes Object)
;+ (cardinality 0 1)
;+ (subslot-of part)
(create-accessor read-write))
(single-slot PaidAmount
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000423):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot recurrentTimeIntervalFn
;+ (comment "A function that is useful for generating recurring timeintervals.\nFor example, (&%recurrentTimeIntervalFn (&%hourFn 6 &%Day) (&%hourFn 12 &%Day) ) returns the class of TimeIntervals beginning at 6 in the morning and endingat 12 noon. For example, (&%recurrentTimeIntervalFn (&%Saturday) (&%Sunday) ) returns the class of all weekends.")
(type SYMBOL)
;+ (allowed-parents TimeInterval)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot StartDateTimeDate
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000585):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot hasCharset
;+ (comment "The character set name in which the binary object is encoded.")
(type STRING)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot MaximalWeightedPathFn
;+ (comment "This &%BinaryFunction assigns two &%GraphNodes to the &%GraphPath with the largest sum of weighted arcs between the two &%GraphNodes.")
(type INSTANCE)
;+ (allowed-classes GraphPath)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot AdditionalInformation
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000256):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot OrderedShipment
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000390):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot RejectedQuantity
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000246):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot geopoliticalSubdivision
;+ (comment "(&%geopoliticalSubdivision ?AREA1 ?AREA2) means that ?AREA1 is any geopolitical part of ?AREA2; that is, ?AREA1 is an integral &%geographicSubregion of ?AREA2 (not a &%DependencyOrSpecialSovereigntyArea), having its own associated\n&%GovernmentOrganization which is subordinated to or constrained by the government of ?AREA2. Cf. &%dependentGeopoliticalArea.\n")
(type INSTANCE)
;+ (allowed-classes GeopoliticalArea)
;+ (cardinality 0 1)
(create-accessor read-write))
(multislot hasLineItem
;+ (comment "This is a specialization of hasField.\nWhere is it in UBL???")
(type INSTANCE)
;+ (allowed-classes LineItem)
(cardinality 1 ?VARIABLE)
(create-accessor read-write))
(single-slot tangent
;+ (comment "(&%tangent ?LINE ?CIRCLE) means that the straight line ?LINE is tangent to the &%Circle ?CIRCLE, i.e. ?LINE touches ?CIRCLE without intersecting it.\n")
(type INSTANCE)
;+ (allowed-classes Circle)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot inverse
;+ (comment "The inverse of a &%BinaryRelation is a relation in which all the tuples of the original relation are reversed. In other words, one &%BinaryRelation is the inverse of another if they are equivalent when their arguments are swapped.")
(type INSTANCE)
;+ (allowed-classes BinaryRelation)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot ReferencedOrderLine
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000279):\n")
(type INSTANCE)
;+ (allowed-classes OrderLineType)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot hasRecipient
;+ (comment "hasRecipien points from a Message to an intended recipient, which may not actually eb the person who gets the message.")
(type INSTANCE)
;+ (allowed-classes CognitiveAgent)
;+ (cardinality 1 1)
(create-accessor read-write))
(single-slot usesCodeList
;+ (comment "usesCodeList relates a string using some code list to the code list it uses. The reference is to the code list and version number.")
(type INSTANCE)
;+ (allowed-classes CodeListVersionID)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot SpeedFn
(type INSTANCE)
;+ (allowed-classes TimeDuration)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot BuyersID
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000059):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot BaseQuantity
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000073):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot ChipIndicator
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000104):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot cat%3ASalesConditions
;+ (comment "UBL-element Jul 26-03 (UBL-ID=):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot beforeOrEqual
;+ (comment "(&%beforeOrEqual ?POINT1 ?POINT2) means that ?POINT1 is identical with ?POINT2 or occurs before it on the universal timeline.")
(type INSTANCE)
;+ (allowed-classes TimePoint)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot PremisesFn
;+ (comment "(&%PremisesFn ?ARGUMENT) returns the complete set of &%premises of the &%Argument ?ARGUMENT.\n")
(type INSTANCE)
;+ (allowed-classes Proposition)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot BuyerContact
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000095):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot geographicSubregion
;+ (comment "(&%geographicSubregion ?PART ?WHOLE) means that the &%GeographicArea ?PART is part of the &%GeographicArea ?WHOLE.\n")
(type INSTANCE)
;+ (allowed-classes GeographicArea)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot geometricDistance
;+ (comment "(&%geometricDistance ?POINT1 ?POINT2 ?LENGTH) means that ?LENGTH is the distance between the two &%GeometricPoints ?POINT1 and ?POINT2.\n")
(type INSTANCE)
;+ (allowed-classes GeometricPoint)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot subOrganization
;+ (comment "(&%subOrganization ?ORG1 ?ORG2) means that ?ORG1 is an &%Organization which is a proper part of the &%Organization ?ORG2.\n")
(type INSTANCE)
;+ (allowed-classes Organization)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot sister
;+ (comment "The general relationship of being a sister. (&%sister ?WOMAN ?PERSON) means that ?WOMAN is the sister of ?PERSON.\n")
(type INSTANCE)
;+ (allowed-classes Human)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot JurisdictionAddress
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000622):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot ID
;+ (comment "unique identifier")
(type STRING)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot hasPurpose
;+ (comment "This &%Predicate expresses the concept of a conventional goal, i.e. a goal with a neutralized agent's intention. Accordingly, (&%hasPurpose ?THING ?FORMULA) means that the instance of &%Physical ?THING has, as its purpose, the &%Proposition expressed by ?FORMULA. Note that there is an important difference in meaning between the &%Predicates &%hasPurpose and &%result. Although the second argument of the latter can satisfy the second argument of the former, a conventional goal is an expected and desired outcome, while a result may be neither expected nor desired. For example, a machine process may have outcomes but no goals, aimless wandering may have an outcome but no goal; a learning process may have goals with no outcomes, and so on.")
(type INSTANCE)
;+ (allowed-classes Formula)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot AttributeID
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000304):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot patient
;+ (comment "(&%patient ?PROCESS ?ENTITY) means that ?ENTITY is a participant in ?PROCESS that may be moved, said, experienced, etc. For example, the direct objects in the sentences 'The cat swallowed the canary' and 'Billy likes the beer' would be examples of &%patients. Note that the &%patient of a &%Process may or may not undergo structural change as a result of the &%Process. The &%CaseRole of &%patient is used when one wants to specify as broadly as possible the object of a &%Process.")
(type INSTANCE)
;+ (allowed-classes Entity)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot PaymentMeans
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000057):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot LongitudeDirectionCode
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000343):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot daughter
;+ (comment "The general relationship of daughterhood. (&%daughter ?CHILD ?PARENT) means that ?CHILD is the biological daughter of ?PARENT.\n\nThe general relationship of parenthood. (&%parent ?CHILD ?PARENT) means that ?PARENT is a biological parent of ?CHILD.")
(type INSTANCE)
;+ (allowed-classes Organism)
;+ (cardinality 0 1)
;+ (subslot-of parent)
(create-accessor read-write))
(single-slot cat%3ADeliveryTerms
;+ (comment "UBL-element Jul 26-03 (UBL-ID=):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot PredecessorFn
;+ (comment "A &%UnaryFunction that maps an &%Integer to its predecessor, e.g. the predecessor of 5 is 4.")
(type INSTANCE)
;+ (allowed-classes Integer)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot path
;+ (comment "(&%path ?MOTION ?PATH) means that ?PATH is a route along which ?MOTION occurs. For example, Highway 101 is the path in the following proposition: the car drove up Highway 101.")
(type INSTANCE)
;+ (allowed-classes Region)
;+ (cardinality 0 1)
(create-accessor read-write))
(multislot definition
(type STRING)
(create-accessor read-write))
(single-slot %3ADomain3Value
;+ (comment "The instance value for the fourth argument of a higher-arity slot.\nIt is an instance of :Domain3Class")
(type INSTANCE)
;+ (allowed-classes Entity)
;+ (cardinality 0 1)
;+ (associated-facet SUMO152_00102)
(create-accessor read-write))
(single-slot InvoiceCurrencyType
(type SYMBOL)
;+ (allowed-parents CurrencyMeasure)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot EmergencyProceduresCode
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000261):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot DestinationParty
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000387):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot RegionAddr
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000044):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot maximumCardinality
;+ (comment "The largest number of entities that can serve as values for the last argument of the relation.")
(type INTEGER)
;+ (cardinality 1 1)
(create-accessor read-write))
(single-slot SettlementDiscountRateNumeric
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000438):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot links
;+ (comment "a &%TernaryPredicate that specifies the &%GraphArc connecting two &%GraphNodes.")
(type INSTANCE)
;+ (allowed-classes GraphNode)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot ProbabilityFn
;+ (comment "One of the basic &%ProbabilityRelations, &%ProbabilityFn is used to state the a priori probability of a state of affairs. (&%ProbabilityFn ?FORMULA) denotes the a priori probability of ?FORMULA.\n")
(type INSTANCE)
;+ (allowed-classes RealNumber)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot ToFollowQuantityHU
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000238):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot SequenceValueNumeric
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000055):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot manner
;+ (comment "(&%manner ?PROCESS ?MANNER) means that the &%Process ?PROCESS is qualified by the &%Attribute ?MANNER. The &%Attributes of &%Processes are usually denoted by adverbs and include things like the\nspeed of the wind, the style of a dance, or the intensity of a sports competition.\n")
(type INSTANCE)
;+ (allowed-classes Attribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot entails
;+ (comment "The operator of logical entailment. (&%entails ?FORMULA1 ?FORMULA2) means that ?FORMULA2 can be derived from ?FORMULA1 by means of the proof theory of SUO-KIF.")
(type INSTANCE)
;+ (allowed-classes Formula)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot TaxableAmount
(type FLOAT)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot ChargeIndicator
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000050):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot SourceCurrencyBaseAmount
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000211):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot overlapsSpatially
;+ (comment "(&%overlapsSpatially ?OBJ1 ?OBJ2) means that the &%Objects ?OBJ1 and ?OBJ2 have some parts in common. This is a reflexive and symmetric (but not transitive) relation.\n\n(connected ?OBJ1 ?OBJ2) means that ?OBJ1 &%meetsSpatially ?OBJ2 or that ?OBJ1 &%overlapsSpatially ?OBJ2.")
(type INSTANCE)
;+ (allowed-classes Object)
;+ (cardinality 0 1)
;+ (subslot-of connected)
(create-accessor read-write))
(single-slot MaximumTransportTemperatureMeasure
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000272):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot greaterThanOrEqualTo
;+ (comment "(&%greaterThanOrEqualTo ?NUMBER1 ?NUMBER2) is true just in case the &%Quantity ?NUMBER1 is greater than the &%Quantity ?NUMBER2.")
(type INSTANCE)
;+ (allowed-classes Quantity)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot ReturnableMaterialIndicator
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000010):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot exploits
;+ (comment "(&%exploits ?OBJ ?AGENT) means that ?OBJ is used by ?AGENT as a &%resource in an unspecified instance of &%Process. This &%Predicate, as its corresponding axiom indicates, is a composition of the relations &%agent and &%resource.\n")
(type INSTANCE)
;+ (allowed-classes Agent)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot penetrates
;+ (comment "(penetrates ?OBJ1 ?OBJ2) means that\n?OBJ1 is &%connected to ?OBJ2 along at least one whole dimension (length,\nwidth or depth).\n\n(&%traverses ?OBJ1 ?OBJ2) means that ?OBJ1 crosses or extends across ?OBJ2. Note that &%crosses and &%penetrates are subrelations of &%traverses.")
(type INSTANCE)
;+ (allowed-classes Object)
;+ (cardinality 0 1)
;+ (subslot-of traverses)
(create-accessor read-write))
(single-slot LocaleCode
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000332):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot hasURI
;+ (comment "The URI (if any) for the file containing the binary object.")
(type INSTANCE)
;+ (allowed-classes URI)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot TransportEquipmentMeasurement
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000651):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot PrincipalHostFn
;+ (comment "A &%UnaryFunction that maps a &%Hole to the &%Object which is its principal host. The principle host of a &%Hole is its maximally connected host (a notion taken here to be defined only when the argument is a hole).")
(type INSTANCE)
;+ (allowed-classes Object)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot mechanism
(type INSTANCE)
;+ (allowed-classes Process)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot DepartmentAddr
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000320):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot totalOrderingOn
;+ (comment "A &%BinaryRelation ?REL is a total ordering on a &%SetOrClass only if it is a partial ordering for which either (?REL ?INST1 ?INST2) or (?REL ?INST2 ?INST1) for every ?INST1 and ?INST2 in the &%SetOrClass.")
(type INSTANCE)
;+ (allowed-classes SetOrClass)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot needs
;+ (comment "(&%needs ?AGENT ?OBJECT) means that ?OBJECT is physically required for the continued existence of ?AGENT.")
(type INSTANCE)
;+ (allowed-classes Object)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot MultiplicationFn
;+ (comment "If ?NUMBER1 and ?NUMBER2 are &%Numbers, then (&%MultiplicationFn ?NUMBER1 ?NUMBER2) is the arithmetical product of these numbers.")
(type INSTANCE)
;+ (allowed-classes Quantity)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot spouse
;+ (comment "The relationship of marriage between two humans.")
(type INSTANCE)
;+ (allowed-classes Human)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot RateCategoryCodeID
;+ (comment "???")
(type STRING)
;+ (cardinality 0 1)
(create-accessor read-write))
(multislot exhaustiveAttribute
;+ (type ANY)
(create-accessor read-write))
(single-slot RemainderFn
;+ (comment "(RemainderFn ?NUMBER ?DIVISOR) is the remainder of the number ?NUMBER divided by the number ?DIVISOR. The result has the same sign as ?DIVISOR.")
(type INSTANCE)
;+ (allowed-classes Quantity)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot or
;+ (comment "The truth-functional connective of disjunction.")
(type INSTANCE)
;+ (allowed-classes Formula)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot PromisedByDate
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000178):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(multislot child-of
(type STRING)
(create-accessor read-write))
(single-slot Cv2
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000103):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot IssueDate
(type INSTANCE)
;+ (allowed-classes TimePosition)
;+ (cardinality 1 1)
(create-accessor read-write))
(single-slot LineID
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000188):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot initialList
;+ (comment "(&%initialList ?LIST1 ?LIST2) means that ?LIST1 is a &%subList of ?LIST2 and (&%ListOrderFn ?LIST1 ?NUMBER) returns the same\nvalue as (&%ListOrderFn ?LIST2 ?NUMBER) for all of the values of ?NUMBER over which (&%ListOrderFn ?LIST1 ?NUMBER) is defined.\n\n(&%subList ?LIST1 ?LIST2) means that ?LIST1 is a sublist of ?LIST2, i.e. every element of ?LIST1 is an element of ?LIST2 and the elements that are common to both &%Lists have the same order in both &%Lists.")
(type INSTANCE)
;+ (allowed-classes List)
;+ (cardinality 0 1)
;+ (subslot-of subList)
(create-accessor read-write))
(single-slot TransportEquipmentSeal
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000652):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot SalesConditions
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000299):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot NanoFn
;+ (comment "A &%UnaryFunction that maps a &%UnitOfMeasure into a &%UnitOfMeasure that is equal to .000000001 units of the original &%UnitOfMeasure. For example, (&%MicroFn &%SecondDuration) is .000000001 &%SecondDurations.")
(type INSTANCE)
;+ (allowed-classes UnitOfMeasure)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot CompanyRegistrationID
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000402):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(multislot attribute
;+ (comment "(&%attribute ?OBJECT ?PROPERTY) means that ?PROPERTY is a &%Attribute of ?OBJECT. For example, (&%attribute &%MyLittleRedWagon &%Red).\n")
(type INSTANCE)
;+ (allowed-classes Attribute)
(create-accessor read-write))
(single-slot EndNodeFn
;+ (comment "A &%UnaryFunction that maps a &%GraphPath to the &%GraphNode that is the end of the &%GraphPath. Note that, unlike &%TerminalNodeFn (which relates a &%GraphArc to a &%GraphNode), &%EndNodeFn is a total function - every &%GraphPath has a end.")
(type INSTANCE)
;+ (allowed-classes GraphNode)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot angleOfFigure
;+ (comment "(&%angleOfFigure ?ANGLE ?FIGURE) means that the &%TwoDimensionalAngle ?ANGLE is part of the &%GeometricFigure ?FIGURE.\n")
(type INSTANCE)
;+ (allowed-classes GeometricFigure)
;+ (cardinality 0 1)
;+ (subslot-of geometricPart)
(create-accessor read-write))
(single-slot CardHolder
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000106):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot SecondFn
;+ (comment "A &%BinaryFunction that assigns a &%PositiveRealNumber and a subclass of &%Minutes to the &%Seconds within each &%Minute corresponding to that &%PositiveRealNumber. For example, (&%SecondFn 4 (&%MinuteFn 5 &%Hour)) is the &%Class of all fourth &%Seconds of every fifth &%Minute of every hour. For another example, (&%SecondFn 8 &%Minute) would return the eighth second of every minute. For still another example, (&%SecondFn 9 (&%MinuteFn 15 (&%HourFn 14 (&%DayFn 18 (&%MonthFn 8 (YearFn 1912)))))) denotes 9 seconds and 15 minutes after 2 PM on the 18th day of August 1912.")
(type SYMBOL)
;+ (allowed-parents Second)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot starts
;+ (comment "(&%starts ?INTERVAL1 ?INTERVAL2) means that ?INTERVAL1 and ?INTERVAL2 are both &%TimeIntervals that have the same initial &%TimePoint and that ?INTERVAL1 ends before ?INTERVAL2.")
(type INSTANCE)
;+ (allowed-classes TimeInterval)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot PropertyFn
;+ (comment "A &%UnaryFunction that maps an &%Agent to the &%Set of &%Property owned by the &%Agent.")
(type INSTANCE)
;+ (allowed-classes Set)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot origin
;+ (comment "(&%origin ?PROCESS ?SOURCE) means that ?SOURCE indicates where the ?Process began. Note that this relation implies that ?SOURCE is present at the beginning of the process, but need not participate throughout the process. For example, the submarine is the &%origin in the following proposition: the missile was launched from a submarine.")
(type INSTANCE)
;+ (allowed-classes Object)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot MinimumAmount
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000077):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot IssueNumberCode
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000102):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot during
;+ (comment "(&%during ?INTERVAL1 ?INTERVAL2) means that ?INTERVAL1 starts after and ends before ?INTERVAL2.\n")
(type INSTANCE)
;+ (allowed-classes TimeInterval)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot subclass
;+ (comment "(&%subclass ?CLASS1 ?CLASS2) means that ?CLASS1 is a subclass of ?CLASS2, i.e. every instance of ?CLASS1 is also an instance of ?CLASS2. A class may have multiple superclasses and subclasses.")
(type INSTANCE)
;+ (allowed-classes SetOrClass)
;+ (cardinality 1 1)
(create-accessor read-write))
(single-slot %3ADomain2Value
;+ (comment "The instance value for the third argument of a higher-arity relation. It is an instance of :Domain2Class.")
(type INSTANCE)
;+ (allowed-classes Entity)
;+ (cardinality 0 1)
;+ (associated-facet SUMO152_00100)
(create-accessor read-write))
(single-slot TaxCharge
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000056):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot Tax
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000301):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot RequestedDeliveryDate
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000177):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot RealNumberFn
;+ (comment "(RealNumberFn ?NUMBER) returns the part of ?NUMBER that is a &%RealNumber.")
(type INSTANCE)
;+ (allowed-classes RealNumber)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot GigaFn
;+ (comment "A &%UnaryFunction that maps a &%UnitOfMeasure into a &%UnitOfMeasure that is equal to 1,000,000,000 units of the original &%UnitOfMeasure. For example, (&%GigaFn &%Hertz) is 1,000,000,000 &%Hertz.")
(type INSTANCE)
;+ (allowed-classes UnitOfMeasure)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot MereologicalDifferenceFn
;+ (comment "(&%MereologicalDifferenceFn ?OBJ1 ?OBJ2) denotes the &%Object consisting of the parts which belong to ?OBJ1 and not to ?OBJ2.")
(type INSTANCE)
;+ (allowed-classes Object)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot SeriesVolumeFn
;+ (comment "A &%BinaryFunction that maps a type of &%Series (e.g. the Encyclopedia_Britannica or the Popular_Mechanics periodical) and a number to the volumes of the text type designated by the number.")
(type SYMBOL)
;+ (allowed-parents Text-Physical)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot StatusCode
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000664):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot Pre-PaidCollectIndicator
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000054):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot isRepresentedBy
;+ (comment "isRepresentedBy relates an abstract object created by an intelligent agent (an abstract text, image, proposition) to some physical object that is intended to represent it.")
(type INSTANCE)
;+ (allowed-classes ContentBearingObject)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot exists
;+ (comment "The existential quantifier of predicate logic.")
(type INSTANCE)
;+ (allowed-classes Formula)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot hasCodeName
;+ (comment "The textual equivalent of the code content.")
(type STRING)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot relatedInternalConcept
;+ (comment "Means that the two arguments are related concepts within the SUMO, i.e. there is a significant similarity of meaning between them. To indicate a meaning relation between a SUMO concept and a concept from another source, use the Predicate &%relatedExternalConcept.")
(type INSTANCE)
;+ (allowed-classes Entity)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot SubstitutionStatusCode
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000066):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot citizen
;+ (comment "(&%citizen ?PERSON ?NATION) means that the &%Human ?PERSON is a citizen of &%Nation ?NATION.")
(type INSTANCE)
;+ (allowed-classes Nation)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot MinFn
;+ (comment "(&%MinFn ?NUMBER1 ?NUMBER2) is the smallest of ?NUMBER1 and ?NUMBER2. In cases where ?NUMBER1 is equal to ?NUMBER2, &%MinFn returns one of its arguments.")
(type INSTANCE)
;+ (allowed-classes Quantity)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot lessThan
;+ (comment "(&%lessThan ?NUMBER1 ?NUMBER2) is true just in case the &%Quantity ?NUMBER1 is less than the &%Quantity ?NUMBER2.")
(type INSTANCE)
;+ (allowed-classes Quantity)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot StreetAddr
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000151):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot lineExtensionTotalAmountCurrency
(type SYMBOL)
;+ (allowed-parents CurrencyMeasure)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot ItemDesignator
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000388):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot modalAttribute
;+ (comment "A &%BinaryRelation that is used to state the normative force of a &%Proposition. (&%modalAttribute ?FORMULA ?PROP) means that the &%Proposition expressed by ?FORMULA has the &%NormativeAttribute ?PROP. For example, (&%modalAttribute (&%exists (?ACT ?OBJ) (&%and (&%instance ?ACT &%Giving) (&%agent ?ACT John) (&%patient ?ACT ?OBJ) (&%destination ?ACT Tom))) &%Obligation) means that John is obligated to give Tom something.")
(type INSTANCE)
;+ (allowed-classes NormativeAttribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot KiloFn
;+ (comment "A &%UnaryFunction that maps a &%UnitOfMeasure into a &%UnitOfMeasure that is equal to 1,000 units of the original &%UnitOfMeasure. For example, (&%KiloFn &%Gram) is 1,000 &%Grams.")
(type INSTANCE)
;+ (allowed-classes UnitOfMeasure)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot uniqueIdentifier
;+ (comment "The class of &%names that uniquely identify an instance of &%Entity. Some examples of &%uniqueIdentifiers are the keys\nof tables in database applications and the ISBN (International Standard Book Number).\n\n(&%names ?STRING ?ENTITY) means that the thing ?ENTITY\nhas the &%SymbolicString ?STRING as its name. Note that &%names and &%represents are the two immediate &%subrelations of &%refers. The predicate &%names is used when the referring item is merely a tag without connotative content, while the predicate &%represents is used for referring items that have such content.\n\n(&%refers ?OBJ1 ?OBJ2) means that ?OBJ1 mentions or includes a reference to ?OBJ2. Note that &%refers is more general in meaning than &%represents, because presumably something can represent something else only if it refers to this other thing. For example, an article whose topic is a recent change in the price of oil may refer to many other things, e.g. the general state of the economy, the weather in California, the prospect of global warming, the options for alternative energy sources, the stock prices of various oil companies, etc.")
(type INSTANCE)
;+ (allowed-classes Entity)
;+ (cardinality 0 1)
;+ (subslot-of names)
(create-accessor read-write))
(single-slot HouseName
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000036):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot subsumesContentInstance
;+ (comment "A &%BinaryPredicate relating two instances of &%ContentBearingObject. (&%subsumesContentInstance ?OBJ1 ?OBJ2) means that the content expressed by ?OBJ2 is part of the content expressed by ?OBJ1. An example is the relationship between a handwritten poem and one of its stanzas. Note that this is a relation between instances, rather than &%Classes. If one wants to assert a content relationship between &%Classes, e.g. between the version of an intellectual work and a part of that work, the relation &%subsumesContentClass should be used.")
(type INSTANCE)
;+ (allowed-classes ContentBearingObject)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot ReciprocalFn
;+ (comment "(ReciprocalFn ?NUMBER) is the reciprocal element of ?NUMBER with respect to the multiplication operator (&%MultiplicationFn), i.e. 1/?NUMBER. Not all numbers have a reciprocal element. For example the number 0 does not. If a number ?NUMBER has a reciprocal ?RECIP, then the product of ?NUMBER and ?RECIP will be 1, e.g. 3*1/3 = 1. The reciprocal of an element is &%equal to applying the &%ExponentiationFn function to the element to the power -1.")
(type INSTANCE)
;+ (allowed-classes Quantity)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot hasSchemeName
;+ (comment "A string naming the identification scheme containing the identifier.")
(type STRING)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot DayFn
;+ (comment "A &%BinaryFunction that assigns a &%PositiveRealNumber and a subclass of &%Months to the &%Days within each &%Month corresponding to that &%PositiveRealNumber. For example, (&%DayFn 16 &%August) is the &%Class of all sixteenth days of August. For another example, (&%DayFn 9 &%Month) would return the class of all ninth days of any month. For still another example, (&%DayFn 18 (&%MonthFn 8 (YearFn 1912))) denotes the 18th day of August 1912.")
(type SYMBOL)
;+ (allowed-parents Day)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot partlyLocated
;+ (comment "The predicate of partial localization. For example, Istanbul is partly located in Asia. Note that this is the most basic localization relation: &%located and &%exactlyLocated are both subrelations of &%partlyLocated.")
(type INSTANCE)
;+ (allowed-classes Region)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot buyerTransaction
(type INSTANCE)
;+ (allowed-classes Buying)
;+ (cardinality 1 1)
(create-accessor read-write))
(single-slot RegistrationName
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000400):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot cat%3AContract
;+ (comment "UBL-element Jul 26-03 (UBL-ID=):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot cat%3AQuote
;+ (comment "UBL-element Jul 26-03 (UBL-ID=):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot AccountName
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000409):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(multislot %3ASYNONYMS
;+ (comment "A list of synonyms in natural or formal languages for the concept represetned by this class.")
(type INSTANCE)
;+ (allowed-classes Synonym)
(create-accessor read-write))
(single-slot sibling
;+ (comment "The relationship between two &%Organisms that have the same &%mother and &%father. Note that this relationship does not hold between half-brothers, half-sisters, etc.")
(type INSTANCE)
;+ (allowed-classes Organism)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot member
;+ (comment "A specialized common sense notion of part for uniform parts of &%Collections. For example, each sheep in a flock of sheep would have the relationship of member to the flock.\n")
(type INSTANCE)
;+ (allowed-classes Collection)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot hasSchemeAgencyName
;+ (comment "The name of the agency (as contrasted with its identifier, if any) which maintains the identification scheme of which the identifier is a part.")
(type STRING)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot Contact
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000129):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot PayeeFinancialAccount
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000432):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot GrossVolumeMeasure
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000022):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot RelativeComplementFn
;+ (comment "A &%BinaryFunction that maps two &%SetOrClasses to the difference between these &%SetOrClasses. More precisely, the relative complement of one class C1 relative to another C2 consists of the instances of C1 that are instances of the &%ComplementFn of C2.")
(type INSTANCE)
;+ (allowed-classes SetOrClass)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot meetsSpatially
;+ (comment "(&%meetsSpatially ?OBJ1 ?OBJ2) means that ?OBJ1 and ?OBJ2 are &%connected but that neither ?OBJ1 nor ?OBJ2 &%overlapsSpatially the other.\n\n(connected ?OBJ1 ?OBJ2) means that ?OBJ1 &%meetsSpatially ?OBJ2 or that ?OBJ1 &%overlapsSpatially ?OBJ2.")
(type INSTANCE)
;+ (allowed-classes Object)
;+ (cardinality 0 1)
;+ (subslot-of connected)
(create-accessor read-write))
(single-slot value
(type FLOAT)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot StandardItemIdentification
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000294):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot depth
;+ (comment "A &%TernaryPredicate that is used to state the &%distance between the &%top of an &%Object and another point that is above the &%top of the\n&%Object (often this other point will be sea level). Note that this &%Predicate can be used to specify, for example, the depth of marine life or submarines, for example.\n\n(&%distance ?OBJ1 ?OBJ2 ?QUANT) means that the shortest distance between the two objects ?OBJ1 and ?OBJ2 is ?QUANT. Note that the difference between the predicates &%length and &%distance is that the &%length is used to state the &%LengthMeasure of one of the dimensions of a single object, while &%distance is used to state the &%LengthMeasure that separates two distinct objects.")
(type INSTANCE)
;+ (allowed-classes Physical)
;+ (cardinality 0 1)
;+ (subslot-of distance)
(create-accessor read-write))
(single-slot DensityFn
;+ (comment "&%DensityFn maps an instance of &%MassMeasure and an instance of &%VolumeMeasure to the density represented by this proportion of mass and volume. For example, (&%DensityFn (&%MeasureFn 3 &%Gram) (&%MeasureFn 1 &%Liter)) represents the density of 3 grams per liter.\n")
(type INSTANCE)
;+ (allowed-classes VolumeMeasure)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot NatureCode
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000117):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot CardinalityFn
;+ (comment "(CardinalityFn ?CLASS) returns the number of instances in the &%SetOrClass or &%Collection ?CLASS.")
(type INSTANCE)
;+ (allowed-classes Number)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot SpecialTerms
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000183):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot %3ADomain3Type
;+ (comment "The type of the argument, class or instance")
(type SYMBOL)
(allowed-values Class Instance)
;+ (cardinality 0 1)
;+ (associated-facet UBLinv018t_00300)
(create-accessor read-write))
(single-slot %3D%3E
;+ (comment "The truth-functional connective of implication.")
(type INSTANCE)
;+ (allowed-classes Formula)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot QuantityShipped
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000174):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot ComplementFn
;+ (comment "The complement of a given &%SetOrClass C is the &%SetOrClass of all things that are not instances of C. In other words, an object is an instance of the complement of a &%SetOrClass C just in case it is not an instance of C.")
(type INSTANCE)
;+ (allowed-classes SetOrClass)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot TaxableAmountCurrency
(type SYMBOL)
;+ (allowed-parents CurrencyMeasure)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot hasSchemeURI
;+ (comment "The URI for the identification scheme or code list scheme.")
(type INSTANCE)
;+ (allowed-classes URI)
;+ (cardinality 0 1)
(create-accessor read-write))
(multislot causesSubclass
;+ (comment "The causation relation between subclasses of &%Process.\n(&%causesSubclass ?PROCESS1 ?PROCESS2) means that the subclass of &%Process ?PROCESS1\nbrings about the subclass of &%Process ?PROCESS2, e.g. (&%causes &%Killing &%Death).\n")
(type SYMBOL)
;+ (allowed-parents Process)
(create-accessor read-write))
(single-slot SecondaryHazards
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000266):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot CargoTypeCode
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000118):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot StageID
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000590):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot effectiveDate
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000216):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot RegulationCode
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000271):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot notices
;+ (comment "(&%notices ?AGENT ?OBJECT) means that ?AGENT is paying attention to ?OBJECT, that ?OBJECT is currently the object of ?AGENT's conscious awareness.")
(type INSTANCE)
;+ (allowed-classes Object)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot CatalogueID
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000472):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot TransportContract
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000025):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot hasSchemeID
;+ (comment "A string identifying the identification scheme in which this is an identifier.")
(type STRING)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot CutSetFn
;+ (comment "A &%UnaryFunction that assigns a &%Graph the &%Class of &%GraphPaths that partition the graph into two separate graphs if cut. There may be more than one cutset for a given graph.")
(type INSTANCE)
;+ (allowed-classes GraphPath)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot GovernmentFn
;+ (comment "(&%GovernmentFn ?AREA) denotes the\n&%Government of the &%GeopoliticalArea ?AREA. For example, (&%GovernmentFn &%UnitedStates) denotes the Federal-level government of\nthe United States; (&%GovernmentFn &%PuertoRico) denotes the government of the Commonwealth of Puerto Rico.\n")
(type INSTANCE)
;+ (allowed-classes Government)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot length
;+ (comment "&%BinaryPredicate that is used to state the measure of an &%Object from one point to another point along its surface. Note that the difference between the predicates &%length and &%distance is that the &%length is used to state the &%LengthMeasure of one of the dimensions of a single object, while &%distance is used to state the &%LengthMeasure that separates two distinct objects.")
(type INSTANCE)
;+ (allowed-classes LengthMeasure)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot createdBy
;+ (comment "createdBy relates a conceptual item to the cognitive agent that created it.")
(type INSTANCE)
;+ (allowed-classes CognitiveAgent)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot SquareRootFn
;+ (comment "(SquareRootFn ?NUMBER) is the principal square root of ?NUMBER.")
(type INSTANCE)
;+ (allowed-classes Number)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot CommodityClassification
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000298):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot leader
;+ (comment "(&%leader ?ORGANIZATION ?PERSON) means that the leader of ?ORGANIZATION is ?PERSON.\n")
(type INSTANCE)
;+ (allowed-classes Agent)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot CompanyTaxID
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000401):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot PackageQuantity
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000009):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot properlyFills
;+ (comment "(&%properlyFills ?OBJ ?HOLE) means that ?HOLE is properly (though perhaps incompletely) filled by ?OBJ, i.e. some part of ?HOLE is perfectly filled by ?OBJ. Note that &%properlyFills is the dual of &%completelyFills, and is so related to &%partiallyFills that ?OBJ &%properlyFills ?HOLE just in case ?OBJ &%partiallyFills every part of ?HOLE. (Thus, every perfect filler is both complete and proper in this sense).")
(type INSTANCE)
;+ (allowed-classes Hole)
;+ (cardinality 0 1)
(create-accessor read-write))
(multislot hasField5
;+ (comment "hasField relates a StructuredText to the fields that comprise its structure. \nFor multiple subfield, see hasField1, hasField2, etc.")
(type INSTANCE)
;+ (allowed-classes Text-Abstract)
(cardinality 2 ?VARIABLE)
;+ (subslot-of hasField)
(create-accessor read-write))
(single-slot geometricPart
;+ (comment "(&%geometricPart ?PART ?WHOLE) means that the &%GeometricFigure ?PART is part of the &%GeometricFigure ?WHOLE.\n")
(type INSTANCE)
;+ (allowed-classes GeometricFigure)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot cat%3APaymentTerms
;+ (comment "UBL-element Jul 26-03 (UBL-ID=):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot hasSubText
;+ (comment "subText relates a Text (abstract or physical) to one of its proper parts. This can be used as a necessary\nrelation when some text always has a specific proper part -- a Title for a Book, for example.")
(type INSTANCE)
;+ (allowed-classes TransactionAmount)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot CountrySub-EntityCode
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000043):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot before
;+ (comment "(&%before ?POINT1 ?POINT2) means that ?POINT1 precedes ?POINT2 on the universal timeline.")
(type INSTANCE)
;+ (allowed-classes TimePoint)
;+ (cardinality 0 1)
(create-accessor read-write))
(multislot hasField3
;+ (comment "hasField relates a StructuredText to the fields that comprise its structure. \nFor multiple subfield, see hasField1, hasField2, etc.")
(type INSTANCE)
;+ (allowed-classes Text-Abstract)
(cardinality 2 ?VARIABLE)
;+ (subslot-of hasField)
(create-accessor read-write))
(single-slot disjoint
;+ (comment "&%Classes are &%disjoint only if they share no instances, i.e. just in case the result of applying &%IntersectionFn to them is empty.")
(type INSTANCE)
;+ (allowed-classes SetOrClass)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot cat%3ASellerParty
;+ (comment "UBL-element Jul 26-03 (UBL-ID=):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 1 1)
(create-accessor read-write))
(single-slot properPartOf
;+ (comment "(&%properPart ?OBJ1 ?OBJ2) means that\n?OBJ1 is a part of ?OBJ2 other than ?OBJ2 itself. This is a\n&%TransitiveRelation and &%AsymmetricRelation (hence an\n&%IrreflexiveRelation).\n")
(type INSTANCE)
;+ (allowed-classes Object)
;+ (cardinality 0 1)
;+ (inverse-slot hasProperPart)
;+ (subslot-of part)
(create-accessor read-write))
(single-slot IssuerID
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000101):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot PicoFn
;+ (comment "A &%UnaryFunction that maps a &%UnitOfMeasure into a &%UnitOfMeasure that is equal to .000000000001 units of the original &%UnitOfMeasure. For example, (&%PicoFn &%Ampere) is .000000000001 &%Amperes.")
(type INSTANCE)
;+ (allowed-classes UnitOfMeasure)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot NetWeightMeasure
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000020):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot father
;+ (comment "The general relationship of fatherhood. (&%father ?CHILD ?FATHER) means that ?FATHER is the biological fatherof ?CHILD.")
(type INSTANCE)
;+ (allowed-classes Organism)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot hasPurposeForAgent
;+ (comment "Expresses a cognitive attitude of an agent with respect to a particular instance of Physical. More precisely, (&%hasPurposeForAgent ?THING ?FORMULA ?AGENT) means that the purpose of ?THING for ?AGENT is the proposition expressed by ?FORMULA. Very complex issues are involved here. In particular, the rules of inference of the first order predicate calculus are not truth-preserving for the second argument position of this &%Predicate.")
(type INSTANCE)
;+ (allowed-classes Formula)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot TargetCurrencyBaseAmount
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000213):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot ReferencedOrder
(type INSTANCE)
;+ (allowed-classes Order)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot DeliveredQuantity
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000190):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot EditionFn
;+ (comment "A &%BinaryFunction that maps a type of text (e.g. Agatha Christie's Murder_on_the_Orient_Express) and a number to the edition of the text type corresponding to the number.")
(type SYMBOL)
;+ (allowed-parents ContentBearingObject)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot Phone
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000004):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot PayerFinancialAccount
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000431):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot usedBy
;+ (comment "usedBy relates a TelicEntity to the Agent that uses it for a purpose.")
(type INSTANCE)
;+ (allowed-classes Agent)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot transactionAmount
(type INSTANCE)
;+ (allowed-classes CurrencyMeasure)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot TransactionCurrencyCode
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL100005):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(multislot hasField7
;+ (comment "hasField relates a StructuredText to the fields that comprise its structure. \nFor multiple subfield, see hasField1, hasField2, etc.")
(type INSTANCE)
;+ (allowed-classes Text-Abstract)
(cardinality 2 ?VARIABLE)
;+ (subslot-of hasField)
(create-accessor read-write))
(single-slot overlapsTemporally
;+ (comment "(&%overlapsTemporally ?INTERVAL1 ?INTERVAL2) means that the &%TimeIntervals ?INTERVAL1 and ?INTERVAL2 have a &%TimeInterval as a common part.")
(type INSTANCE)
;+ (allowed-classes TimeInterval)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot BuildingAddr
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000031):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot GraphPathFn
;+ (comment "A &%BinaryFunction that maps two &%GraphNodes to the &%Class of &%GraphPaths between those two nodes. Note that the two &%GraphNodes must belong to the same &%Graph.")
(type INSTANCE)
;+ (allowed-classes GraphPath)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot AbstractionFn
;+ (comment "A &%UnaryFunction that maps a &%Class into the instance of &%Attribute that specifies the condition(s) for membership in the &%Class.")
(type INSTANCE)
;+ (allowed-classes Attribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot PartyName
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000092):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot hasCodeListID
;+ (comment "The identifier (if any) of the code list containing this code as a member.\nCan be used to identify the URL of a source that defines the set of currently approved permitted values.")
(type INSTANCE)
;+ (allowed-classes UBL-Identifier)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot considers
;+ (comment "(&%considers ?AGENT ?FORMULA) means that ?AGENT considers or wonders about the truth of the proposition expressed by ?FORMULA.")
(type INSTANCE)
;+ (allowed-classes Formula)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot InvoicedQuantity
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000277):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot top
;+ (comment "(&%top ?TOP ?OBJECT) means that ?TOP is the highest maximal\nsuperficial part of ?OBJECT.\n")
(type INSTANCE)
;+ (allowed-classes Object)
;+ (cardinality 0 1)
;+ (subslot-of superficialPart)
(create-accessor read-write))
(single-slot ValidityPeriod
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000140):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot ServiceLevelCode
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000362):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot %3ADomain1Type
;+ (comment "Specifies whether the first domain argumenbt is an instance of the specified class or a subclass.")
(type SYMBOL)
(allowed-values Instance Class)
;+ (cardinality 0 1)
;+ (associated-facet UBLinv018_00290)
(create-accessor read-write))
(single-slot WhenFn
;+ (comment "A &%UnaryFunction that maps an &%Object or &%Process to the exact &%TimeInterval during which it exists. Note that, for every &%TimePoint ?TIME outside of the &%TimeInterval (WhenFn ?THING), (time ?THING ?TIME) does not hold.")
(type INSTANCE)
;+ (allowed-classes TimeInterval)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot copy
;+ (comment "relates an &%Object to an exact copy of the &%Object, where an exact copy is indistinguishable from the original with regard to every property except (possibly) spatial and/or temporal location.")
(type INSTANCE)
;+ (allowed-classes Object)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot TerminalNodeFn
;+ (comment "A &%UnaryFunction that maps a &%GraphArc to the terminal node of the &%GraphArc. Note that this is a partial function. In particular, the function is undefined for &%GraphArcs that are not part of a &%DirectedGraph.")
(type INSTANCE)
;+ (allowed-classes GraphNode)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot hasSchemeVersionID
;+ (comment "The versionID for the scheme of which this identifier is a part.")
(type INSTANCE)
;+ (allowed-classes UBL-Identifier)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot hasProduct
(type INSTANCE)
;+ (allowed-classes ProductObject)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot partialOrderingOn
;+ (comment "A &%BinaryRelation is a partial ordering on a &%SetOrClass only if the relation is &%reflexiveOn the &%SetOrClass, and it is both an &%AntisymmetricRelation, and a &%TransitiveRelation.")
(type INSTANCE)
;+ (allowed-classes SetOrClass)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot CountrySub-Entity
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000042):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot pointOfIntersection
;+ (comment "(&%pointOfIntersection ?FIGURE1 ?FIGURE2 ?POINT) means that the two straight lines ?FIGURE1 and ?FIGURE2 meet at the point ?POINT.\n")
(type INSTANCE)
;+ (allowed-classes OneDimensionalFigure)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot paymentTerms
;+ (comment "Proposed terms of payment.")
(type INSTANCE)
;+ (allowed-classes PaymentTerms)
;+ (cardinality 0 1)
(create-accessor read-write))
(multislot isFieldOf
;+ (comment "isFieldOf relates a field in a structured test to the structured text itself. This slot is a subslot of properPartOf. The structured text itself may be a field of another larger structured text.")
(type INSTANCE)
;+ (allowed-classes StructuredText)
;+ (inverse-slot hasField1)
(create-accessor read-write))
(single-slot fills
;+ (comment "Holes can be filled. (&%fills ?OBJ ?HOLE) means that the &%Object ?OBJ fills the &%Hole ?HOLE. Note that &%fills here means perfectly filled.")
(type INSTANCE)
;+ (allowed-classes Hole)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot subsumedExternalConcept
;+ (comment "(&%subsumedExternalConcept\n?STRING ?THING ?LANGUAGE) means that the SUMO concept ?THING is subsumed\nby the meaning of ?STRING in ?LANGUAGE, i.e. the concept ?THING is narrower\nin meaning than ?STRING.\n\n\nUsed to signify a three-place relation between a concept in an external knowledge source, a concept in the SUMO, and the name of the other knowledge source.")
(type INSTANCE)
;+ (allowed-classes Entity)
;+ (cardinality 0 1)
;+ (subslot-of relatedExternalConcept)
(create-accessor read-write))
(single-slot conclusion
;+ (comment "(&%conclusion ?ARGUMENT ?PROPOSITION) means that\nthe &%Proposition ?PROPOSITION is the conclusion explicitly drawn from the\n&%Argument ?ARGUMENT. Note that it may or may not be the case that ?ARGUMENT &%entails ?PROPOSITION.\n")
(type INSTANCE)
;+ (allowed-classes Proposition)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot LIQuantity
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000061):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot AlternativeOrderLine
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000393):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot ImaginaryPartFn
;+ (comment "(&%ImaginaryPartFn ?NUMBER) returns the part of ?NUMBER that has the square root of -1 as its factor.")
(type INSTANCE)
;+ (allowed-classes ImaginaryNumber)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot cat%3AGrossWeightMeasure
;+ (comment "UBL-element Jul 26-03 (UBL-ID=):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(multislot hasProperPart
;+ (comment "An amountTpe has a decimal number and a currency designator.")
(type INSTANCE)
;+ (allowed-classes DecimalNumber)
;+ (inverse-slot properPartOf)
(create-accessor read-write))
(single-slot holdsObligation
;+ (comment "Expresses a relationship between a &%Formula and a &%CognitiveAgent whereby the &%CognitiveAgent has the obligation to bring it about that the &%Formula is true.")
(type INSTANCE)
;+ (allowed-classes CognitiveAgent)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot LossRisk
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000185):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot ListLengthFn
;+ (comment "A &%Function that takes a &%List as its sole argument and returns the number of items in the &%List. For example, (&%ListLengthFn (&%ListFn &%Monday &%Tuesday &%Wednesday)) would return the value 3.")
(type INSTANCE)
;+ (allowed-classes NonnegativeInteger)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot EarliestDate
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL100007):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot %3ADomain3Class
;+ (comment "The fourth argument of a quaternary or higher-arity slot. Thisis the class of which the value is an instance.")
(type SYMBOL)
;+ (allowed-parents Entity)
;+ (cardinality 0 1)
;+ (associated-facet SUMO148_00001)
(create-accessor read-write))
(multislot disjointDecomposition
;+ (comment "A &%disjointDecomposition of a &%Class C is a set of subclasses of C that are mutually &%disjoint.")
(type INSTANCE)
;+ (allowed-classes Class)
(create-accessor read-write))
(single-slot subPlan
;+ (comment "(&%subPlan ?PLAN1 ?PLAN2) means that ?PLAN1 is a &%Plan which is a proper part of ?PLAN2. This relation is generally used to relate a supporting &%Plan to the overall &%Plan in a particular context.\n")
(type INSTANCE)
;+ (allowed-classes Plan)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot valence
;+ (comment "Specifies the number of arguments that a relation can take. If a relation does not have a fixed number of arguments, it does not have a valence and it is an instance of &%VariableArityRelation. For example, &%holds is a &%VariableArityRelation.")
(type INSTANCE)
;+ (allowed-classes PositiveInteger)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot SellersOrderID
;+ (comment "UBL-element Jul 26-03 (UBL-ID=UBL000485):\n")
(type INSTANCE)
;+ (allowed-classes UBLattribute)
;+ (cardinality 0 1)
(create-accessor read-write)))
(defclass %3AUBL-CLASS "A UBL-CLASS will be used as the parent metaclass for concepts within the UBL-invoice series of ontologies. It will have at least one added facet, ':isInModule', which specifies the module within which the class will be exported into a KIF-format file."
(is-a %3ASTANDARD-CLASS)
(role concrete)
(single-slot %3ALOAD-SEQUENCE
;+ (comment "LOAD-SEQUENCE is a convenience slot which specifies the sequence in which a logically related block of predicates (or an axiom) was loaded from the input KIF-format file. The sole function is to allow recreation of the original sequence of statements for the convenience of the ontologist. A value of 0 is default for newly created concepts.")
(type INTEGER)
(range 0 %3FVARIABLE)
(default 0)
;+ (cardinality 1 1)
(create-accessor read-write))
(multislot %3AisInModule
;+ (comment ":IsInModule is a slot that attaches to both :UBL-SLOT and :UBL-CLASS.\nIt is used to organize the concepts in related groupings. Initially, the modules specified will be those of the SUMO ontology.\n we allow a concpet to be inmore than one module, but in order to reproduce the structure of a particular KIF file, only one module should be specified.")
(type INSTANCE)
;+ (allowed-classes Module)
(create-accessor read-write))
(single-slot instance
;+ (comment "An object is an &%instance of a &%SetOrClass if it is included in that &%SetOrClass. An individual may be an instance of many classes, some of which may be subclasses of others. Thus, there is no assumption in the meaning of &%instance about specificity or uniqueness.\n For the UBL ontology, this relationis atached at UBL-CLASS itself, permitting classes to be assigned as instances of other classes.\nAll user classes in UBL-ontology are instances of UBL-CLASS (ora subclass) and this relaiton is managed by the Protege engine. The secific assignment of classes as instances of other classes would be done to permit certain user classes to be used as metaclasses.")
(type INSTANCE)
;+ (allowed-classes %3AUBL-CLASS %3ASYN-CLASS)
;+ (cardinality 0 1)
;+ (user-facet UBLinv018t_00322 [UBLinv018t_00309])
;+ (user-facet UBLinv018_00290 Instance)
(create-accessor read-write))
(single-slot disjoint
;+ (comment "&%Classes are &%disjoint only if they share no instances, i.e. just in case the result of applying &%IntersectionFn to them is empty.")
(type INSTANCE)
;+ (allowed-classes SetOrClass)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot disjointDecomposition
;+ (comment "A &%disjointDecomposition of a &%Class C is a set of subclasses of C that are mutually &%disjoint.")
(type INSTANCE)
;+ (allowed-classes Class)
;+ (cardinality 0 1)
(create-accessor read-write)))
(defclass %3ASYN-CLASS ":SYN-CLASS is a :UBL-CLASS which has a synonym slot."
(is-a %3AUBL-CLASS)
(role concrete)
(multislot %3ASYNONYMS
;+ (comment "A list of synonyms in natural or formal languages for the concept represetned by this class.")
(type INSTANCE)
;+ (allowed-classes Synonym)
(create-accessor read-write)))
(defclass %3AUBL-SLOT "A UBL-SLOT has a text field to record axioms involving that relation."
(is-a %3ASTANDARD-SLOT)
(role concrete)
(single-slot %3ALOAD-SEQUENCE
;+ (comment "LOAD-SEQUENCE is a convenience slot which specifies the sequence in which a logically related block of predicates (or an axiom) was loaded from the input KIF-format file. The sole function is to allow recreation of the original sequence of statements for the convenience of the ontologist. A value of 0 is default for newly created concepts.")
(type INTEGER)
(range 0 %3FVARIABLE)
(default 0)
;+ (cardinality 1 1)
(create-accessor read-write))
(multislot %3AisInModule
;+ (comment ":IsInModule is a slot that attaches to both :UBL-SLOT and :UBL-CLASS.\nIt is used to organize the concepts in related groupings. Initially, the modules specified will be those of the SUMO ontology.\n we allow a concpet to be inmore than one module, but in order to reproduce the structure of a particular KIF file, only one module should be specified.")
(type INSTANCE)
;+ (allowed-classes Module)
(create-accessor read-write))
(single-slot %3AAXIOMS
;+ (comment "Axioms from SUMO or other sources, constraining the meaning of the slot.")
(type STRING)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot %3ADomain1Type
;+ (comment "Specifies whether the first domain argumenbt is an instance of the specified class or a subclass.")
(type SYMBOL)
(allowed-values Instance Class)
;+ (cardinality 0 1)
(create-accessor read-write)))
(defclass %3ATernarySlot "A slot that has three arguments. It is implemented here by adding a slot to this class, Arg3. This slot can only take one class value. Other workarounds can be used to represent higher-arity relatrions, but at the expense of greater complexity in viewing the relations."
(is-a %3AUBL-SLOT)
(role concrete)
(single-slot %3ADomain2Type
;+ (comment "Specifies whether the argument is an instance of the indicated class or a subclass.")
(type SYMBOL)
(allowed-values Instance Class)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot %3ADomain2Value
;+ (comment "The instance value for the third argument of a higher-arity relation. It is an instance of :Arg3Value.")
(type INSTANCE)
;+ (allowed-classes Entity)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot %3ADomain1Type
;+ (comment "Specifies whether the first domain argumenbt is an instance of the specified class or a subclass.")
(type SYMBOL)
(allowed-values Instance Class)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot %3ADomain2Class
;+ (comment "THe third argument of a higher-arity relation")
(type SYMBOL)
;+ (allowed-parents Entity)
;+ (cardinality 0 1)
(create-accessor read-write)))
(defclass %3AQuaternarySlot "A slot that has four arguments. It is implemented here by adding a slot,, Arg4, to the ternarySlot class. This slot can only take a fixed class value, and only serves to record the clas restriciton, it canot be used to instantiate the relation. Other workarounds can be used to better represent higher-arity relatrions, but at the expense of greater complexity in viewing the relations."
(is-a %3ATernarySlot)
(role concrete)
(single-slot %3ADomain3Value
;+ (comment "The instance value for the fourth argument of a higher-arity slot.\nIt is an instance of :Arg4Class")
(type INSTANCE)
;+ (allowed-classes Entity)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot %3ADomain3Class
;+ (comment "The fourth argument of a quaternary or higher-arity slot. Thisis the class of which the value is an instance.")
(type SYMBOL)
;+ (allowed-parents Entity)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot %3ADomain3Type
;+ (comment "The type of the argument, class or instance")
(type SYMBOL)
(allowed-values Class Instance)
;+ (cardinality 0 1)
(create-accessor read-write)))
(defclass %3AQuintarySlot
(is-a %3AQuaternarySlot)
(role concrete)
(single-slot %3ADomain4Type
;+ (comment "The type of the fifth argument, class or instance.")
(type SYMBOL)
(allowed-values Class Instance)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot %3ADomain4Class
;+ (comment "The class of the fifth argument")
(type SYMBOL)
;+ (allowed-parents Entity)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot %3ADomain4Value
;+ (comment "The value of the fifth argument")
(type INSTANCE)
;+ (allowed-classes Entity)
;+ (cardinality 0 1)
(create-accessor read-write)))
(defclass %3AVariableAritySlot
(is-a %3AUBL-SLOT)
(role concrete))
(defclass %3AUBL-AXIOM "A :UBL-AXIOM is a :PAL-CONSTRAINT to which the additional slots :isInModule and\n:LOAD-SEQUENCE have been added."
(is-a %3APAL-CONSTRAINT)
(role concrete)
(single-slot %3ALOAD-SEQUENCE
;+ (comment "LOAD-SEQUENCE is a convenience slot which specifies the sequence in which a logically related block of predicates (or an axiom) was loaded from the input KIF-format file. The sole function is to allow recreation of the original sequence of statements for the convenience of the ontologist. A value of 0 is default for newly created concepts.")
(type INTEGER)
(range 0 %3FVARIABLE)
(default 0)
;+ (cardinality 1 1)
(create-accessor read-write))
(multislot %3AisInModule
;+ (comment ":IsInModule is a slot that attaches to both :UBL-SLOT and :UBL-CLASS.\nIt is used to organize the concepts in related groupings. Initially, the modules specified will be those of the SUMO ontology.\n we allow a concpet to be inmore than one module, but in order to reproduce the structure of a particular KIF file, only one module should be specified.")
(type INSTANCE)
;+ (allowed-classes Module)
(create-accessor read-write)))
(defclass Entity "UBL-Invoice V0.11 from\nSUMO 1.55: July 14, 2003\nLast modification ( v018)\nAugust 14, 2003. -- added\nSUMO axioms as PAL-CONSTRAINTS and adjusted the formatting.\n Top node is \"Entity\" -- all instances of any class are an instance of this class. This file is the beginning of the UBL-Invoice ontology, derived from SUMO 1.55 with Mike Daconta's classes and relations added. Pat Cassidy added classes from the UBL \"reusable\" file, modified as needed to conform to the UML file and other documentation.\n\nCOnversion note: Converted SUMO 1.55 from the Merge-Txt file on Teknowledge's site.\nTernary predicates have the third argument as :Domain2Class.\nBinary Functions have the second argument as :Domain2Class and the range as \"Allowed-Classes\".\n\nFor most **instances** of the relations defined in the SUMO file, only one class is listed as the parent class. Additional parent classes were not transcribed."
(is-a USER)
(role concrete)
(single-slot property
;+ (comment "This &%Predicate holds between an instance of &%Entity and an instance of &%Attribute. (property ?ENTITY ?ATTR) means that ?ENTITY has the &%Attribute ?ATTR.")
(type INSTANCE)
;+ (allowed-classes Attribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot equal
;+ (comment "(equal ?ENTITY1 ?ENTITY2) is true just in case ?ENTITY1 is identical with ?ENTITY2.")
(type INSTANCE)
;+ (allowed-classes Entity)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot SUO-name
(type STRING)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot instance
;+ (comment "An object is an &%instance of a &%SetOrClass if it is included in that &%SetOrClass. An individual may be an instance of many classes, some of which may be subclasses of others. Thus, there is no assumption in the meaning of &%instance about specificity or uniqueness.")
(type INSTANCE)
;+ (allowed-classes SetOrClass)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot element
;+ (comment "(element ?ENTITY ?SET) is true just in case ?ENTITY is contained in the &%Set ?SET. An &%Entity can be an &%element of another &%Entity only if the latter is a &%Set.")
(type INSTANCE)
;+ (allowed-classes Set)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot inList
;+ (comment "The analog of &%element and &%instance for &%Lists. (&%inList ?OBJ ?LIST) means that ?OBJ is in the &%List ?LIST. For example, (&%inList &%Tuesday (&%ListFn &%Monday &%Tuesday &%Wednesday)) would be true.")
(type INSTANCE)
;+ (allowed-classes List)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot documentation
;+ (comment "A relation between objects in the domain of discourse and strings of natural language text. The domain of &%documentation is not constants (names), but the objects themselves. This means that one does not quote the names when associating them with their documentation.")
(type STRING)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot relatedInternalConcept
;+ (comment "Means that the two arguments are related concepts within the SUMO, i.e. there is a significant similarity of meaning between them. To indicate a meaning relation between a SUMO concept and a concept from another source, use the Predicate &%relatedExternalConcept.")
(type INSTANCE)
;+ (allowed-classes Entity)
;+ (cardinality 0 1)
(create-accessor read-write)))
(defclass Physical "SUMO 1.55: July 14, 2003\nAn entity that has a location in space-time. \nNote that locations are themselves understood to have a location in \nspace-time."
(is-a Entity)
(role concrete)
(single-slot representsForAgent
;+ (comment "A very general predicate. (&%representsForAgent ?THING ?ENTITY ?AGENT) means that the ?AGENT chooses to use the &%instance of &%Physical ?THING to 'stand for' ?ENTITY.")
(type INSTANCE)
;+ (allowed-classes Entity)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot date
;+ (comment "A &%BinaryPredicate that specifies a &%TimePosition in absolute calendar time, at the resolution of one day, for a particular &%Object or &%Process.")
(type INSTANCE)
;+ (allowed-classes Day)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot time
;+ (comment "This relation holds between an instance of &%Physical and an instance of &%TimePosition just in case the temporal lifespan of the former includes the latter. The constants &%located and &%time are the basic spatial and temporal predicates, respectively.")
(type INSTANCE)
;+ (allowed-classes TimePosition)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot refers
;+ (comment "(&%refers ?OBJ1 ?OBJ2) means that ?OBJ1 mentions or includes a reference to ?OBJ2. Note that &%refers is more general in meaning than &%represents, because presumably something can represent something else only if it refers to this other thing. For example, an article whose topic is a recent change in the price of oil may refer to many other things, e.g. the general state of the economy, the weather in California, the prospect of global warming, the options for alternative energy sources, the stock prices of various oil companies, etc.")
(type INSTANCE)
;+ (allowed-classes Entity)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot WhereFn
;+ (comment "Maps an &%Object and a &%TimePoint at which the &%Object exists to the &%Region where the &%Object existed at that &%TimePoint.")
(type INSTANCE)
;+ (allowed-classes TimePoint)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot cooccur
;+ (comment "(&%cooccur ?THING1 ?THING2) means that the &%Object or &%Process ?THING1 occurs at the same time as, together with, or jointly with the &%Object or &%Process ?THING2. This covers the following temporal relations: is co-incident with, is concurrent with, is contemporaneous with, and is concomitant with.")
(type INSTANCE)
;+ (allowed-classes Physical)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot hasPurpose
;+ (comment "This &%Predicate expresses the concept of a conventional goal, i.e. a goal with a neutralized agent's intention. Accordingly, (&%hasPurpose ?THING ?FORMULA) means that the instance of &%Physical ?THING has, as its purpose, the &%Proposition expressed by ?FORMULA. Note that there is an important difference in meaning between the &%Predicates &%hasPurpose and &%result. Although the second argument of the latter can satisfy the second argument of the former, a conventional goal is an expected and desired outcome, while a result may be neither expected nor desired. For example, a machine process may have outcomes but no goals, aimless wandering may have an outcome but no goal; a learning process may have goals with no outcomes, and so on.")
(type INSTANCE)
;+ (allowed-classes Formula)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot distance
;+ (comment "(&%distance ?OBJ1 ?OBJ2 ?QUANT) means that the shortest distance between the two objects ?OBJ1 and ?OBJ2 is ?QUANT. Note that the difference between the predicates &%length and &%distance is that the &%length is used to state the &%LengthMeasure of one of the dimensions of a single object, while &%distance is used to state the &%LengthMeasure that separates two distinct objects.")
(type INSTANCE)
;+ (allowed-classes Physical)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot WhenFn
;+ (comment "A &%UnaryFunction that maps an &%Object or &%Process to the exact &%TimeInterval during which it exists. Note that, for every &%TimePoint ?TIME outside of the &%TimeInterval (WhenFn ?THING), (time ?THING ?TIME) does not hold.")
(type INSTANCE)
;+ (allowed-classes TimeInterval)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot hasPurposeForAgent
;+ (comment "Expresses a cognitive attitude of an agent with respect to a particular instance of Physical. More precisely, (&%hasPurposeForAgent ?THING ?FORMULA ?AGENT) means that the purpose of ?THING for ?AGENT is the proposition expressed by ?FORMULA. Very complex issues are involved here. In particular, the rules of inference of the first order predicate calculus are not truth-preserving for the second argument position of this &%Predicate.")
(type INSTANCE)
;+ (allowed-classes Formula)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot partlyLocated
;+ (comment "The predicate of partial localization. For example, Istanbul is partly located in Asia. Note that this is the most basic localization relation: &%located and &%exactlyLocated are both subrelations of &%partlyLocated.")
(type INSTANCE)
;+ (allowed-classes Object)
;+ (cardinality 0 1)
(create-accessor read-write)))
(defclass Object "SUO 1.55: July 14, 2003\nCorresponds roughly to the class of ordinary \nobjects. Examples include normal physical objects, geographical regions, \nand locations of &%Processes, the complement of &%Objects in the &%Physical \nclass. In a 4D ontology, an &%Object is something whose spatiotemporal \nextent is thought of as dividing into spatial parts roughly parallel to the \ntime-axis."
(is-a Physical)
(role concrete)
(single-slot monetaryValue
;+ (comment "A &%BinaryPredicate that associates an &%Object with its value expressed as an instance of &%CurrencyMeasure.")
(type INSTANCE)
;+ (allowed-classes CurrencyMeasure)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot traverses
;+ (comment "(&%traverses ?OBJ1 ?OBJ2) means that ?OBJ1 crosses or extends across ?OBJ2. Note that &%crosses and &%penetrates are subrelations of &%traverses.")
(type INSTANCE)
;+ (allowed-classes Object)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot part
;+ (comment "The basic mereological relation. All other mereological relations are defined in terms of this one. (&%part ?PART ?WHOLE) simply means that the &%Object ?PART is part of the &%Object ?WHOLE. Note that, since &%part is a &%ReflexiveRelation, every &%Object is a part of itself.\n")
(type INSTANCE)
;+ (allowed-classes Object)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot faces
;+ (comment "(&%faces ?OBJ ?DIRECTION) means that the front of ?OBJ (see &%FrontFn) is positioned towards the compass direction ?DIRECTION. More precisely, it means that if a line were extended from the center of ?DIRECTION, the line would intersect with the front of ?OBJ before it intersected with its back (see &%BackFn).")
(type INSTANCE)
;+ (allowed-classes DirectionalAttribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot MereologicalProductFn
;+ (comment "(&%MereologicalProductFn ?OBJ1 ?OBJ2) denotes the &%Object consisting of the parts which belong to both ?OBJ1 and ?OBJ2.")
(type INSTANCE)
;+ (allowed-classes Object)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot interiorPart
;+ (comment "(&%interiorPart ?OBJ1 ?OBJ2) means\nthat ?OBJ1 is part ?OBJ2 and there is no overlap between ?OBJ1 and any &%superficialPart ?OBJ2.\n")
(type INSTANCE)
;+ (allowed-classes Object)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot top
;+ (comment "(&%top ?TOP ?OBJECT) means that ?TOP is the highest maximal\nsuperficial part of ?OBJECT.\n")
(type INSTANCE)
;+ (allowed-classes Object)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot larger
;+ (comment "(&%larger ?OBJ1 ?OBJ2) simply means that ?OBJ1 is larger, with respect to all &%LengthMeasures, than ?OBJ2.")
(type INSTANCE)
;+ (allowed-classes Object)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot smaller
;+ (comment "(&%smaller ?OBJ1 ?OBJ2) simply means that ?OBJ1 is smaller, with respect to all &%LengthMeasures, than ?OBJ2.")
(type INSTANCE)
;+ (allowed-classes Object)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot hasAttribute
;+ (comment "(&%attribute ?OBJECT ?PROPERTY) means that ?PROPERTY is a &%Attribute of ?OBJECT. For example, (&%attribute &%MyLittleRedWagon &%Red).")
(type INSTANCE)
;+ (allowed-classes Attribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot measure
;+ (comment "A very general &%Predicate for asserting that a particular &%Object is measured by a particular &%ConstantQuantity. In general, the second argument of this &%Predicate will be an instance of the &%Function &%MeasureFn.")
(type INSTANCE)
;+ (allowed-classes PhysicalQuantity)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot copy
;+ (comment "relates an &%Object to an exact copy of the &%Object, where an exact copy is indistinguishable from the original with regard to every property except (possibly) spatial and/or temporal location.")
(type INSTANCE)
;+ (allowed-classes Object)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot superficialPart
;+ (comment "(&%superficialPart ?OBJ1 ?OBJ2)\nmeans that ?OBJ1 is a part of ?OBJ2 that has no interior parts of its own\n(or, intuitively, that only overlaps those parts of ?OBJ2 that are\nexternally connected with the mereological complement of ?OBJ2). This too\nis a transitive relation closed under &%MereologicalSumFn and\n&%MereologicalProductFn.\n")
(type INSTANCE)
;+ (allowed-classes Object)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot orientation
;+ (comment "A general &%Predicate for indicating how two &%Objects are oriented with respect to one another. For example,\n(orientation ?OBJ1 ?OBJ2 North) means that ?OBJ1 is north of ?OBJ2, and (orientation ?OBJ1 ?OBJ2 Vertical) means that ?OBJ1 is positioned vertically with respect to ?OBJ2.\n")
(type INSTANCE)
;+ (allowed-classes Object)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot MereologicalSumFn
;+ (comment "(&%MereologicalSumFn ?OBJ1 ?OBJ2) denotes the &%Object consisting of the parts which belong to either ?OBJ1 or ?OBJ2.")
(type INSTANCE)
;+ (allowed-classes Object)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot partiallyFills
;+ (comment "(&%partiallyFills ?OBJ ?HOLE) means that ?OBJ &%completelyFills some part of ?HOLE. Note that if (&%partiallyFills\n?OBJ1 ?HOLE) and (&%part ?OBJ1 ?OBJ2), then (&%partiallyFills ?OBJ2 ?HOLE). Note too that a partial filler need not be wholly inside a hole (it may\nstick out), which means that every complete filler also qualifies as\n(is a limit case of) a partial one.\n")
(type INSTANCE)
;+ (allowed-classes Hole)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot fills
;+ (comment "Holes can be filled. (&%fills ?OBJ ?HOLE) means that the &%Object ?OBJ fills the &%Hole ?HOLE. Note that &%fills here means perfectly filled.")
(type INSTANCE)
;+ (allowed-classes Hole)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot connected
;+ (comment "(connected ?OBJ1 ?OBJ2) means that ?OBJ1 &%meetsSpatially ?OBJ2 or that ?OBJ1 &%overlapsSpatially ?OBJ2.")
(type INSTANCE)
;+ (allowed-classes Object)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot properlyFills
;+ (comment "(&%properlyFills ?OBJ ?HOLE) means that ?HOLE is properly (though perhaps incompletely) filled by ?OBJ, i.e. some part of ?HOLE is perfectly filled by ?OBJ. Note that &%properlyFills is the dual of &%completelyFills, and is so related to &%partiallyFills that ?OBJ &%properlyFills ?HOLE just in case ?OBJ &%partiallyFills every part of ?HOLE. (Thus, every perfect filler is both complete and proper in this sense).")
(type INSTANCE)
;+ (allowed-classes Hole)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot between
;+ (comment "(between ?OBJ1 ?OBJ2 ?OBJ3) means that ?OBJ2 is spatially located between ?OBJ1 and ?OBJ3. Note that this implies that ?OBJ2 is directly between ?OBJ1 and ?OBJ3, i.e. the projections of ?OBJ1 and ?OBJ3 overlap with ?OBJ2.")
(type INSTANCE)
;+ (allowed-classes Object)
;+ (cardinality 0 1)
(create-accessor read-write))
(multislot consistsOf
;+ (comment "consistsOf points from a physical object to the substance of which it is composed. This is usually used for objects that are relatively homogeneous, but could be used to enumerate all of the component substances.")
(type INSTANCE)
;+ (allowed-classes Substance)
(create-accessor read-write))
(single-slot overlapsSpatially
;+ (comment "(&%overlapsSpatially ?OBJ1 ?OBJ2) means that the &%Objects ?OBJ1 and ?OBJ2 have some parts in common. This is a reflexive and symmetric (but not transitive) relation.\n\n(connected ?OBJ1 ?OBJ2) means that ?OBJ1 &%meetsSpatially ?OBJ2 or that ?OBJ1 &%overlapsSpatially ?OBJ2.")
(type INSTANCE)
;+ (allowed-classes Object)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot meetsSpatially
;+ (comment "(&%meetsSpatially ?OBJ1 ?OBJ2) means that ?OBJ1 and ?OBJ2 are &%connected but that neither ?OBJ1 nor ?OBJ2 &%overlapsSpatially the other.\n\n(connected ?OBJ1 ?OBJ2) means that ?OBJ1 &%meetsSpatially ?OBJ2 or that ?OBJ1 &%overlapsSpatially ?OBJ2.")
(type INSTANCE)
;+ (allowed-classes Object)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot exploits
;+ (comment "(&%exploits ?OBJ ?AGENT) means that ?OBJ is used by ?AGENT as a &%resource in an unspecified instance of &%Process. This &%Predicate, as its corresponding axiom indicates, is a composition of the relations &%agent and &%resource.\n")
(type INSTANCE)
;+ (allowed-classes Agent)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot bottom
;+ (comment "(&%bottom ?BOTTOM ?OBJECT) holds if ?BOTTOM is the\nlowest or deepest maximal superficial part of ?OBJECT.\n")
(type INSTANCE)
;+ (allowed-classes Object)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot MereologicalDifferenceFn
;+ (comment "(&%MereologicalDifferenceFn ?OBJ1 ?OBJ2) denotes the &%Object consisting of the parts which belong to ?OBJ1 and not to ?OBJ2.")
(type INSTANCE)
;+ (allowed-classes Object)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot uses
;+ (comment "(&%uses ?OBJECT AGENT) means that ?OBJECT is used by ?AGENT as an instrument in an unspecified &%Process. This &%Predicate, as its corresponding axiom indicates, is a composition of the &%CaseRoles &%agent and &%instrument.")
(type INSTANCE)
;+ (allowed-classes Agent)
;+ (cardinality 0 1)
(create-accessor read-write)))
(defclass SelfConnectedObject "SUO 1.55: July 14, 2003\nA &%SelfConnectedObject is any \n&%Object that does not consist of two or more disconnected parts."
(is-a Object)
(role concrete)
(single-slot FrontFn
;+ (comment "A &%Function that maps an &%Object to the side that generally receives the most attention or that typically faces the direction in which the &%Object moves. Note that this is a partial function, since some &%Objects do not have sides, e.g. apples and spheres. Note too that the &%range of this &%Function is indefinite in much the way that &%ImmediateFutureFn and &%ImmediatePastFn are indefinite.\nAlthough this indefiniteness is undesirable from a theoretical standpoint, it does not have significant practical implications, since there is widespread intersubjective agreement about the most common cases.\n")
(type INSTANCE)
;+ (allowed-classes SelfConnectedObject)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot connects
;+ (comment "The relationship between three things, when one of the three things connects the other two. More formally, (&%connects ?OBJ1 ?OBJ2 ?OBJ3) means that (&%connected ?OBJ1 ?OBJ2) and (&%connected ?OBJ1 ?OBJ3) and not (&%connected ?OBJ2 ?OBJ3).")
(type INSTANCE)
;+ (allowed-classes SelfConnectedObject)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot BackFn
;+ (comment "A &%Function that maps an &%Object to the side that is opposite the &%FrontFn of the &%Object. Note that this is a partial function, since some &%Objects do not have sides, e.g. apples and spheres. Note too that the &%range of this &%Function is indefinite in much the way that &%ImmediateFutureFn and &%ImmediatePastFn are indefinite. Although this indefiniteness is undesirable from a theoretical standpoint, it does not have significant practical implications, since there is widespread intersubjective agreement about the most common cases.")
(type INSTANCE)
;+ (allowed-classes SelfConnectedObject)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot member
;+ (comment "A specialized common sense notion of part for uniform parts of &%Collections. For example, each sheep in a flock of\nsheep would have the relationship of member to the flock.\n")
(type INSTANCE)
;+ (allowed-classes Collection)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot surface
;+ (comment "(&%surface ?OBJ1 ?OBJ2) means that ?OBJ1 is a maximally connected &%superficialPart of ?OBJ2. Note that some &%SelfConnectedObjects have more than one surface, e.g. a hollow object like a tennis ball has both an inner and an outer surface.")
(type INSTANCE)
;+ (allowed-classes SelfConnectedObject)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot contains
;+ (comment "The relation of spatial containment for two separable objects. When the two objects are not separable (e.g. an\nautomobile and one of its seats), the relation of &%part should be used.\n(&%contains ?OBJ1 ?OBJ2) means that the &%SelfConnectedObject ?OBJ1 has\na space (i.e. a &%Hole) which is at least partially filled by ?OBJ2.\n")
(type INSTANCE)
;+ (allowed-classes Object)
;+ (cardinality 0 1)
(create-accessor read-write)))
(defclass Substance "SUO 1.55: July 14, 2003\nNOTE: domainSubclass materaial 1 Substance -- class as domain.\nAn &%Object in which every part is similar to \nevery other in every relevant respect. More precisely, something is a \n&%Substance when it has only arbitrary pieces as parts - any parts have \nproperties which are similar to those of the whole. Note that a &%Substance may nonetheless have physical properties that vary. For example, the temperature, chemical constitution, density, etc. may change from one part to another. An example would be a body of water."
(is-a SelfConnectedObject)
(role concrete)
(single-slot piece
;+ (comment "A specialized common sense notion of part for arbitrary parts of &%Substances. Quasi-synonyms are: chunk, hunk, bit, etc. Compare &%component, the other subrelation of &%part.\n")
(type INSTANCE)
;+ (allowed-classes Substance)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot material
;+ (comment "(&%material ?SUBSTANCE ?OBJECT) means that ?OBJECT is structurally made up in part of ?SUBSTANCE. This relation encompasses the concepts of 'composed of', 'made of', and 'formed of'. For example, plastic is a &%material of my computer monitor. Compare &%part and its subrelations, viz &%component and &%piece.")
(type INSTANCE)
;+ (allowed-classes CorpuscularObject)
;+ (cardinality 0 1)
(create-accessor read-write)))
(defclass PureSubstance "SUO 1.55: July 14, 2003\nThe &%Class of &%Substances with constant \ncomposition. A &%PureSubstance can be either an element (&%ElementalSubstance) \nor a compound of elements (&%CompoundSubstance). Examples: Table salt \n(sodium chloride, NaCl), sugar (sucrose, C_{12}H_{22}O_{11}), water (H_2O), \niron (Fe), copper (Cu), and oxygen (O_2)."
(is-a Substance)
(role concrete))
(defclass ElementalSubstance "SUO 1.55: July 14, 2003\nThe &%Class of &%PureSubstances that \ncannot be separated into two or more &%Substances by ordinary chemical \n(or physical) means. This excludes nuclear reactions. &%ElementalSubstances \nare composed of only one kind of atom. Examples: Iron (Fe), copper (Cu), \nand oxygen (O_2). &%ElementalSubstances are the simplest \n&%PureSubstances."
(is-a PureSubstance)
(role concrete))
(defclass Metal "SUO 1.55: July 14, 2003\nA &%Metal is an &%ElementalSubstance that conducts heat and electricity, is shiny and reflects many colors of light, and can be hammered \ninto sheets or drawn into wire. About 80% of the known chemical elements \n(&%ElementalSubstances) are metals."
(is-a ElementalSubstance)
(role concrete))
(defclass Atom "SUO 1.55: July 14, 2003\nAn extremely small unit of matter that retains its identity in Chemical reactions. It consists of an &%AtomicNucleus and \n&%Electrons surrounding the &%AtomicNucleus."
(is-a ElementalSubstance)
(role concrete))
(defclass SubatomicParticle "SUO 1.55: July 14, 2003\nThe class of &%ElementalSubstances that \nare smaller than &%Atoms and compose &%Atoms."
(is-a ElementalSubstance)
(role concrete))
(defclass AtomicNucleus "SUO 1.55: July 14, 2003\nThe core of the &%Atom. It is composed of \n&%Protons and &%Neutrons."
(is-a SubatomicParticle)
(role concrete))
(defclass Electron "SUO 1.55: July 14, 2003\n&%SubatomicParticles that surround the \n&%AtomicNucleus. They have a negative charge."
(is-a SubatomicParticle)
(role concrete))
(defclass Proton "SUO 1.55: July 14, 2003\nComponents of the &%AtomicNucleus. They have a \npositive charge."
(is-a SubatomicParticle)
(role concrete))
(defclass Neutron "SUO 1.55: July 14, 2003\nComponents of the &%AtomicNucleus. They have no \ncharge."
(is-a SubatomicParticle)
(role concrete))
(defclass CompoundSubstance "SUO 1.55: July 14, 2003\nThe &%Class of &%Substances that contain \ntwo or more elements (&%ElementalSubstances), in definite proportion by weight. \nThe composition of a pure compound will be invariant, regardless of the method \nof preparation. Compounds are composed of more than one kind of atom (element). \nThe term molecule is often used for the smallest unit of a compound that still \nretains all of the properties of the compound. Examples: Table salt (sodium \nchloride, NaCl), sugar (sucrose, C_{12}H_{22}O_{11}), and water (H_2O). "
(is-a PureSubstance)
(role concrete))
(defclass Water "SUO 1.55: July 14, 2003\nThe &%Class of samples of the compound H20. Note\nthat this &%Class covers both pure and impure &%Water."
(is-a CompoundSubstance)
(role concrete))
(defclass Molecule "SUO 1.55: July 14, 2003\nA molecule is the smallest unit of matter of a\n&%CompoundSubstance that retains all the physical and chemical properties\nof that substance, e.g., Ne, H2, H2O. A molecule is two or more &%Atoms\nlinked by a chemical bond."
(is-a CompoundSubstance)
(role concrete))
(defclass Mixture "SUO 1.55: July 14, 2003\nA &%Mixture is two or more &%PureSubstances, \ncombined in varying proportions - each retaining its own specific properties. \nThe components of a &%Mixture can be separated by physical means, i.e. without \nthe making and breaking of chemical bonds. Examples: Air, table salt thoroughly \ndissolved in water, milk, wood, and concrete. "
(is-a Substance)
(role concrete))
(defclass Solution "SUO 1.55: July 14, 2003\nA liquid mixture. The most abundant component in \na solution is called the solvent. Other components are called solutes. \nA solution, though homogeneous, may nonetheless have variable composition. \nAny amount of salt, up to a maximum limit, can be dissolved in a given \namount of water."
(is-a Mixture)
(role concrete))
(defclass Mineral "SUO 1.55: July 14, 2003\n Any of various naturally occurring homogeneous substances (such as stone, coal, salt, sulfur, sand, petroleum), or synthetic substances having the chemical composition and crystalline form and properties of a naturally occurring mineral."
(is-a Mixture)
(role concrete))
(defclass GasMixture "SUO 1.55: July 14, 2003\nAny &%Mixture that satisfies two conditions,\nviz. it is made up predominantly of things which are a &%Gas and any\ncomponent other than &%Gas in the &%Mixture is in the form of fine particles\nwhich are suspended in the &%Gas."
(is-a Mixture)
(role concrete))
(defclass Smoke "SUO 1.55: July 14, 2003\nA mixture of fine particles suspended in a gas that is\nproduced by &%Combustion."
(is-a GasMixture)
(role concrete))
(defclass Cloud "SUO 1.55: July 14, 2003\nAny &%GasMixture that is visible, e.g. clouds of &%Smoke\nproduced by a fire or clouds of water vapor in the sky."
(is-a GasMixture)
(role concrete))
(defclass WaterCloud "SUO 1.55: July 14, 2003\nAny &%Cloud that is composed primarily of water vapor."
(is-a Cloud)
(role concrete))
(defclass Air "SUO 1.55: July 14, 2003\n&%Air is the gaseous stuff that makes up the\natmosphere surrounding Earth."
(is-a GasMixture)
(role concrete))
(defclass BodySubstance "SUO 1.55: July 14, 2003\nExtracellular material and mixtures of\ncells and extracellular material that are produced, excreted or accreted\nby an &%Organism. Included here are &%Substances such as saliva, dental\nenamel, sweat, and gastric acid."
(is-a Mixture)
(role concrete))
(defclass AnimalSubstance "SUO 1.55: July 14, 2003\n&%BodySubstances that are produced\nexclusively by &%Animals."
(is-a BodySubstance)
(role concrete))
(defclass PlantSubstance "SUO 1.55: July 14, 2003\n&%BodySubstances that are produced\nexclusively by &%Plants."
(is-a BodySubstance)
(role concrete))
(defclass Blood "SUO 1.55: July 14, 2003\nA fluid present in &%Animals that transports\n&%Nutrients to and waste products away from various &%BodyParts."
(is-a BodySubstance)
(role concrete))
(defclass Tissue "SUO 1.55: July 14, 2003\nAn aggregation of similarly specialized &%Cells\nand the associated intercellular substance. &%Tissues are relatively\nnon-localized in comparison to &%BodyParts, &%Organs or &%Organ components.\nThe main features of &%Tissues are self-connectivity (see\n&%SelfConnectedObject) and being a homogeneous mass (all parts in the\nsame granularity are instances of &%Tissue as well)."
(is-a BodySubstance)
(role concrete))
(defclass Bone "SUO 1.55: July 14, 2003\nRigid &%Tissue composed largely of calcium that makes up\nthe skeleton of &%Vertebrates. Note that this &%Class also includes teeth."
(is-a Tissue)
(role concrete))
(defclass Muscle "SUO 1.55: July 14, 2003\nNonrigid &%Tissue appearing only in &%Animals and\ncomposed largely of contractile cells."
(is-a Tissue)
(role concrete))
(defclass FatTissue "SUO 1.55: July 14, 2003\nNonrigid &%Tissue that is composed largely of\nfat cells."
(is-a Tissue)
(role concrete))
(defclass BiologicallyActiveSubstance "SUO 1.55: July 14, 2003\nA &%Substance that is\ncapable of inducing a change in the structure or functioning of an\n&%Organism. This &%Class includes &%Substances used in the treatment,\ndiagnosis, prevention or analysis of normal and abnormal body function.\nThis &%Class also includes &%Substances that occur naturally in the body\nand are administered therapeutically. Finally, &%BiologicallyActiveSubstance\nincludes &%Nutrients, most drugs of abuse, and agents that require special\nhandling because of their toxicity."
(is-a Substance)
(role concrete))
(defclass Nutrient "SUO 1.55: July 14, 2003\nA &%BiologicallyActiveSubstance required by an &%Organism.\nIt is generally ingested as &%Food, and it is of primary interest because of its role\nin the biologic functioning of the &%Organism."
(is-a BiologicallyActiveSubstance)
(role concrete))
(defclass Protein "SUO 1.55: July 14, 2003\nA &%Nutrient made up of amino acids joined by\npeptide bonds."
(is-a Nutrient)
(role concrete))
(defclass Enzyme "SUO 1.55: July 14, 2003\nA complex &%Protein that is produced by living\ncells and which catalyzes specific biochemical reactions. There are six\nmain types of enzymes: oxidoreductases, transferases, hydrolases,\nlyases, isomerases, and ligases."
(is-a Protein)
(role concrete))
(defclass Carbohydrate "SUO 1.55: July 14, 2003\nAn element of living cells and a source of\nenergy for &%Animals. This class includes both simple &%Carbohydrates,\ni.e. sugars, and complex &%Carbohydrates, i.e. starches."
(is-a Nutrient)
(role concrete))
(defclass Vitamin "SUO 1.55: July 14, 2003\nA &%Nutrient present in natural products or made\nsynthetically, which is essential in the diet of &%Humans and other higher\n&%Animals. Included here are &%Vitamin precursors and provitamins."
(is-a Nutrient)
(role concrete))
(defclass Hormone "SUO 1.55: July 14, 2003\nIn &%Animals, a chemical secreted by an\nendocrine gland whose products are released into the circulating fluid.\n&%Plant hormones or synthetic hormones which are used only to alter or\ncontrol various physiologic processes, e.g., reproductive control agents,\nare assigned to the &%Class &%BiologicallyActiveSubstance. &%Hormones act as\nchemical messengers and regulate various physiologic processes such as\ngrowth, reproduction, metabolism, etc. They usually fall into two broad\ncategories, viz. steroid hormones and peptide hormones."
(is-a BodySubstance BiologicallyActiveSubstance)
(role concrete))
(defclass Paper "Paper is a material usually made from plants and formed artifactually into sheets. It is used for several purposes, most notably for writing and printing. Some sheet-like materials not made from plants but resembling paper might be called \"paper\")."
(is-a Substance)
(role concrete)
(single-slot material
;+ (comment "(&%material ?SUBSTANCE ?OBJECT) means that ?OBJECT is structurally made up in part of ?SUBSTANCE. This relation encompasses the concepts of 'composed of', 'made of', and 'formed of'. For example, plastic is a &%material of my computer monitor. Compare &%part and its subrelations, viz &%component and &%piece.")
(type INSTANCE)
;+ (allowed-classes CorpuscularObject PaperDocument)
;+ (cardinality 0 1)
(create-accessor read-write)))
(defclass CorpuscularObject "SUO 1.55: July 14, 2003\nA &%SelfConnectedObject whose parts have properties that are not shared by the whole."
(is-a SelfConnectedObject)
(role concrete)
(single-slot component
;+ (comment "A specialized common sense notion of part\nfor heterogeneous parts of complexes. (&%component ?COMPONENT ?WHOLE)\nmeans that ?COMPONENT is a component of ?WHOLE. Examples of component\ninclude the doors and walls of a house, the states or provinces of a\ncountry, or the limbs and organs of an animal. Compare &%piece, which\nis also a subrelation of &%part.\n")
(type INSTANCE)
;+ (allowed-classes CorpuscularObject)
;+ (cardinality 0 1)
(create-accessor read-write)))
(defclass OrganicObject "SUO 1.55: July 14, 2003\nThis class encompasses &%Organisms,\n&%CorpuscularObjects that are parts of &%Organisms, i.e. &%BodyParts,\nand &%CorpuscularObjects that are nonintentionally produced by\n&%Organisms, e.g. &%ReproductiveBodies."
(is-a CorpuscularObject)
(role concrete))
(defclass AnatomicalStructure "SUO 1.55: July 14, 2003\nA normal or pathological part\nof the anatomy or structural organization of an &%Organism. This\nclass covers &%BodyParts, as well as structures that are given off\nby &%Organisms, e.g. &%ReproductiveBodies."
(is-a OrganicObject)
(role concrete))
(defclass AbnormalAnatomicalStructure "SUO 1.55: July 14, 2003\nAny &%AnatomicalStructure which\nis not normally found in the &%Organism of which it is a part, i.e. it is\nthe result of a &%PathologicProcess. This class covers tumors, birth marks,\ngoiters, etc."
(is-a AnatomicalStructure)
(role concrete))
(defclass BodyPart "SUO 1.55: July 14, 2003\nA collection of &%Cells and &%Tissues which\nare localized to a specific area of an &%Organism and which are not\npathological. The instances of this &%Class range from gross structures\nto small components of complex &%Organs."
(is-a AnatomicalStructure)
(role concrete))
(defclass ReproductiveBody "SUO 1.55: July 14, 2003\nReproductive structure of &%Organisms.\nConsists of an &%Embryonic &%Object and a nutritive/protective envelope.\nNote that this class includes seeds, spores, and &%FruitOrVegetables, as\nwell as the eggs produced by &%Animals."
(is-a BodyPart)
(role concrete))
(defclass BodyCovering "SUO 1.55: July 14, 2003\nAny &%BodyPart which is a covering of another\n&%BodyPart or of an entire &%Organism. This would include the rinds of\n&%FruitOrVegetables and the skins of &%Animals."
(is-a BodyPart)
(role concrete))
(defclass BodyJunction "SUO 1.55: July 14, 2003\nThe place where two &%BodyParts\nmeet or connect."
(is-a BodyPart)
(role concrete))
(defclass BodyVessel "SUO 1.55: July 14, 2003\nAny tube-like structure which occurs naturally in\nan &%Organism and through which a &%BodySubstance can circulate."
(is-a BodyPart)
(role concrete))
(defclass Cell "SUO 1.55: July 14, 2003\nThe fundamental structural and functional unit of living &%Organisms."
(is-a BodyPart)
(role concrete))
(defclass Organ "SUO 1.55: July 14, 2003\nA somewhat independent &%BodyPart that performs a\nspecialized function. Note that this functional definition covers bodily\nsystems, e.g. the digestive system or the central nervous system."
(is-a BodyPart)
(role concrete))
(defclass Gland "SUO 1.55: July 14, 2003\nAn &%Organ that removes &%Substances from the &%Blood,\nalters them in some way, and then releases them."
(is-a Organ)
(role concrete))
(defclass AnimalAnatomicalStructure "SUO 1.55: July 14, 2003\n&%AnatomicalStructures that\nare possessed exclusively by &%Animals."
(is-a AnatomicalStructure)
(role concrete))
(defclass Egg "SUO 1.55: July 14, 2003\nThe fertilized or unfertilized female &%ReproductiveBody\nof an &%Animal. This includes &%Bird and &%Reptile eggs, as well as mammalian\nova."
(is-a ReproductiveBody AnimalAnatomicalStructure)
(role concrete))
(defclass PlantAnatomicalStructure "SUO 1.55: July 14, 2003\n&%AnatomicalStructures that\nare possessed exclusively by &%Plants."
(is-a AnatomicalStructure)
(role concrete))
(defclass Seed "SUO 1.55: July 14, 2003\nThe fertilized or unfertilized female &%ReproductiveBody\nof a &%FloweringPlant."
(is-a ReproductiveBody PlantAnatomicalStructure)
(role concrete))
(defclass Pollen "SUO 1.55: July 14, 2003\nA powder produced by &%FloweringPlants that contains male\ngametes and is capable of fertilizing the seeds of &%FloweringPlants of the same\nspecies."
(is-a ReproductiveBody PlantAnatomicalStructure)
(role concrete))
(defclass FruitOrVegetable "SUO 1.55: July 14, 2003\nAny fruit or vegetable, i.e. a\nripened &%ReproductiveBody of a &%Plant. Note that &%FruitOrVegetable\nis not a subclass of &%Food, because some fruits, e.g. poisonous\nberries, are not edible."
(is-a PlantAnatomicalStructure ReproductiveBody)
(role concrete))
(defclass Spore "SUO 1.55: July 14, 2003\nAny &%ReproductiveBody of a &%NonFloweringPlant."
(is-a ReproductiveBody PlantAnatomicalStructure)
(role concrete))
(defclass Artifact "SUO 1.55: July 14, 2003\nA &%CorpuscularObject that is the product of a\n&%Making."
(is-a CorpuscularObject)
(role concrete))
(defclass Product "SUO 1.55: July 14, 2003\nAn &%Artifact that is produced by &%Manufacture and\nthat is intended to be sold."
(is-a Artifact)
(role concrete))
(defclass StationaryArtifact "SUO 1.55: July 14, 2003\nA &%StationaryArtifact is an &%Artifact\nthat has a fixed spatial location. Most instances of this &%Class are\narchitectural works, e.g. the Eiffel Tower, the Great Pyramids, office towers,\nsingle-family houses, etc."
(is-a Artifact)
(role concrete))
(defclass Building "SUO 1.55: July 14, 2003\nThe Class of &%StationaryArtifacts which are\nintended to house &%Humans and their activities."
(is-a StationaryArtifact)
(role concrete))
(defclass House
(is-a Building)
(role concrete))
(defclass Room "SUO 1.55: July 14, 2003\nA &%properPart of a &%Building which is separated from\nthe exterior of the &%Building and/or other &%Rooms of the &%Building by walls.\nSome &%Rooms may have a specific purpose, e.g. sleeping, bathing, cooking,\nentertainment, etc."
(is-a StationaryArtifact)
(role concrete))
(defclass Residence "SUO 1.55: July 14, 2003\nA &%Building or part of a &%Building which provides\nsome accomodation for sleeping."
(is-a StationaryArtifact)
(role concrete))
(defclass PermanentResidence "SUO 1.55: July 14, 2003\nA &%Residence where people live, i.e.\nwhere people have a &%home."
(is-a Residence)
(role concrete))
(defclass SingleFamilyResidence "SUO 1.55: July 14, 2003\nA &%PermanentResidence which is\nintended to be the &%home of a single &%SocialUnit. This class covers\n&%Houses, &%ApartmentUnits, and &%CondominiumUnits."
(is-a PermanentResidence)
(role concrete))
(defclass TemporaryResidence "SUO 1.55: July 14, 2003\nA &%Residence which is strictly temporary,\ni.e. where no one makes his/her &%home."
(is-a Residence)
(role concrete))
(defclass ResidentialBuilding "SUO 1.55: July 14, 2003\nA &%Building which provides some\naccomodation for sleeping. Note that this class does not cover just\npermanent residences, e.g. &%Houses and condominium and apartment buildings,\nbut also temporary residences, e.g. hotels and dormitories.\n&%ResidentialBuildings are also distinguished from &%CommercialBuildings,\nwhich are intended to serve an organizational rather than a residential\nfunction."
(is-a Building Residence)
(role concrete))
(defclass ArtWork "SUO 1.55: July 14, 2003\n&%Artifacts that are created primarily for\naesthetic appreciation. Note that this &%Class does not include\nmost examples of architecture, which belong under &%StationaryArtifact."
(is-a Artifact)
(role concrete))
(defclass Fabric "SUO 1.55: July 14, 2003\n&%Artifacts that are created by weaving together\nnatural or synthetic fibers or by treating the skins of certain sorts of\n&%Animals. Note that this &%Class includes articles that are created by\nstitching together various types of fabrics, e.g. bedspreads. On the other\nhand, &%Clothing is not a &%subclass of &%Fabric, because many clothing items\ncontain elements that are not fabrics."
(is-a Artifact)
(role concrete))
(defclass Clothing "SUO 1.55: July 14, 2003\n&%Artifact made out of fabrics and possibly other\nmaterials that are used to cover the bodies of &%Humans."
(is-a Artifact)
(role concrete))
(defclass Device "SUO 1.55: July 14, 2003\nA &%Device is an &%Artifact whose purpose is to\nserve as an &%instrument in a specific subclass of &%Process."
(is-a Artifact)
(role concrete))
(defclass MusicalInstrument "SUO 1.55: July 14, 2003\nA &%Device which is manipulated by a &%Human\nand whose purpose is to produce &%Music."
(is-a Device)
(role concrete))
(defclass TransportationDevice "SUO 1.55: July 14, 2003\nA &%TransportationDevice is a &%Device\nwhich serves as the &%instrument in a &%Transportation &%Process which carries\nthe &%patient of the &%Process from one point to another."
(is-a Device)
(role concrete))
(defclass Vehicle "SUO 1.55: July 14, 2003\n&%Vehicle is the subclass of\n&%TransportationDevices that transport passengers or goods\nfrom one place to another by moving from one place to the other\nwith them, e.g., cars, trucks, ferries, and airplanes. Contrast\nwith devices such as pipelines, escalators, or supermarket\ncheckout belts, which carry items from one place to another by means\nof a moving part, without the device removing from the origin to\nthe destination."
(is-a TransportationDevice)
(role concrete))
(defclass MeasuringDevice "SUO 1.55: July 14, 2003\nAny &%Device whose purpose is to measure a\n&%PhysicalQuantity."
(is-a Device)
(role concrete))
(defclass AttachingDevice "SUO 1.55: July 14, 2003\nA &%Device whose purpose is to attach one thing\nto something else, e.g. nails, screws, buttons, etc."
(is-a Device)
(role concrete))
(defclass Weapon "SUO 1.55: July 14, 2003\nThe &%Class of &%Devices that are designed\nprimarily to damage or destroy &%Humans/&%Animals, &%StationaryArtifacts or\nthe places inhabited by &%Humans/&%Animals."
(is-a Device)
(role concrete))
(defclass Machine "SUO 1.55: July 14, 2003\n&%Machines are &%Devices that that have a\nwell-defined &%resource and &%result and that automatically convert\nthe &%resource into the &%result."
(is-a Device)
(role concrete))
(defclass EngineeringComponent "SUO 1.55: July 14, 2003\nA fundamental concept that applies \nin many engineering domains. An &%EngineeringComponent is an element of \na &%Device that is a physically whole object, such as one might \nsee listed as standard parts in a catalog. The main difference betweeen \n&%EngineeringComponents and arbitrary globs of matter is that \n&%EngineeringComponents are object-like in a modeling sense. Thus, an \n&%EngineeringComponent is not an arbtrary subregion, but a part of a \nsystem with a stable identity."
(is-a Device)
(role concrete)
(single-slot connectedEngineeringComponents
;+ (comment "This is the most general connection relation between &%EngineeringComponents. If (&%connectedEngineeringComponents ?COMP1 ?COMP2), then neither ?COMP1 nor ?COMP2 can be an &%engineeringSubcomponent of the other. The relation &%connectedEngineeringComponents is a &%SymmetricRelation; there is no information in the direction of connection between two components. It is also an &%IrreflexiveRelation; no &%EngineeringComponent bears this relation to itself. Note that this relation does not associate a name or type with the connection.")
(type INSTANCE)
;+ (allowed-classes EngineeringComponent)
;+ (cardinality 0 1)
(create-accessor read-write)))
(defclass EngineeringConnection "SUO 1.55: July 14, 2003\nAn &%EngineeringConnection is an &%EngineeringComponent that represents a connection relationship between two other &%EngineeringComponents. It is a reification of the &%Predicate &%connectedEngineeringComponents. That means that whenever\nthis &%Predicate holds between two &%EngineeringComponents, there exists an\n&%EngineeringConnection. The practical reason for reifying a relationship\nis to be able to attach other information about it. For example, one\nmight want to say that a particular connection is associated with some\nshared parameters, or that it is of a particular type.\n&%EngineeringConnections are &%EngineeringComponents and can therefore be\nan &%engineeringSubcomponent of other &%EngineeringComponents. However,\nto provide for modular regularity in component systems,\n&%EngineeringConnections cannot be connected. For each pair of\n&%EngineeringComponents related by &%connectedEngineeringComponents, there\nexists at least one &%EngineeringConnection. However, that object may not\nbe unique, and the same &%EngineeringConnection may be associated with\nseveral pairs of &%EngineeringComponents."
(is-a EngineeringComponent)
(role concrete)
(single-slot connectsEngineeringComponents
;+ (comment "&%connectsEngineeringComponents is a &%TernaryPredicate that maps from an &%EngineeringConnection to the\n&%EngineeringComponents it connects. Since &%EngineeringComponents cannot\nbe connected to themselves and there cannot be an &%EngineeringConnection\nwithout a &%connectedEngineeringComponents &%Predicate, the second and third arguments of any &%connectsEngineeringComponents relationship will always be\ndistinct for any given first argument.\n\nThe relationship between three things, when one of the three things connects the other two. More formally, (&%connects ?OBJ1 ?OBJ2 ?OBJ3) means that (&%connected ?OBJ1 ?OBJ2) and (&%connected ?OBJ1 ?OBJ3) and not (&%connected ?OBJ2 ?OBJ3).")
(type INSTANCE)
;+ (allowed-classes EngineeringComponent)
;+ (cardinality 0 1)
(create-accessor read-write)))
(defclass Electronic "A persistent artifact represented in an electronic form (for example, on a hard-drive)."
(is-a Artifact)
(role concrete))
(defclass File
(is-a Electronic)
(role concrete))
(defclass ProductObject "SUO 1.15: September 6, 2001\nAn &%Artifact that is produced by &%Manufacture and that is intended to be sold."
(is-a Artifact)
(role concrete)
(single-slot ID
;+ (comment "unique identifier")
(type STRING)
;+ (cardinality 1 1)
(create-accessor read-write)))
(defclass SymbolicObject "An Object created by a CognitiveAgent that s intended to represent something other than itself. Linguistic, pictorial, graphic, artistic objects are examples."
(is-a Artifact)
(role concrete))
(defclass ContentBearingObject "SUO 1.55: July 14, 2003\nAny &%SelfConnectedObject that expresses \ninformation."
(is-a CorpuscularObject SymbolicObject)
(role concrete)
(single-slot EditionFn
;+ (comment "A &%BinaryFunction that maps a type of text (e.g. Agatha Christie's Murder_on_the_Orient_Express) and a number to the edition of the text type corresponding to the number.")
(type INSTANCE)
;+ (allowed-classes PositiveInteger)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot equivalentContentInstance
;+ (comment "A &%BinaryPredicate relating two\ninstances of &%ContentBearingObject. (&%equivalentContentInstance\n?OBJ1 ?OBJ2) means that the content expressed by ?OBJ1 is identical to the content expressed by ?OBJ2. An example would be the relationship between a handwritten draft of a letter to one's lawyer and a typed copy of the same letter. Note that (&%equivalentContentInstance ?OBJ1 ?OBJ2) implies (&%subsumesContentInstance ?OBJ1 ?OBJ2) and\n(&%subsumesContentInstance ?OBJ2 ?OBJ2).\n")
(type INSTANCE)
;+ (allowed-classes ContentBearingObject)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot subsumesContentClass
;+ (comment "NOTE: Domain1 is a class\nA &%BinaryPredicate that relates two subclasses of &%ContentBearingObject. (&%subsumesContentClass ?CLASS1 ?CLASS2) means that the content expressed by each instance of ?CLASS2 is\nalso expressed by each instance of ?CLASS1. Examples include the\nrelationship between a poem and one of its stanzas or between a book and\none of its chapters. Note that this is a relation between subclasses of &%ContentBearingObject, rather than instances. If one wants to relate instances, the &%Predicate &%subsumesContentInstance can be used. Note that &%subsumesContentClass is needed in many cases. Consider, for example, the relation between the King James edition of the Bible and its Book of Genesis. This relation holds for every copy of this edition and not just for a single instance.\n")
(type SYMBOL)
;+ (allowed-parents ContentBearingObject)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot subsumesContentInstance
;+ (comment "A &%BinaryPredicate relating two instances of &%ContentBearingObject. (&%subsumesContentInstance ?OBJ1 ?OBJ2) means that the content expressed by ?OBJ2 is part of the content expressed by ?OBJ1. An example is the relationship between a handwritten poem and one of its stanzas. Note that this is a relation between instances, rather than &%Classes. If one wants to assert a content relationship between &%Classes, e.g. between the version of an intellectual work and a part of that work, the relation &%subsumesContentClass should be used.")
(type INSTANCE)
;+ (allowed-classes ContentBearingObject)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot containsInformation
;+ (comment "A subrelation of &%represents. This predicate relates a &%ContentBearingObject to the &%Proposition that is expressed by the &%ContentBearingObject. Examples include the relationships between a physical novel and its story and between a printed score and its musical content.")
(type INSTANCE)
;+ (allowed-classes Proposition)
;+ (cardinality 0 1)
(create-accessor read-write)))
(defclass SymbolicString "SUO 1.55: July 14, 2003\nThe &%Class of alphanumeric sequences."
(is-a ContentBearingObject)
(role concrete)
(single-slot relatedExternalConcept
;+ (comment "Used to signify a three-place relation between a concept in an external knowledge source, a concept in the SUMO, and the name of the other knowledge source.")
(type INSTANCE)
;+ (allowed-classes Entity)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot KappaFn
;+ (comment "A class-forming operator that takes two arguments: a variable and a formula containing at least one unbound occurrence of the variable. The result of applying &%KappaFn to a variable and a formula is the &%SetOrClass of things that satisfy the formula. For example, we can denote the &%SetOrClass of prime numbers that are less than 100 with the following expression: (KappaFn ?NUMBER (and (instance ?NUMBER PrimeNumber) (lessThan ?NUMBER 100))). Note that the use of this function is discouraged, since there is currently no axiomatic support for it.")
(type INSTANCE)
;+ (allowed-classes Formula)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot names
;+ (comment "(&%names ?STRING ?ENTITY) means that the thing ?ENTITY\nhas the &%SymbolicString ?STRING as its name. Note that &%names and &%represents are the two immediate &%subrelations of &%refers. The predicate &%names is used when the referring item is merely a tag without connotative content, while the predicate &%represents is used for referring items that have such content.\n\n(&%refers ?OBJ1 ?OBJ2) means that ?OBJ1 mentions or includes a reference to ?OBJ2. Note that &%refers is more general in meaning than &%represents, because presumably something can represent something else only if it refers to this other thing. For example, an article whose topic is a recent change in the price of oil may refer to many other things, e.g. the general state of the economy, the weather in California, the prospect of global warming, the options for alternative energy sources, the stock prices of various oil companies, etc.")
(type INSTANCE)
;+ (allowed-classes Entity)
;+ (cardinality 0 1)
(create-accessor read-write)))
(defclass Character "SUO 1.55: July 14, 2003\nAn element of an alphabet, a set of numerals, etc.\nNote that a &%Character may or may not be part of a &%Language. &%Character\nis a subclass of &%SymbolicString, because every instance of &%Character is\nan alphanumeric sequence consisting of a single element."
(is-a SymbolicString)
(role concrete))
(defclass Icon "SUO 1.55: July 14, 2003\nThis is the subclass of &%ContentBearingObjects\nwhich are not part of a &%Language and which have some sort of similarity\nwith the &%Objects that they represent. This &%Class would include symbolic\nroadway signs, representational art works, photographs, etc."
(is-a ContentBearingObject)
(role concrete))
(defclass RepresentationalArtWork "SUO 1.55: July 14, 2003\nAny &%ArtWork that represents\nsomething &%Physical."
(is-a ArtWork Icon)
(role concrete))
(defclass LinguisticExpression "SUO 1.55: July 14, 2003\nThis is the subclass of \n&%ContentBearingObjects which are language-related. Note that this &%Class \nencompasses both &%Language and the the elements of &%Languages, \ne.g. &%Words."
(is-a ContentBearingObject)
(role concrete)
(single-slot expressedInLanguage
;+ (comment "(&%expressedInLanguage ?EXPRESS ?LANG) means that ?EXPRESS is expressed in &%Language ?LANG.")
(type INSTANCE)
;+ (allowed-classes Language)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot representsInLanguage
;+ (comment "A very general predicate. (&%representsInLanguage ?THING ?ENTITY ?LANGUAGE) means that the &%instance of &%Physical ?THING stands for ?ENTITY in the language ?LANGUAGE.")
(type INSTANCE)
;+ (allowed-classes Entity)
;+ (cardinality 0 1)
(create-accessor read-write)))
(defclass Language "SUO 1.55: July 14, 2003\nA system of signs for expressing thought. The\nsystem can be either natural or artificial, i.e. something that emerges\ngradually as a cultural artifact or something that is intentionally created\nby a person or group of people."
(is-a LinguisticExpression)
(role concrete))
(defclass AnimalLanguage "SUO 1.55: July 14, 2003\nThe &%subclass of &%Languages used by\n&%Animals other than &%Humans."
(is-a Language)
(role concrete))
(defclass ArtificialLanguage "SUO 1.55: July 14, 2003\nThe &%subclass of &%Languages that are\ndesigned by &%Humans."
(is-a Language)
(role concrete))
(defclass ComputerLanguage "SUO 1.55: July 14, 2003\nThe class of &%Languages designed for\nand interpreted by a computer."
(is-a ArtificialLanguage)
(role concrete))
(defclass HumanLanguage "SUO 1.55: July 14, 2003\nThe &%subclass of &%Languages used by\n&%Humans."
(is-a Language)
(role concrete))
(defclass ConstructedLanguage "SUO 1.55: July 14, 2003\nAn &%ConstructedLanguage is a\n&%HumanLanguage that did not evolve spontaneously within a language\ncommunity, but rather had its core grammar and vocabulary invented by\none or more language experts, often with an aim to produce a more\ngrammatically regular language than any language that has evolved\nnaturally. This &%Class includes languages like Esperanto that were\ncreated to facilitate international communication"
(is-a HumanLanguage ArtificialLanguage)
(role concrete))
(defclass NaturalLanguage "SUO 1.55: July 14, 2003\nThe &%subclass of &%HumanLanguages which\nare not designed and which evolve from generation to generation. This\n&%Class includes all of the national languages, e.g. English, Spanish,\nJapanese, etc. Note that this class includes dialects of natural\nlanguages."
(is-a HumanLanguage)
(role concrete))
(defclass ManualHumanLanguage "SUO 1.55: July 14, 2003\nA &%ManualHumanLanguage is a\n&%HumanLanguage which has as its medium gestures and movement, such\nas the shape, position, and movement of the hands."
(is-a HumanLanguage)
(role concrete))
(defclass SpokenHumanLanguage "SUO 1.55: July 14, 2003\nA &%SpokenHumanLanguage is a\n&%HumanLanguage which has as its medium the human voice. It can also\nberepresented visually through writing, although not all\n&%SpokenHumanLanguages have a codified written form."
(is-a HumanLanguage)
(role concrete))
(defclass Word "SUO 1.55: July 14, 2003\nA term of a &%Language that represents a concept."
(is-a LinguisticExpression)
(role concrete))
(defclass Noun "SUO 1.55: July 14, 2003\nOne of the parts of speech. The &%Class of &%Words\nthat conventionally denote &%Objects."
(is-a Word)
(role concrete))
(defclass Verb "SUO 1.55: July 14, 2003\nOne of the parts of speech. The &%Class of &%Words\nthat conventionally denote &%Processes."
(is-a Word)
(role concrete))
(defclass Adjective "SUO 1.55: July 14, 2003\nOne of the parts of speech. The &%Class of\n&%Words that conventionally denote &%Attributes of &%Objects."
(is-a Word)
(role concrete))
(defclass Adverb "SUO 1.55: July 14, 2003\nOne of the parts of speech. The &%Class of &%Words\nthat conventionally denote &%Attributes of &%Processes."
(is-a Word)
(role concrete))
(defclass Particle "SUO 1.55: July 14, 2003\nAn umbrella &%Class for any &%Word that does not\nfit into the other subclasses of &%Word. A &%Particle is generally a small\nterm that serves a grammatical or logical function, e.g. 'and', 'of',\n'since', etc. At some point, this class might be broken up into the\nsubclasses 'Connective', 'Preposition', etc. Note that the class &%Particle\nincludes both personal and possessive pronouns, e.g. 'she', 'hers', 'it', 'its',\netc."
(is-a Word)
(role concrete))
(defclass Morpheme "SUO 1.55: July 14, 2003\nPart of a &%Word which cannot be subdivided\nand which expresses a meaning."
(is-a LinguisticExpression)
(role concrete))
(defclass Phrase "SUO 1.55: July 14, 2003\nA set of &%Words in a &%Language which form a unit,\ni.e. express a meaning in the &%Language."
(is-a LinguisticExpression)
(role concrete))
(defclass VerbPhrase "SUO 1.55: July 14, 2003\nA &%Phrase that has the same function as a\n&%Verb."
(is-a Phrase)
(role concrete))
(defclass NounPhrase "SUO 1.55: July 14, 2003\nA &%Phrase that has the same function as a &%Noun."
(is-a Phrase)
(role concrete))
(defclass PrepositionalPhrase "SUO 1.55: July 14, 2003\nA &%Phrase that begins with a\npreposition and that functions as an &%Adjective or an &%Adverb."
(is-a Phrase)
(role concrete))
(defclass Sentence "SUO 1.55: July 14, 2003\nA syntactically well-formed formula of a\n&%Language. It includes, at minimum, a predicate and a subject (which\nmay be explicit or implicit), and it expresses a &%Proposition."
(is-a LinguisticExpression)
(role concrete))
(defclass Formula "SUO 1.55: July 14, 2003\nA syntactically well-formed formula in the SUO-KIF knowledge representation language."
(is-a Sentence)
(role concrete)
(single-slot or
;+ (comment "The truth-functional connective of disjunction.")
(type INSTANCE)
;+ (allowed-classes Formula)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot confersRight
;+ (comment "Expresses the relationship between a &%Formula, an &%Entity, and a &%CognitiveAgent when the &%Entity authorizes the &%CognitiveAgent to bring it about that the &%Formula is true.")
(type INSTANCE)
;+ (allowed-classes Entity)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot not
;+ (comment "The truth-functional connective of negation.")
(type INSTANCE)
;+ (allowed-classes Formula)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot confersObligation
;+ (comment "Expresses the relationship between a a &%Formula, an &%Entity, and a &%CognitiveAgent when the &%Entity obligates the &%CognitiveAgent to bring it about that the &%Formula is true.")
(type INSTANCE)
;+ (allowed-classes Entity)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot independentProbability
;+ (comment "One of the basic &%ProbabilityRelations. (&%independentProbability ?FORMULA1 ?FORMULA2) means that the probabilities of ?FORMULA1 and ?FORMULA2 being true are independent.")
(type INSTANCE)
;+ (allowed-classes Formula)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot modalAttribute
;+ (comment "A &%BinaryRelation that is used to state the normative force of a &%Proposition. (&%modalAttribute ?FORMULA ?PROP) means that the &%Proposition expressed by ?FORMULA has the &%NormativeAttribute ?PROP. For example, (&%modalAttribute (&%exists (?ACT ?OBJ) (&%and (&%instance ?ACT &%Giving) (&%agent ?ACT John) (&%patient ?ACT ?OBJ) (&%destination ?ACT Tom))) &%Obligation) means that John is obligated to give Tom something.")
(type INSTANCE)
;+ (allowed-classes NormativeAttribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot and
;+ (comment "The truth-functional connective of conjunction.")
(type INSTANCE)
;+ (allowed-classes Formula)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot %3C%3D%3E
;+ (comment "The truth-functional connective of bi-implication.")
(type INSTANCE)
;+ (allowed-classes Formula)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot decreasesLikelihood
;+ (comment "One of the basic &%ProbabilityRelations. (&%decreasesLikelihood ?FORMULA1 ?FORMULA2) means that ?FORMULA2 is less likely to be true if ?FORMULA1 is true.")
(type INSTANCE)
;+ (allowed-classes Formula)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot ProbabilityFn
;+ (comment "One of the basic &%ProbabilityRelations, &%ProbabilityFn is used to state the a priori probability of a state of affairs. (&%ProbabilityFn ?FORMULA) denotes the a priori probability of ?FORMULA.\n")
(type INSTANCE)
;+ (allowed-classes RealNumber)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot entails
;+ (comment "The operator of logical entailment. (&%entails ?FORMULA1 ?FORMULA2) means that ?FORMULA2 can be derived from ?FORMULA1 by means of the proof theory of SUO-KIF.")
(type INSTANCE)
;+ (allowed-classes Formula)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot conditionalProbability
;+ (comment "One of the basic &%ProbabilityRelations. &%conditionalProbability is used to state the numeric value of a conditional probability. (&%conditionalProbability ?FORMULA1 ?FORMULA2 ?NUMBER) means that the probability of ?FORMULA2 being true given that ?FORMULA1 is true is ?NUMBER.")
(type INSTANCE)
;+ (allowed-classes Formula)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot holdsObligation
;+ (comment "Expresses a relationship between a &%Formula and a &%CognitiveAgent whereby the &%CognitiveAgent has the obligation to bring it about that the &%Formula is true.")
(type INSTANCE)
;+ (allowed-classes CognitiveAgent)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot increasesLikelihood
;+ (comment "One of the basic &%ProbabilityRelations. (&%increasesLikelihood ?FORMULA1 ?FORMULA2) means that ?FORMULA2 is more likely to be true if ?FORMULA1 is true.")
(type INSTANCE)
;+ (allowed-classes Formula)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot holdsRight
;+ (comment "Expresses a relationship between a &%Formula and a &%CognitiveAgent whereby the &%CognitiveAgent has the right to bring it about that the &%Formula is true.")
(type INSTANCE)
;+ (allowed-classes CognitiveAgent)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot %3D%3E
;+ (comment "The truth-functional connective of implication.")
(type INSTANCE)
;+ (allowed-classes Formula)
;+ (cardinality 0 1)
(create-accessor read-write)))
(defclass Text-Physical "SUO 1.55: July 14, 2003\nA &%LinguisticExpression or set of &%LinguisticExpressions that perform a specific function related to &%Communication, e.g. express a discourse about a particular topic, and that are inscribed in a &%CorpuscularObject by &%Humans."
(is-a LinguisticExpression Artifact)
(role concrete))
(defclass MotionPicture "SUO 1.55: July 14, 2003\nA &%ContentBearingObject which depicts motion\n(and which may have an audio or text component as well). This &%Class covers\nfilms, videos, etc."
(is-a Text-Physical)
(role concrete))
(defclass FactualText "SUO 1.55: July 14, 2003\nThe class of &%Texts that purport to reveal facts about the world. Such texts are often known as information or as non-fiction. Note that something can be an instance of &%FactualText, even if it is wholly inaccurate. Whether something is a &%FactualText is determined by the beliefs of the agent creating the text."
(is-a Text-Physical)
(role concrete))
(defclass FictionalText "SUO 1.55: July 14, 2003\nThe class of &%Texts that purport to\nbe largely a product of the author's imagination, i.e. the author\ndoes not believe that most of the content conveyed by the text is\nan accurate depiction of the real world. Note that something can\nbe an instance of &%FictionalText, even if it is completely true.\nWhether something is a &%FictionalText is determined by the beliefs\nof the agent creating the text."
(is-a Text-Physical)
(role concrete))
(defclass Book "SUO 1.55: July 14, 2003\nA &%Text that has pages and is bound."
(is-a Text-Physical)
(role concrete))
(defclass Summary "SUO 1.55: July 14, 2003\nA short &%Text that is a summary of another,\nlonger &%Text."
(is-a Text-Physical)
(role concrete))
(defclass Series "SUO 1.55: July 14, 2003\nA &%Text consisting of multiple self-contained units. \nSome examples are an encyclopedia containing a couple dozen volumes, a television \nseries made up of many episodes, a film serial, etc."
(is-a Text-Physical)
(role concrete)
(single-slot SeriesVolumeFn
;+ (comment "A &%BinaryFunction that maps a type of &%Series (e.g. the Encyclopedia_Britannica or the Popular_Mechanics periodical) and a number to the volumes of the text type designated by the number.")
(type INSTANCE)
;+ (allowed-classes PositiveInteger)
;+ (cardinality 0 1)
(create-accessor read-write)))
(defclass Periodical "SUO 1.55: July 14, 2003\nA &%Series whose elements are published separately \nand on a periodic basis."
(is-a Series)
(role concrete)
(single-slot PeriodicalIssueFn
;+ (comment "A &%BinaryFunction that maps a subclass of &%Periodical and a number to all of the issues of the &%Periodical corresponding to the number.")
(type INSTANCE)
;+ (allowed-classes PositiveInteger)
;+ (cardinality 0 1)
(create-accessor read-write)))
(defclass Article "SUO 1.55: July 14, 2003\nA relatively short &%Text that either is unbound or is\nbound with other &%Articles in a &%Book."
(is-a Text-Physical)
(role concrete))
(defclass Certificate "SUO 1.55: July 14, 2003\nA &%Text that confers a right or obligation\non the holder of the &%Certificate. Note that the right or obligation\nneed not be a legal one, as in the case of an academic diploma that grants\ncertain privileges in the professional world."
(is-a Text-Physical)
(role concrete))
(defclass FinancialInstrument "SUO 1.55: July 14, 2003\nA document having monetary value\nor recording a monetary transaction"
(is-a Certificate)
(role concrete))
(defclass Currency "SUO 1.55: July 14, 2003\nAny element of the official currrency of some\n&%Nation. This covers both &%CurrencyBills and &%CurrencyCoins."
(is-a FinancialInstrument)
(role concrete))
(defclass CurrencyBill "SUO 1.55: July 14, 2003\nAny instance of &%Currency that is made of paper."
(is-a Currency)
(role concrete))
(defclass CurrencyCoin "SUO 1.55: July 14, 2003\nAny instance of &%Currency that is made of &%Metal."
(is-a Currency)
(role concrete))
(defclass Patent "SUO 1.55: July 14, 2003\nA &%Certificate that expresses the content of an\ninvention that has been accorded legal protection by a governemental\nentity."
(is-a Certificate)
(role concrete))
(defclass Document-Physical "A Document is any physical object, including binary-encoded objects (stored as magnetic fields, electrical pulses, dots on a piece of paper, holograms, etc.), which is a representation of an abstract document."
(is-a Text-Physical File)
(role concrete))
(defclass XMLDocument
(is-a Document-Physical)
(role concrete))
(defclass PaperDocument "A PaperDocument consists of paper, and has writing marked on its surface."
(is-a Document-Physical)
(role concrete)
(multislot consistsOf
;+ (comment "consistsOf points from a physical object to the substance of which it is composed. This is usually used for objects that are relatively homogeneous, but could be used to enumerate all of the component substances.")
(type INSTANCE)
;+ (allowed-classes Paper)
(create-accessor read-write)))
(defclass PictorialObject "A PictorialObject is a physical object that contains pictorial or graphical information. It is the physical representation of an AbstractGraphicalObject, and may take any number of forms, as in an electronic or magnetic file, a hologram, a flat image, a flickering image on a televeision screen."
(is-a ContentBearingObject)
(role concrete)
(single-slot containsInformation
;+ (comment "A subrelation of &%represents. This predicate relates a &%ContentBearingObject to the &%Proposition that is expressed by the &%ContentBearingObject. Examples include the relationships between a physical novel and its story and between a printed score and its musical content.")
(type INSTANCE)
;+ (allowed-classes AbstractGraphicalObject)
;+ (cardinality 0 1)
(create-accessor read-write)))
(defclass BinaryObject-Physical "A BinaryObject-Physical is a physical object that contains a representation of an abstract binary object. Typically, it will be a computer file on disk or in memory, but it can also be a paper printout in some code such as "
(is-a ContentBearingObject)
(role concrete))
(defclass PhysicalComputerFile "A PhysicalComputerFile is a physcial object containing the binary encoding for some computer file. It may be a portion of a magnetic or optical disk, or a portion of a magnetic tape, or some other physical medium."
(is-a BinaryObject-Physical)
(role concrete))
(defclass Food "SUO 1.55: July 14, 2003\nAny &%SelfConnectedObject containing &%Nutrients,\nsuch as carbohydrates, proteins, and fats, that can be ingested by a\nliving &%Animal and metabolized into energy and body tissue."
(is-a SelfConnectedObject)
(role concrete))
(defclass Meat "SUO 1.55: July 14, 2003\nAny &%Food which was originally part of an\n&%Animal and is not ingested by drinking, including eggs and animal\nblood that is eaten as food. Note that this class covers both raw\nmeat and meat that has been prepared in some way, e.g. by cooking.\nNote too that preparations involving &%Meat and &%FruitOrVegetable\nare classed directly under &%Food."
(is-a Food)
(role concrete))
(defclass Beverage "SUO 1.55: July 14, 2003\nAny &%Food that is ingested by &%Drinking. Note that this class is disjoint with the other subclasses of &%Food, i.e. &%Meat and &%FruitOrVegetable."
(is-a Food)
(role concrete))
(defclass Region "SUO 1.55: July 14, 2003\nA topographic location. &%Regions encompass\nsurfaces of &%Objects, imaginary places, and &%GeographicAreas. Note\nthat a &%Region is the only kind of &%Object which can be located at\nitself. Note too that &%Region is not a subclass of &%SelfConnectedObject,\nbecause some &%Regions, e.g. archipelagos, have &%parts which are not\n&%connected with one another."
(is-a Object)
(role concrete))
(defclass Hole "SUO 1.55: July 14, 2003\nA hole is an immaterial body located at the surface \nof an &%Object. Since every &%Hole is ontologically dependent on its host \n(i.e., the object in which it is a hole), being a &%Hole is defined as \nbeing a &%hole in something. Note that two &%Holes may occupy the same \nregion, or part of the same region, without sharing any parts."
(is-a Region)
(role concrete)
(single-slot hole
;+ (comment "(&%hole ?HOLE ?OBJ) means that ?HOLE is a &%Hole in ?OBJ. A &%Hole is a fillable body located at the &%surface an &%Object.")
(type INSTANCE)
;+ (allowed-classes SelfConnectedObject)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot SkinFn
;+ (comment "A &%UnaryFunction that maps a &%Hole to the skin of the &%Hole. The skin of a &%Hole is the fusion of those superficial parts (see &%superficialPart) of the &%Hole's principal host (see &%PrincipalHostFn) with which the &%Hole is externally connected.")
(type INSTANCE)
;+ (allowed-classes Object)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot PrincipalHostFn
;+ (comment "A &%UnaryFunction that maps a &%Hole to the &%Object which is its principal host. The principle host of a &%Hole is its maximally connected host (a notion taken here to be defined only when the argument is a hole).")
(type INSTANCE)
;+ (allowed-classes Object)
;+ (cardinality 0 1)
(create-accessor read-write)))
(defclass AstronomicalBody "SUO 1.55: July 14, 2003\nThe &%Class of all astronomical\nobjects of significant size. It includes &%SelfConnectedObjects\nlike planets, stars, and asteroids, as well as &%Collections like\nnebulae, galaxies, and constellations. Note that the planet Earth\nis an &%AstronomicalBody, but every &%Region of Earth is a\n&%GeographicArea."
(is-a Region)
(role concrete))
(defclass GeographicArea "SUO 1.55: July 14, 2003\nA geographic location, generally having \ndefinite boundaries. Note that this differs from its immediate superclass \n&%Region in that a &%GeographicArea is a three-dimensional &%Region of the \nearth. Accordingly, all astronomical objects other than earth and all \none-dimensional and two-dimensional &%Regions are not classed under \n&%GeographicArea."
(is-a Region)
(role concrete)
(single-slot geographicSubregion
;+ (comment "(&%geographicSubregion ?PART ?WHOLE) means that the &%GeographicArea ?PART is part of the &%GeographicArea ?WHOLE.\n")
(type INSTANCE)
;+ (allowed-classes GeographicArea)
;+ (cardinality 0 1)
(create-accessor read-write)))
(defclass WaterArea "SUO 1.55: July 14, 2003\nA body which is made up predominantly of water,\ne.g. rivers, lakes, oceans, etc."
(is-a GeographicArea)
(role concrete))
(defclass SaltWaterArea "SUO 1.55: July 14, 2003\nA &%WaterArea whose &%Water is saline, e.g.\noceans and seas."
(is-a WaterArea)
(role concrete))
(defclass FreshWaterArea "SUO 1.55: July 14, 2003\nA &%WaterArea whose &%Water is not saline,\ne.g. most rivers and lakes."
(is-a WaterArea)
(role concrete))
(defclass StreamWaterArea "SUO 1.55: July 14, 2003\nA relatively narrow &%WaterArea where the\nwater flows constantly and in the same direction, e.g. a river, a stream,\netc."
(is-a WaterArea)
(role concrete))
(defclass StaticWaterArea "SUO 1.55: July 14, 2003\nA &%WaterArea in which water does not flow\nconstantly or in the same direction, e.g. most lakes and ponds."
(is-a WaterArea)
(role concrete))
(defclass LandArea "SUO 1.55: July 14, 2003\nAn area which is predominantly solid ground,\ne.g. a &%Nation, a mountain, a desert, etc. Note that a &%LandArea may\ncontain some relatively small &%WaterAreas. For example, Australia is\na &%LandArea even though it contains various rivers and lakes."
(is-a GeographicArea)
(role concrete))
(defclass ShoreArea "SUO 1.55: July 14, 2003\nA &%ShoreArea is a &%LandArea approximately\n1-3 km wide bordering a body of water, such as an ocean, bay, river,\nor lake. A &%ShoreArea may comprise a variety of &%LandForms, such as dunes,\nsloughs, and marshes."
(is-a LandArea)
(role concrete))
(defclass Continent "SUO 1.55: July 14, 2003\nOne of the seven largest land masses on earth,\nviz. Africa, North America, South America, Antarctica, Europe, Asia, and\nOceania (also known by the &%Nation which is coextensive with the\n&%Continent - Australia)."
(is-a LandArea)
(role concrete))
(defclass Island "SUO 1.55: July 14, 2003\nA &%LandArea that is completely surrounded by a &%WaterArea."
(is-a LandArea)
(role concrete))
(defclass Address "SUO 1.15: September 6, 2001\nA &%LandArea of relatively small size. This concept represents the state of 'being at an address'."
(is-a LandArea)
(role concrete))
(defclass Transitway "SUO 1.55: July 14, 2003\n&%Transitway is the broadest class\nof regions which may be passed through as a &%path in instances\nof &%Translocation. &%Transitway includes land, air, and sea\nregions, and it includes both natural and artificial transitways."
(is-a Region SelfConnectedObject)
(role concrete))
(defclass LandTransitway "SUO 1.55: July 14, 2003\n&%LandTransitway is the subclass of\n&%Transitway that represents areas intended for motion over the ground."
(is-a Transitway LandArea)
(role concrete))
(defclass Roadway "SUO 1.55: July 14, 2003\n&%Roadway is the subclass of &%LandTransitways\nthat are areas intended for surface travel by self-powered, wheeled\nvehicles, excluding those that travel on tracks. &%Roadways have been\nat least minimally improved to enable the passage of vehicles.\n&%Roadways include dirt and gravelled roads, paved streets, and\nexpressways."
(is-a LandTransitway LandArea)
(role concrete))
(defclass Collection "SUO 1.55: July 14, 2003\nCollections have &%members like &%Classes, but, \nunlike &%Classes, they have a position in space-time and &%members can be \nadded and subtracted without thereby changing the identity of the \n&%Collection. Some examples are toolkits, football teams, and flocks \nof sheep."
(is-a Object)
(role concrete)
(single-slot subCollection
;+ (comment "(&%subCollection ?COLL1 ?COLL2) means that the &%Collection ?COLL1 is a proper part of the &%Collection ?COLL2.")
(type INSTANCE)
;+ (allowed-classes Collection)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot CardinalityFn
;+ (comment "(CardinalityFn ?CLASS) returns the number of instances in the &%SetOrClass or &%Collection ?CLASS.")
(type INSTANCE)
;+ (allowed-classes Number)
;+ (cardinality 0 1)
(create-accessor read-write)))
(defclass Agent "SUO 1.55: July 14, 2003\nSomething or someone that can act on its own and \nproduce changes in the world."
(is-a Object)
(role concrete)
(single-slot authors
;+ (comment "(&%authors ?AGENT ?TEXT) means that ?AGENT is creatively responsible for ?TEXT. For example, Agatha Christie is author of Murder_on_the_Orient_Express.")
(type SYMBOL)
;+ (allowed-parents Text-Physical)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot PropertyFn
;+ (comment "A &%UnaryFunction that maps an &%Agent to the &%Set of &%Property owned by the &%Agent.")
(type INSTANCE)
;+ (allowed-classes Set)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot possesses
;+ (comment "&%Relation that holds between an &%Agent and an &%Object when the &%Agent has ownership of the &%Object.")
(type INSTANCE)
;+ (allowed-classes Object)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot editor
;+ (comment "(&%editor ?AGENT ?TEXT) means that ?AGENT is an editor of ?TEXT.")
(type SYMBOL)
;+ (allowed-parents Text-Physical)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot WealthFn
;+ (comment "A &%UnaryFunction that maps an &%Agent to a &%CurrencyMeasure specifying the value of the property owned by the &%Agent. Note that this &%Function is generally used in conjunction with the &%Function &%PropertyFn, e.g. (&%WealthFn (&%PropertyFn BillGates)) would return the monetary value of the sum of Bill Gates' holdings.")
(type INSTANCE)
;+ (allowed-classes CurrencyMeasure)
;+ (cardinality 0 1)
(create-accessor read-write)))
(defclass GeopoliticalArea "SUO 1.55: July 14, 2003\nAny &%GeographicArea which is associated \nwith some sort of political structure. This class includes &%Lands, \n&%Cities, districts of cities, counties, etc. Note that the identity \nof a &%GeopoliticalArea may remain constant after a change in borders."
(is-a GeographicArea Agent)
(role concrete)
(single-slot GovernmentFn
;+ (comment "(&%GovernmentFn ?AREA) denotes the\n&%Government of the &%GeopoliticalArea ?AREA. For example, (&%GovernmentFn &%UnitedStates) denotes the Federal-level government of\nthe United States; (&%GovernmentFn &%PuertoRico) denotes the government of the Commonwealth of Puerto Rico.\n")
(type INSTANCE)
;+ (allowed-classes Government)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot geopoliticalSubdivision
;+ (comment "(&%geopoliticalSubdivision ?AREA1 ?AREA2) means that ?AREA1 is any geopolitical part of ?AREA2; that is, ?AREA1 is an integral &%geographicSubregion of ?AREA2 (not a &%DependencyOrSpecialSovereigntyArea), having its own associated\n&%GovernmentOrganization which is subordinated to or constrained by the government of ?AREA2. Cf. &%dependentGeopoliticalArea.\n")
(type INSTANCE)
;+ (allowed-classes GeopoliticalArea)
;+ (cardinality 0 1)
(create-accessor read-write)))
(defclass Nation "SUO 1.55: July 14, 2003\nThe broadest &%GeopoliticalArea, i.e. &%Nations are\n&%GeopoliticalAreas that are not part of any other overarching and\ncomprehensive governance structure (excepting commonwealths and other sorts\nof loose international organizations)."
(is-a GeopoliticalArea LandArea)
(role concrete))
(defclass StateOrProvince "SUO 1.55: July 14, 2003\nAdministrative subdivisions of a\n&%Nation that are broader than any other political subdivisions that\nmay exist. This &%Class includes the states of the United States, as\nwell as the provinces of Canada and European countries."
(is-a GeopoliticalArea LandArea)
(role concrete))
(defclass City "SUO 1.55: July 14, 2003\nA &%LandArea of relatively small size, inhabited\nby a community of people, and having some sort of political structure.\nNote that this class includes both large cities and small settlements\nlike towns, villages, hamlets, etc."
(is-a GeopoliticalArea LandArea)
(role concrete))
(defclass SentientAgent "SUO 1.55: July 14, 2003\nAn &%Agent that has rights but may or may not have responsibilities and the ability to reason. If the latter are \npresent, then the &%Agent is also an instance of &%CognitiveAgent. \nDomesticated animals are an example of &%SentientAgents that are not \nalso &%CognitiveAgents."
(is-a Agent)
(role concrete))
(defclass CognitiveAgent "SUO 1.55: July 14, 2003\nA &%SentientAgent with responsibilities and the ability to reason, deliberate, make plans, etc. This is essentially the legal/ethical notion of a person. Note that, although &%Human is a subclass of &%CognitiveAgent, there may be instances of \n&%CognitiveAgent which are not also instances of &%Human. For example, chimpanzees, gorillas, dolphins, whales, and some extraterrestrials (if they exist) may be &%CognitiveAgents."
(is-a SentientAgent)
(role concrete)
(single-slot desires
;+ (comment "(&%desires ?AGENT ?FORMULA) means that ?AGENT wants to bring about the state of affairs expressed by ?FORMULA. Note that there is no implication that what is desired by the agent is not already true. Note too that &%desires is distinguished from &%wants only in that the former is a &%PropositionalAttitude, while &%wants is an &%ObjectAttitude.")
(type INSTANCE)
;+ (allowed-classes Formula)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot wants
;+ (comment "(&%wants ?AGENT ?OBJECT) means that ?OBJECT is desired by ?AGENT, i.e. ?AGENT believes that ?OBJECT will satisfy one of its goals. Note that there is no implication that what is wanted by an agent is not already possessed by the agent.")
(type INSTANCE)
;+ (allowed-classes Physical)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot believes
;+ (comment "The epistemic predicate of belief. (&%believes ?AGENT ?FORMULA) means that ?AGENT believes the proposition expressed by ?FORMULA.")
(type INSTANCE)
;+ (allowed-classes Formula)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot inScopeOfInterest
;+ (comment "A very general &%Predicate. (&%inScopeOfInterest ?AGENT ?ENTITY) means that ?ENTITY is within the scope of interest of ?AGENT. Note that the interest indicated can be either positive or negative, i.e. the ?AGENT can have an interest in avoiding or promoting ?ENTITY.")
(type INSTANCE)
;+ (allowed-classes Entity)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot legalRelation
;+ (comment "(&%legalRelation ?AGENT1 ?AGENT2) means there is a relationship involving legal obligations between ?AGENT1 and ?AGENT2. Some examples include marriage, adoption, etc.\n")
(type INSTANCE)
;+ (allowed-classes CognitiveAgent)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot considers
;+ (comment "(&%considers ?AGENT ?FORMULA) means that ?AGENT considers or wonders about the truth of the proposition expressed by ?FORMULA.")
(type INSTANCE)
;+ (allowed-classes Formula)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot knows
;+ (comment "The epistemic predicate of knowing. (&%knows ?AGENT ?FORMULA) means that ?AGENT knows the proposition expressed by ?FORMULA. Note that &%knows entails conscious awareness, so this &%Predicate cannot be used to express tacit or subconscious or unconscious knowledge.")
(type INSTANCE)
;+ (allowed-classes Formula)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot prefers
;+ (comment "(&%prefers ?AGENT ?FORMULA1 ?FORMULA2) means that &%CognitiveAgent ?AGENT prefers the state of affairs expressed by ?FORMULA1over the state of affairs expressed by ?FORMULA2 all things being equal.")
(type INSTANCE)
;+ (allowed-classes Formula)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot needs
;+ (comment "(&%needs ?AGENT ?OBJECT) means that ?OBJECT is physically required for the continued existence of ?AGENT.")
(type INSTANCE)
;+ (allowed-classes Physical)
;+ (cardinality 0 1)
(create-accessor read-write)))
(defclass OrganizationUnit "SUO 1.15: September 6, 2001\nAn organization, division or department within an organization. For example, the Shell Corporation, the accounting department at Shell, etc. would all be instances of &%OrganizationUnit. The continued existence of an &%OrganizationUnit is not dependent on any of its members, locations, or facilities. Note that, unlike &%Organization, an &%OrganizationUnit may have no members."
(is-a CognitiveAgent)
(role concrete))
(defclass LegalAgent "A LegalAgent is an agent that is recognized by law as able to enter into valid contracts or to have certain rights such as proeprty ownership. A human is a natural person and organizations,expecially those incorporated can also be legal agents."
(is-a CognitiveAgent)
(role concrete))
(defclass BuyerOrSeller "A BuyerOrSeller is one participating in a buying/selling event as either buyer or seller."
(is-a LegalAgent)
(role concrete))
(defclass Authority "An Authority is an individual or organization recognized as having the ability to create rules that will be followed by other cognitive agents -- those that recognize the authority or are located within its jurisdiction."
(is-a CognitiveAgent)
(role concrete))
(defclass CodeAuthority "A CodeAuthority is an agent (usually an agency) epowered to create a code to, suaually for use in communication."
(is-a Authority)
(role concrete))
(defclass Organism "SUO 1.55: July 14, 2003\nGenerally, a living individual, including all \n&%Plants and &%Animals."
(is-a OrganicObject Agent)
(role concrete)
(single-slot familyRelation
;+ (comment "A very general &%Predicate for biological relationships. (&%familyRelation ?ORGANISM1 ?ORGANISM2) means that ?ORGANISM1 and ?ORGANISM2 are biologically derived from a common ancestor.")
(type INSTANCE)
;+ (allowed-classes Organism)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot father
;+ (comment "The general relationship of fatherhood. (&%father ?CHILD ?FATHER) means that ?FATHER is the biological fatherof ?CHILD.")
(type INSTANCE)
;+ (allowed-classes Organism)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot ancestor
;+ (comment "The transitive closure of the &%parent predicate. (&%ancestor ?DESCENDANT ?ANCESTOR) means that ?ANCESTOR is either the\n&%parent of ?DESCENDANT or the &%parent of the &%parent of &%DESCENDANT or etc.\n")
(type INSTANCE)
;+ (allowed-classes Organism)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot mother
;+ (comment "The general relationship of motherhood. (&%mother ?CHILD ?MOTHER) means that ?MOTHER is the biological mother of ?CHILD.")
(type INSTANCE)
;+ (allowed-classes Organism)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot parent
;+ (comment "The general relationship of parenthood. (&%parent ?CHILD ?PARENT) means that ?PARENT is a biological parent of ?CHILD.")
(type INSTANCE)
;+ (allowed-classes Organism)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot sibling
;+ (comment "The relationship between two &%Organisms that have the same &%mother and &%father. Note that this relationship does not hold between half-brothers, half-sisters, etc.")
(type INSTANCE)
;+ (allowed-classes Organism)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot inhabits
;+ (comment "A very basic notion of living within something else. (&%inhabits ?ORGANISM ?OBJECT) means that ?OBJECT is the residence, nest, home, etc. of ?ORGANISM.")
(type INSTANCE)
;+ (allowed-classes Object)
;+ (cardinality 0 1)
(create-accessor read-write)))
(defclass Plant "SUO 1.55: July 14, 2003\nAn &%Organism having cellulose cell walls, growing\nby synthesis of &%Substances, generally distinguished by the presence of\nchlorophyll, and lacking the power of locomotion."
(is-a Organism)
(role concrete))
(defclass FloweringPlant "SUO 1.55: July 14, 2003\nA &%Plant that produces seeds and flowers.\nThis class includes trees, shrubs, herbs, and flowers."
(is-a Plant)
(role concrete))
(defclass NonFloweringPlant "SUO 1.55: July 14, 2003\nA &%Plant that reproduces with spores and\ndoes not produce flowers."
(is-a Plant)
(role concrete))
(defclass Alga "SUO 1.55: July 14, 2003\nA chiefly aquatic plant that contains chlorophyll,\nbut does not form embryos during development and lacks vascular tissue."
(is-a NonFloweringPlant)
(role concrete))
(defclass Fungus "SUO 1.55: July 14, 2003\nA eukaryotic &%Organism characterized by the\nabsence of chlorophyll and the presence of rigid cell walls. Included\nhere are both slime molds and true fungi such as yeasts, molds, mildews,\nand mushrooms."
(is-a NonFloweringPlant)
(role concrete))
(defclass Moss "SUO 1.55: July 14, 2003\nA &%NonFloweringPlant without true roots and little\nif any vascular tissue."
(is-a NonFloweringPlant)
(role concrete))
(defclass Fern "SUO 1.55: July 14, 2003\nA &%NonFloweringPlant that contains vascular tissue.\nThis class includes true ferns, as well as horsetails, club mosses, and\nwhisk ferns."
(is-a NonFloweringPlant)
(role concrete))
(defclass Animal "SUO 1.55: July 14, 2003\nAn &%Organism with eukaryotic &%Cells, and lacking stiff cell walls, plastids, and photosynthetic pigments."
(is-a Organism)
(role concrete)
(single-slot wears
;+ (comment "(&%wears ?AGENT ?CLOTHING) means that ?AGENT is wearing\nthe item of &%Clothing ?CLOTHING.\n")
(type INSTANCE)
;+ (allowed-classes Clothing)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot grasps
;+ (comment "The state of grasping an &%Object. (&%grasps ?ANIMAL ?OBJ) means that the &%Animal ?ANIMAL is intentionally holding on to the &%Object ?OBJ.\n\n(&%meetsSpatially ?OBJ1 ?OBJ2) means that ?OBJ1 and ?OBJ2 are &%connected but that neither ?OBJ1 nor ?OBJ2 &%overlapsSpatially the other.\n\n(connected ?OBJ1 ?OBJ2) means that ?OBJ1 &%meetsSpatially ?OBJ2 or that ?OBJ1 &%overlapsSpatially ?OBJ2.")
(type INSTANCE)
;+ (allowed-classes Object)
;+ (cardinality 0 1)
(create-accessor read-write)))
(defclass Invertebrate "SUO 1.55: July 14, 2003\nAn &%Animal which has no spinal column."
(is-a Animal)
(role concrete))
(defclass Worm "SUO 1.55: July 14, 2003\nLong, narrow, soft-bodied &%Invertebrates."
(is-a Invertebrate)
(role concrete))
(defclass Mollusk "SUO 1.55: July 14, 2003\nSoft-bodied &%Invertebrate that is usually\ncontained in a shell. Includes oysters, clams, mussels, snails, slugs,\noctopi, and squid."
(is-a Invertebrate)
(role concrete))
(defclass Arthropod "SUO 1.55: July 14, 2003\nA &%Class of &%Invertebrate that includes\n&%Arachnids and &%Insects."
(is-a Invertebrate)
(role concrete))
(defclass Arachnid "SUO 1.55: July 14, 2003\nA &%Class of &%Arthropods that includes\nticks and spiders."
(is-a Arthropod)
(role concrete))
(defclass Myriapod "SUO 1.55: July 14, 2003\nA &%Class of &%Arthropods that includes\ncentipedes and millipedes."
(is-a Arthropod)
(role concrete))
(defclass Insect "SUO 1.55: July 14, 2003\nA &%Class of small &%Arthropods that are\nair-breathing and that are distinguished by appearance."
(is-a Arthropod)
(role concrete))
(defclass Crustacean "SUO 1.55: July 14, 2003\nA &%Class of &%Arthropods that mainly dwells\nin water and has a segmented body and a chitinous exoskeleton. Includes\nlobsters, crabs, shrimp, and barnacles."
(is-a Arthropod)
(role concrete))
(defclass Vertebrate "An Animal which has a spinal column."
(is-a Animal)
(role concrete))
(defclass ColdBloodedVertebrate "SUO 1.55: July 14, 2003\n&%Vertebrates whose body temperature\nis not internally regulated."
(is-a Vertebrate)
(role concrete))
(defclass Amphibian "SUO 1.55: July 14, 2003\nA cold-blooded, smooth-skinned &%Vertebrate\nwhich characteristically hatches as an aquatic larva, breathing by\ngills. When mature, the &%Amphibian breathes with &%Lungs."
(is-a ColdBloodedVertebrate)
(role concrete))
(defclass Fish "SUO 1.55: July 14, 2003\nA cold-blooded aquatic &%Vertebrate characterized by\nfins and breathing by gills. Included here are &%Fish having either a bony\nskeleton, such as a perch, or a cartilaginous skeleton, such as a shark.\nAlso included are those &%Fish lacking a jaw, such as a lamprey or\nhagfish."
(is-a ColdBloodedVertebrate)
(role concrete))
(defclass Reptile "SUO 1.55: July 14, 2003\nA &%ColdBloodedVertebrate having an external\ncovering of scales or horny plates. &%Reptiles breathe by means of\n&%Lungs and generally lay eggs."
(is-a ColdBloodedVertebrate)
(role concrete))
(defclass WarmBloodedVertebrate "SUO 1.55: July 14, 2003\n&%Vertebrates whose body temperature\nis internally regulated."
(is-a Vertebrate)
(role concrete))
(defclass Bird "SUO 1.55: July 14, 2003\nA &%Vertebrate having a constant body temperature\nand characterized by the presence of feathers."
(is-a WarmBloodedVertebrate)
(role concrete))
(defclass Mammal "SUO 1.55: July 14, 2003\nA &%Vertebrate having a constant body temperature\nand characterized by the presence of hair, mammary glands, and sweat\nglands."
(is-a WarmBloodedVertebrate)
(role concrete))
(defclass AquaticMammal "SUO 1.55: July 14, 2003\nThe &%Class of &%Mammals that dwell chiefly\nin the water. Includes whales, dolphins, manatees, seals, and walruses."
(is-a Mammal)
(role concrete))
(defclass HoofedMammal "SUO 1.55: July 14, 2003\nThe &%Class of quadruped &%Mammals with hooves.\nIncludes horses, cows, sheep, pigs, antelope, etc."
(is-a Mammal)
(role concrete))
(defclass Marsupial "SUO 1.55: July 14, 2003\nThe &%Class of &%Mammals which have a pouch for\ntheir young."
(is-a Mammal)
(role concrete))
(defclass Carnivore "SUO 1.55: July 14, 2003\nThe &%Class of flesh-eating &%Mammals. Members\nof this &%Class typically have four or five claws on each paw. Includes\ncats, dogs, bears, racoons, and skunks."
(is-a Mammal)
(role concrete))
(defclass Canine "SUO 1.55: July 14, 2003\nThe &%Class of &%Carnivores with completely\nseparable toes, nonretractable claws, and long muzzles."
(is-a Carnivore)
(role concrete))
(defclass Feline "SUO 1.55: July 14, 2003\nThe &%Class of &%Carnivores with completely\nseparable toes, nonretractable claws, slim bodies, and rounded heads."
(is-a Carnivore)
(role concrete))
(defclass Rodent "SUO 1.55: July 14, 2003\nThe &%Class of &%Mammals with one or two pairs\nof incisors for gnawing. Includes rats, mice, guinea pigs, and\nrabbits."
(is-a Mammal)
(role concrete))
(defclass Primate "SUO 1.55: July 14, 2003\nThe &%Class of &%Mammals which are\n&%Primates."
(is-a Mammal)
(role concrete))
(defclass Ape "SUO 1.55: July 14, 2003\nVarious &%Primates with no tails or only short\ntails."
(is-a Primate)
(role concrete))
(defclass Monkey "SUO 1.55: July 14, 2003\nVarious &%Primates with relatively long\ntails."
(is-a Primate)
(role concrete))
(defclass Hominid "SUO 1.55: July 14, 2003\nIncludes &%Humans and relatively recent\nancestors of &%Humans."
(is-a Primate)
(role concrete))
(defclass Human "SUO 1.55: July 14, 2003\nModern man, the only remaining species of the Homo genus."
(is-a Hominid CognitiveAgent)
(role concrete)
(single-slot spouse
;+ (comment "The relationship of marriage between two humans.")
(type INSTANCE)
;+ (allowed-classes Human)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot occupiesPosition
;+ (comment "(&%occupiesPosition ?PERSON ?POSITION ?ORG) means that ?PERSON holds the &%Position ?POSITION at &%Organization ?ORG. For example, (&%occupiesPosition &%TomSmith &%ResearchDirector &%AcmeLaboratory) means that &%TomSmith is a research director at Acme Labs.")
(type INSTANCE)
;+ (allowed-classes Position)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot ImmediateFamilyFn
;+ (comment "(&%ImmediateFamilyFn ?PERSON) denotes the immediate family of ?PERSON, i.e. the &%Group consisting of the &%parents of ?PERSON and anyone of whom ?PERSON is a &%parent.\n")
(type INSTANCE)
;+ (allowed-classes FamilyGroup)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot home
;+ (comment "The relation between a &%Human and a home of the &%Human.\n\nA very basic notion of living within something else. (&%inhabits ?ORGANISM ?OBJECT) means that ?OBJECT is the residence, nest, home, etc. of ?ORGANISM.")
(type INSTANCE)
;+ (allowed-classes StationaryArtifact)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot citizen
;+ (comment "(&%citizen ?PERSON ?NATION) means that the &%Human ?PERSON is a citizen of &%Nation ?NATION.")
(type INSTANCE)
;+ (allowed-classes Nation)
;+ (cardinality 0 1)
(create-accessor read-write)))
(defclass Man "SUO 1.55: July 14, 2003\nThe class of &%Male &%Humans."
(is-a Human)
(role concrete)
(single-slot brother
;+ (comment "The general relationship of being a brother. (&%brother ?MAN ?PERSON) means that ?MAN is the brother of ?PERSON.\n")
(type INSTANCE)
;+ (allowed-classes Human)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot husband
;+ (comment "(&%husband ?MAN ?WOMAN) means that ?MAN is the husband of ?WOMAN.\n")
(type INSTANCE)
;+ (allowed-classes Woman)
;+ (cardinality 0 1)
(create-accessor read-write)))
(defclass Woman "SUO 1.55: July 14, 2003\nThe class of &%Female &%Humans."
(is-a Human)
(role concrete)
(single-slot sister
;+ (comment "The general relationship of being a sister. (&%sister ?WOMAN ?PERSON) means that ?WOMAN is the sister of ?PERSON.\n")
(type INSTANCE)
;+ (allowed-classes Human)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot wife
;+ (comment "(&%wife ?WOMAN ?MAN) means that ?WOMAN is the wife of ?MAN.\n")
(type INSTANCE)
;+ (allowed-classes Man)
;+ (cardinality 0 1)
(create-accessor read-write)))
(defclass Microorganism "SUO 1.55: July 14, 2003\nAn &%Organism that can be seen only with\nthe aid of a microscope."
(is-a Organism)
(role concrete))
(defclass Bacterium "SUO 1.55: July 14, 2003\nA small, typically one-celled, prokaryotic\n&%Microorganism."
(is-a Microorganism)
(role concrete))
(defclass Virus "SUO 1.55: July 14, 2003\nAn &%Organism consisting of a core of a single\nnucleic acid enclosed in a protective coat of protein. A virus may replicate\nonly inside a host living cell. A virus exhibits some but not all of the\nusual characteristics of living things."
(is-a Microorganism)
(role concrete))
(defclass CommercialAgent "SUO 1.55: July 14, 2003\nAn &%Agent that provides products and/or\nservices for a fee with the aim of making a profit."
(is-a Agent)
(role concrete))
(defclass Hotel "SUO 1.55: July 14, 2003\nA &%ResidentialBuilding which provides temporary\naccommodations to guests in exchange for money."
(is-a ResidentialBuilding TemporaryResidence CommercialAgent)
(role concrete))
(defclass Group "SUO 1.55: July 14, 2003\nA &%Collection of &%Agents, e.g. a flock\nof sheep, a herd of goats, or the local Boy Scout troop."
(is-a Collection Agent)
(role concrete))
(defclass GroupOfPeople "SUO 1.55: July 14, 2003\nAny &%Group whose &%members are\nexclusively &%Humans."
(is-a Group)
(role concrete))
(defclass AgeGroup "SUO 1.55: July 14, 2003\nA &%Group whose &%members all have the same &%age."
(is-a Group)
(role concrete))
(defclass FamilyGroup "SUO 1.55: July 14, 2003\nA &%Group whose &%members bear\n&%familyRelations to one another."
(is-a Group)
(role concrete))
(defclass SocialUnit "SUO 1.55: July 14, 2003\nA group of people who all have the same &%home."
(is-a Group)
(role concrete))
(defclass EthnicGroup "SUO 1.55: July 14, 2003\nA &%Group whose &%members originate from\nthe same &%GeographicArea or share the same &%Language and/or cultural\npractices."
(is-a Group)
(role concrete))
(defclass BeliefGroup "SUO 1.55: July 14, 2003\nA &%Group whose &%members share a belief or\nset of beliefs."
(is-a Group)
(role concrete))
(defclass Organization "SUO 1.55: July 14, 2003\nAn &%Organization is a corporate or similar institution. The &%members of an &%Organization typically have a common purpose or function. Note that this class also covers divisions, departments, etc. of organizations. For example, both the Shell Corporation and the accounting department at Shell would both be instances of &%Organization. Note too that the existence of an &%Organization is dependent on the existence of at least one &%member (since &%Organization is a subclass of &%Collection). Accordingly, in cases of purely legal organizations, a fictitious &%member \nshould be assumed."
(is-a Group CognitiveAgent)
(role concrete)
(single-slot publishes
;+ (comment "(&%publishes ?ORG ?TEXT) means that ?ORG publishes ?TEXT. For example, Bantam Books publishes Agatha Christie's Murder_on_the_Orient_Express.")
(type SYMBOL)
;+ (allowed-parents Text-Physical)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot leader
;+ (comment "(&%leader ?ORGANIZATION ?PERSON) means that the leader of ?ORGANIZATION is ?PERSON.\n")
(type INSTANCE)
;+ (allowed-classes Agent)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot subOrganization
;+ (comment "(&%subOrganization ?ORG1 ?ORG2) means that ?ORG1 is an &%Organization which is a proper part of the &%Organization ?ORG2.\n")
(type INSTANCE)
;+ (allowed-classes Organization)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot employs
;+ (comment "(&%employs ?ORG ?PERSON) means that ?ORG has hired ?PERSON and currently retains ?PERSON, on a salaried or contractual basis, to provide services in exchange for monetary compensation.")
(type INSTANCE)
;+ (allowed-classes CognitiveAgent)
;+ (cardinality 0 1)
(create-accessor read-write)))
(defclass Corporation "SUO 1.55: July 14, 2003\nAn &%Organization that has a special legal status\nthat allows a group of persons to act as a &%CommercialAgent and that insulates\nthe owners (shareholders) from many liabilities that might result from the\ncorporation's operation."
(is-a CommercialAgent Organization)
(role concrete))
(defclass Manufacturer "SUO 1.55: July 14, 2003\nAny &%Corporation which manufactures &%Products."
(is-a Corporation)
(role concrete))
(defclass MercantileOrganization "SUO 1.55: July 14, 2003\nAny &%Corporation which sells\nphysical goods to customers for a profit."
(is-a Corporation)
(role concrete))
(defclass PoliticalOrganization "SUO 1.55: July 14, 2003\nAn &%Organization that is a &%Government,\na &%subOrganization of a &%Government, or an &%Organization that is attempting\nto bring about some sort of political change."
(is-a Organization)
(role concrete))
(defclass GovernmentOrganization "SUO 1.55: July 14, 2003\n&%GovernmentOrganization is the\nclass of official &%Organizations that are concerned with the government\nof a &%GeopoliticalArea at some level. They may be a &%Government or the\n&%subOrganization of a government."
(is-a Organization)
(role concrete))
(defclass Government "SUO 1.55: July 14, 2003\nThe ruling body of a &%GeopoliticalArea."
(is-a GovernmentOrganization)
(role concrete))
(defclass MilitaryOrganization "SUO 1.55: July 14, 2003\nAny heavily armed &%Organization\nthat is part of a &%Government and that is charged with representing the\n&%Government in international conflicts."
(is-a GovernmentOrganization)
(role concrete))
(defclass PoliceOrganization "SUO 1.55: July 14, 2003\nAny &%GovernmentOrganization\nthat is charged with domestic enforcement of the laws of the &%Government."
(is-a GovernmentOrganization)
(role concrete))
(defclass JudicialOrganization "SUO 1.55: July 14, 2003\n&%JudicialOrganization is the class of &%Organizations whose primary purpose is to render judgments according to the statutes or regulations of a government or other organization.\nJudicial bodies are not necessarily government organizations, for example,\nthose associated with sporting associations."
(is-a Organization)
(role concrete))
(defclass EducationalOrganization "SUO 1.55: July 14, 2003\nA &%EducationalOrganization is\nan institution of learning. Some examples are public and private K-12\nschools, and colleges and universities."
(is-a Organization)
(role concrete))
(defclass ReligiousOrganization "SUO 1.55: July 14, 2003\nAn &%Organization whose members\nshare a set of religious beliefs."
(is-a Organization BeliefGroup)
(role concrete))
(defclass Process "SUO 1.55: July 14, 2003\nIntuitively, the class of things that happen and have temporal parts or stages. Examples include extended events like a football match or a race, actions like &%Pursuing and &%Reading, \nand biological processes. The formal definition is: anything that lasts for a time but is not an &%Object. Note that a &%Process may have \nparticipants 'inside' it which are &%Objects, such as the players \nin a football match. In a 4D ontology, a &%Process is something whose \nspatiotemporal extent is thought of as dividing into temporal stages roughly perpendicular to the time-axis.\n UBL note: all \"Processes\" in SUMO can be considerd as \"Events\" with a defined start and stopping time. See the \"time\" relation defined on \"Process\"."
(is-a Physical)
(role concrete)
(single-slot hasSkill
;+ (comment "Similar to the &%capability &%Predicate with the additional restriction that the ability be practised/demonstrated to some measurable degree.")
(type INSTANCE)
;+ (allowed-classes Agent)
;+ (cardinality 0 1)
(create-accessor read-write))
(multislot causesSubclass
;+ (comment "The causation relation between subclasses of &%Process.\n(&%causesSubclass ?PROCESS1 ?PROCESS2) means that the subclass of &%Process ?PROCESS1\nbrings about the subclass of &%Process ?PROCESS2, e.g. (&%causes &%Killing &%Death).\n")
(type SYMBOL)
;+ (allowed-parents Process)
(create-accessor read-write))
(single-slot agent
;+ (comment "(&%agent ?PROCESS ?AGENT) means that ?AGENT is an active determinant, either animate or inanimate, of the &%Process ?PROCESS, with or without voluntary intention. For example, water is the &%agent of erosion in the following proposition: the water eroded the coastline. For another example, Eve is an &%agent in the following proposition: Eve bit an apple.")
(type INSTANCE)
;+ (allowed-classes Agent)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot patient
;+ (comment "(&%patient ?PROCESS ?ENTITY) means that ?ENTITY is a participant in ?PROCESS that may be moved, said, experienced, etc. For example, the direct objects in the sentences 'The cat swallowed the canary' and 'Billy likes the beer' would be examples of &%patients. Note that the &%patient of a &%Process may or may not undergo structural change as a result of the &%Process. The &%CaseRole of &%patient is used when one wants to specify as broadly as possible the object of a &%Process.")
(type INSTANCE)
;+ (allowed-classes Entity)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot subProcess
;+ (comment "(&%subProcess ?SUBPROC ?PROC) means that ?SUBPROC is a subprocess of ?PROC. A subprocess is here understood as a temporally distinguished part (proper or not) of a &%Process.")
(type INSTANCE)
;+ (allowed-classes Process)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot resource
;+ (comment "(&%patient ?PROCESS ?ENTITY) means that ?ENTITY is a participant in ?PROCESS that may be moved, said, experienced, etc. For example, the direct objects in the sentences 'The cat swallowed the canary' and 'Billy likes the beer' would be examples of &%patients. Note that the &%patient of a &%Process may or may not undergo structural change as a result of the &%Process. The &%CaseRole of &%patient is used when one wants to specify as broadly as possible the object of a &%Process.")
(type INSTANCE)
;+ (allowed-classes Object)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot realization
;+ (comment "A subrelation of &%represents.\n(&%realization ?PROCESS ?PROP) means that ?PROCESS is a Process which expresses the content of ?PROP. Examples include a particular musical\nperformance, which realizes the content of a musical score, or the reading of a poem.\n")
(type INSTANCE)
;+ (allowed-classes Proposition)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot destination
;+ (comment "(destination ?PROCESS ?GOAL) means that ?GOAL is the target or goal of the Process ?PROCESS. For example, Danbury would be the destination in the following proposition: Bob went to Danbury. Note that this is a very general &%CaseRole and, in particular, that it covers the concepts of 'recipient' and 'beneficiary'. Thus, John would be the &%destination in the following proposition: Tom gave a book to John.")
(type INSTANCE)
;+ (allowed-classes Entity)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot origin
;+ (comment "(&%origin ?PROCESS ?SOURCE) means that ?SOURCE indicates where the ?Process began. Note that this relation implies that ?SOURCE is present at the beginning of the process, but need not participate throughout the process. For example, the submarine is the &%origin in the following proposition: the missile was launched from a submarine.")
(type INSTANCE)
;+ (allowed-classes Object)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot causes
;+ (comment "The causation relation between instances of &%Process. (&%causes ?PROCESS1 ?PROCESS2) means that the instance of &%Process ?PROCESS1 brings about the instance of &%Process ?PROCESS2, e.g. (&%causes &%Killing &%Death).")
(type INSTANCE)
;+ (allowed-classes Process)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot manner
;+ (comment "(&%manner ?PROCESS ?MANNER) means that the &%Process ?PROCESS is qualified by the &%Attribute ?MANNER. The &%Attributes of &%Processes are usually denoted by adverbs and include things like the\nspeed of the wind, the style of a dance, or the intensity of a sports competition.\n")
(type INSTANCE)
;+ (allowed-classes Attribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot instrument
;+ (comment "(instrument ?EVENT ?TOOL) means that ?TOOL is used by an agent in bringing about ?EVENT and that ?TOOL is not changed by ?EVENT. For example, the key is an &%instrument in the following proposition: The key opened the door. Note that &%instrument\nand &%resource cannot be satisfied by the same ordered pair.\n\n(&%patient ?PROCESS ?ENTITY) means that ?ENTITY is a participant in ?PROCESS that may be moved, said, experienced, etc. For example, the direct objects in the sentences 'The cat swallowed the canary' and 'Billy likes the beer' would be examples of &%patients. Note that the &%patient of a &%Process may or may not undergo structural change as a result of the &%Process. The &%CaseRole of &%patient is used when one wants to specify as broadly as possible the object of a &%Process.")
(type INSTANCE)
;+ (allowed-classes Object)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot result
;+ (comment "(result ?ACTION ?OUTPUT) means that ?OUTPUT is a product of ?ACTION. For example, house is a &%result in the following proposition: Eric built a house.\n\n\n(&%patient ?PROCESS ?ENTITY) means that ?ENTITY is a participant in ?PROCESS that may be moved, said, experienced, etc. For example, the direct objects in the sentences 'The cat swallowed the canary' and 'Billy likes the beer' would be examples of &%patients. Note that the &%patient of a &%Process may or may not undergo structural change as a result of the &%Process. The &%CaseRole of &%patient is used when one wants to specify as broadly as possible the object of a &%Process.")
(type INSTANCE)
;+ (allowed-classes Entity)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot experiencer
;+ (comment "(&%experiencer ?PROCESS ?AGENT) means that ?AGENT experiences the &%Process ?PROCESS. For example, Yojo is the &%experiencer of seeing in the following proposition: Yojo sees the fish. Note that &%experiencer, unlike &%agent, does not entail a causal relation between its arguments.")
(type INSTANCE)
;+ (allowed-classes Agent)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot direction
;+ (comment "(&%direction ?PROC ?ATTR) means that the &%Process ?PROC is moving in the direction ?ATTR. For example, one would use this &%Predicate to represent the fact that Max is moving &%North.")
(type INSTANCE)
;+ (allowed-classes DirectionalAttribute)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot capability
;+ (comment "(&%capability ?PROCESS ?ROLE ?OBJ) means that ?OBJ has the ability to play the role of ?ROLE in &%Processes of type ?PROCESS.")
(type INSTANCE)
;+ (allowed-classes CaseRole)
;+ (cardinality 0 1)
(create-accessor read-write)))
(defclass DualObjectProcess "SUO 1.55: July 14, 2003\nAny &%Process that requires two,\nnonidentical &%patients."
(is-a Process)
(role concrete))
(defclass Attaching "SUO 1.55: July 14, 2003\nA &%Process where one &%Object becomes attached\nto another &%Object. Note that this differs from &%Putting in that two\nthings which are attached may already be in the same location."
(is-a DualObjectProcess)
(role concrete))
(defclass Detaching "SUO 1.55: July 14, 2003\nA &%Process where the &%agent detaches one thing\nfrom something else. Note that this is different from &%Removing in that\nneither of the two things which are detached may be removed from the location\nwhere it was attached."
(is-a DualObjectProcess)
(role concrete))
(defclass Combining "SUO 1.55: July 14, 2003\nA &%Process where two or more &%Substances are\ncombined into a single &%Substance."
(is-a DualObjectProcess)
(role concrete))
(defclass Separating "SUO 1.55: July 14, 2003\nA &%Process where a &%Substance is separated\ninto (some of) its &%pieces."
(is-a DualObjectProcess)
(role concrete))
(defclass IntentionalProcess "SUO 1.55: July 14, 2003\nA &%Process that has a specific\npurpose for the &%CognitiveAgent who performs it."
(is-a Process)
(role concrete))
(defclass RecreationOrExercise "SUO 1.55: July 14, 2003\nA &%Process that is carried out for\nthe purpose of recreation or exercise. Since &%RecreationOrExercise is a\nsubclass of &%IntentionalProcess, the intent of a process determines whether\nor not it is an instance of the class. Hence, if John and Bill watch the same\nprogram on television, and John watches it to relax while Bill watches it solely\nto satisfy an educational requirement, then John's watching the movie is an\ninstance of &%RecreationOrExercise, while Bill's is not (both cases of\nwatching the television program would however be in the class of &%Seeing, since\nbeing an instance of this latter class is not determined by intention)."
(is-a IntentionalProcess)
(role concrete))
(defclass OrganizationalProcess "SUO 1.55: July 14, 2003\nAn &%IntentionalProcess that\ninvolves an &%Organization."
(is-a IntentionalProcess)
(role concrete))
(defclass Election "SUO 1.55: July 14, 2003\n&%Election is the class of events conducted by an\norganization, in which qualified participants vote for officers, adopt\nresolutions, or settle other issues in that &%Organization."
(is-a OrganizationalProcess)
(role concrete))
(defclass ReligiousProcess "SUO 1.55: July 14, 2003\nAn &%OrganizationalProcess that is\ncarried out within or by a &%ReligiousOrganization."
(is-a OrganizationalProcess)
(role concrete))
(defclass JoiningAnOrganization "SUO 1.55: July 14, 2003\nThe &%OrganizationalProcess of\nbecoming a &%member of an &%Organization."
(is-a OrganizationalProcess)
(role concrete))
(defclass Matriculation "SUO 1.55: July 14, 2003\nThe &%OrganizationalProcess of joining an\n&%EducationalOrganization as a student."
(is-a JoiningAnOrganization)
(role concrete))
(defclass Hiring "SUO 1.55: July 14, 2003\n&%OrganizationalProcesses where someone is made an\nemployee of an &%Organization."
(is-a JoiningAnOrganization)
(role concrete))
(defclass LeavingAnOrganization "SUO 1.55: July 14, 2003\nThe &%OrganizationalProcess of\nleaving an &%Organization, whether voluntarily or involuntarily."
(is-a OrganizationalProcess)
(role concrete))
(defclass Graduation "SUO 1.55: July 14, 2003\nThe &%OrganizationalProcess of graduating\nfrom an &%EducationalOrganization."
(is-a LeavingAnOrganization)
(role concrete))
(defclass TerminatingEmployment "SUO 1.55: July 14, 2003\n&%OrganizationalProcesses where someone\nceases to be an employee of an &%Organization. Note that this covers being\nlaid off, being fired, and voluntarily leaving a job."
(is-a LeavingAnOrganization)
(role concrete))
(defclass PoliticalProcess "SUO 1.55: July 14, 2003\nAn &%OrganizationalProcess carried\nout by, for or against officially constituted governments. Some examples\nwould be voting on proposed legislation, electing a government representative,\nor even overthrowing a government in a revolution."
(is-a OrganizationalProcess)
(role concrete))
(defclass JudicialProcess "SUO 1.55: July 14, 2003\nAny legal proceeding which is conducted\nby a &%JudicialOrganization. Note that there is an important difference\nbetween the concepts &%LegalAction and &%JudicialProcess. The former\nrefers to legal claims that are brought by a plaintiff, e.g. law suits,\nwhile the second refers to trials and other sorts of judicial hearings\nwhere the merits of a &%LegalAction are decided."
(is-a PoliticalProcess)
(role concrete))
(defclass MilitaryProcess "SUO 1.55: July 14, 2003\nAny &%Process that is carried out by a\nmilitary organization. Note that this class covers &%Processes, e.g.\nmilitary operations, that are the result of careful planning, as well as\nthose which are unscripted."
(is-a PoliticalProcess)
(role concrete))
(defclass Guiding "SUO 1.55: July 14, 2003\nAny &%IntentionalProcess where the &%agent tries to\ndirect the movements of another &%Object, whether an &%Agent or not."
(is-a IntentionalProcess)
(role concrete))
(defclass RegulatoryProcess "SUO 1.55: July 14, 2003\nan &%Guiding whose aim is the enforcement\nof rules or regulations. Note the key differences between &%RegulatoryProcess\nand the related concept &%Managing. The latter implies a long-term relationship\nbetween a single manager and limited number of agents who are managed, while the\nformer implies a normative standard to which the activities of the regulated are\nreferred."
(is-a Guiding)
(role concrete))
(defclass Managing "SUO 1.55: July 14, 2003\n&%OrganizationalProcesses that involve overseeing\nthe activities of others. Note the key differences between &%RegulatoryProcess\nand its sibling &%Managing. The latter implies a long-term relationship between\nthe manager and the managed, while the former implies a normative standard to which\nthe activities of the regulated are referred."
(is-a OrganizationalProcess Guiding)
(role concrete))
(defclass Steering "SUO 1.55: July 14, 2003\nControlling the direction and/or speed of a\n&%TransportationDevice. This includes navigating a ship, driving a car\nor truck, operating a train, etc."
(is-a Guiding)
(role concrete))
(defclass EducationalProcess "SUO 1.55: July 14, 2003\nAny &%Process which is intended to result\nin &%Learning."
(is-a Guiding)
(role concrete))
(defclass Keeping "SUO 1.55: July 14, 2003\nThe &%Class of &%Processes where the &%agent\nkeeps something in a particular location for an extended period of time."
(is-a IntentionalProcess)
(role concrete))
(defclass Confining "SUO 1.55: July 14, 2003\nThe &%Class of &%Keeping &%Processes where the\n&%patient is a &%Human or an &%Animal and is kept involuntarily. This covers\ncaging, imprisonment, jailing, etc."
(is-a Keeping)
(role concrete))
(defclass Maintaining "SUO 1.55: July 14, 2003\nThe &%Class of &%Processes where the &%agent\ncares for or maintains the &%Object."
(is-a IntentionalProcess)
(role concrete))
(defclass Repairing "SUO 1.55: July 14, 2003\nThe &%Class of &%Processes where the &%agent\nmakes a modification or series of modifications to an &%Object that is not\nfunctioning as intended so that it works properly."
(is-a IntentionalProcess)
(role concrete))
(defclass TherapeuticProcess "SUO 1.55: July 14, 2003\nA &%Process that is carried out\nfor the purpose of curing, improving or reducing the pain associated\nwith a &%DiseaseOrSyndrome."
(is-a Repairing)
(role concrete))
(defclass Surgery "SUO 1.55: July 14, 2003\nAny &%TherapeuticProcess that involves making an\nincision in the &%Animal that is the &%patient of the &%TherapeuticProcess."
(is-a TherapeuticProcess)
(role concrete))
(defclass Poking "SUO 1.55: July 14, 2003\nThe &%Class of &%Processes where the &%agent\npierces the surface of the &%Object with an &%instrument."
(is-a IntentionalProcess)
(role concrete))
(defclass Cutting "SUO 1.55: July 14, 2003\nThe &%subclass of &%Poking &%Processes which\ninvolve a sharp &%instrument."
(is-a Poking)
(role concrete))
(defclass ContentDevelopment "SUO 1.55: July 14, 2003\nA &%subclass of &%IntentionalProcess in\nwhich content is modified, its form is altered or it is created anew."
(is-a IntentionalProcess)
(role concrete))
(defclass Reading "SUO 1.55: July 14, 2003\nA &%subclass of &%ContentDevelopment in which\ncontent is converted from a written form into a spoken representation.\nNote that the class &%Interpreting should be used in cases where a\n&%Text is read silently."
(is-a ContentDevelopment)
(role concrete))
(defclass Writing "SUO 1.55: July 14, 2003\nA &%subclass of &%ContentDevelopment in which content is converted from one form (e.g. uttered, written or represented\nmentally) into a written form. Note that this class covers both\ntranscription and original creation of written &%Texts."
(is-a ContentDevelopment)
(role concrete))
(defclass Encoding "SUO 1.55: July 14, 2003\nConverting a document or message into a formal\nlanguage or into a code that can be understood only by a relatively small\nbody of &%Agents. Generally speaking, this hinders wide dissemination of\nthe content in the original document or message."
(is-a Writing)
(role concrete))
(defclass Decoding "SUO 1.55: July 14, 2003\nConverting a document or message that has previously\nbeen encoded (see &%Encoding) into a &%Language that can be understood by a\nrelatively large number of speakers."
(is-a Writing)
(role concrete))
(defclass Translating "SUO 1.55: July 14, 2003\nConverting content from one &%Language into another."
(is-a ContentDevelopment DualObjectProcess)
(role concrete))
(defclass Pursuing "SUO 1.55: July 14, 2003\nThe class of &%IntentionalProcesses where something is\nsought. Some examples would be hunting, shopping, trawling, and stalking."
(is-a IntentionalProcess)
(role concrete))
(defclass SocialInteraction "SUO 1.55: July 14, 2003\nThe &%subclass of\n&%IntentionalProcess that involves interactions between\n&%CognitiveAgents."
(is-a IntentionalProcess)
(role concrete))
(defclass ChangeOfPossession "SUO 1.55: July 14, 2003\nThe &%Class of &%Processes where\nownership of something is transferred from one &%Agent to another."
(is-a SocialInteraction)
(role concrete))
(defclass Giving "SUO 1.55: July 14, 2003\nThe &%subclass of &%ChangeOfPossession where the\n&%agent gives the &%destination something."
(is-a ChangeOfPossession)
(role concrete))
(defclass Funding "SUO 1.55: July 14, 2003\nAny instance of &%Giving where the &%patient is an\ninstance of &%Currency. Note that this class covers both\n&%FinancialTransactions, e.g. where a firm funds a software company with\nventure capital with the agreement that a certain percentage of the profits\non the investment will be returned to the firm, and instances of\n&%UnilateralGiving, e.g. a stipend provided to a student as part of\nscholarship or fellowship."
(is-a Giving)
(role concrete))
(defclass UnilateralGiving "SUO 1.55: July 14, 2003\nAny instance of &%Giving that is not part\nof a &%Transaction. In other words, any instance of &%Giving where nothing\nis received in return. Some examples of &%UnilateralGiving are: honorary\nawards, gifts, and financial grants."
(is-a Giving)
(role concrete))
(defclass Lending "SUO 1.55: July 14, 2003\nThe &%subclass of &%Giving &%Processes where\nthe &%agent gives the &%destination something for a limited period of\ntime with the expectation that it will be returned later (perhaps with\ninterest)."
(is-a Giving)
(role concrete))
(defclass GivingBack "SUO 1.55: July 14, 2003\nAny instance of &%Giving where the &%agent gives\nsomething to the &%destination which was previously given to the &%agent by\nthe &%destination, e.g. returing a book that was borrowed from someone."
(is-a Giving)
(role concrete))
(defclass Getting "SUO 1.55: July 14, 2003\nThe &%subclass of &%ChangeOfPossession where the\n&%agent gets something. Note that the source from which something is\nobtained is specified with the &%origin &%CaseRole."
(is-a ChangeOfPossession)
(role concrete))
(defclass UnilateralGetting "SUO 1.55: July 14, 2003\nAny instance of &%Getting that is not part\nof a &%Transaction. In other words, any instance of &%Getting where nothing\nis given in return. Some examples of &%UnilateralGetting are: appropriating,\ncommandeering, stealing, etc."
(is-a Getting)
(role concrete))
(defclass Borrowing "SUO 1.55: July 14, 2003\nThe &%subclass of &%Getting &%Processes where\nthe &%agent gets something for a limited period of time with the expectation\nthat it will be returned later (perhaps with interest)."
(is-a Getting)
(role concrete))
(defclass Transaction "SUO 1.55: July 14, 2003\nThe &%subclass of &%ChangeOfPossession where\nsomething is exchanged for something else."
(is-a ChangeOfPossession DualObjectProcess)
(role concrete))
(defclass FinancialTransaction "SUO 1.55: July 14, 2003\nA &%Transaction where an instance of &%CurrencyMeasure is exchanged for something else."
(is-a Transaction)
(role concrete)
(single-slot transactionAmount
(type INSTANCE)
;+ (allowed-classes CurrencyMeasure)
;+ (cardinality 0 1)
(create-accessor read-write)))
(defclass CommercialService "SUO 1.55: July 14, 2003\nAny &%FinancialTransaction by a\n&%CommercialAgent where the aim is to produce a profit."
(is-a FinancialTransaction)
(role concrete))
(defclass Betting "SUO 1.55: July 14, 2003\nA &%FinancialTransaction where an instance of\n&%CurrencyMeasure is exchanged for the possibility of winning a larger\ninstance of &%CurrencyMeasure within the context of some sort of\n&%Game."
(is-a FinancialTransaction)
(role concrete))
(defclass Buying "SUO 1.55: July 14, 2003\nA &%FinancialTransaction in which an instance of\n&%CurrencyMeasure is exchanged for an instance of &%Physical."
(is-a FinancialTransaction)
(role concrete))
(defclass Selling "SUO 1.55: July 14, 2003\nA &%FinancialTransaction in which an instance of\n&%Physical is exchanged for an instance of &%CurrencyMeasure."
(is-a FinancialTransaction)
(role concrete))
(defclass Pretending "SUO 1.55: July 14, 2003\nAny &%SocialInteraction where a\n&%CognitiveAgent or &%Group of &%CognitiveAgents attempts to make\nanother &%CognitiveAgent or &%Group of &%CognitiveAgents believe\nsomething that is false. This covers deceit, affectation,\nimpersonation, and entertainment productions, to give just a few\nexamples."
(is-a SocialInteraction)
(role concrete))
(defclass Communication "SUO 1.55: July 14, 2003\nA &%SocialInteraction that involves\nthe transfer of information between two or more &%CognitiveAgents.\nNote that &%Communication is closely related to, but essentially\ndifferent from, &%ContentDevelopment. The latter involves the creation\nor modification of a &%ContentBearingObject, while &%Communication is\nthe transfer of information for the purpose of conveying a message."
(is-a SocialInteraction)
(role concrete))
(defclass Disseminating "SUO 1.55: July 14, 2003\nAny &%Communication that involves a\nsingle &%agent and many &%destinations. This covers the release\nof a published book, broadcasting, a theatrical performance, giving\norders to assembled troops, delivering a public lecture, etc."
(is-a Communication)
(role concrete))
(defclass Demonstrating "SUO 1.55: July 14, 2003\nExhibiting something or a range of things\nbefore the public in a particular location. This would cover software\ndemos, theatrical plays, lectures, dance and music recitals, museum\nexhibitions, etc."
(is-a Disseminating)
(role concrete)
(single-slot attends
;+ (comment "(&%attends ?DEMO ?PERSON) means that ?PERSON attends, i.e. is a member of the audience, of the performance event ?DEMO.\n\n(&%experiencer ?PROCESS ?AGENT) means that ?AGENT experiences the &%Process ?PROCESS. For example, Yojo is the &%experiencer of seeing in the following proposition: Yojo sees the fish. Note that &%experiencer, unlike &%agent, does not entail a causal relation between its arguments.")
(type INSTANCE)
;+ (allowed-classes Human)
;+ (cardinality 0 1)
(create-accessor read-write)))
(defclass Advertising "SUO 1.55: July 14, 2003\nA &%Disseminating whose purpose is to\npromote the sale of an &%Object represented in a &%Text or &%Icon\n(the advertisement)."
(is-a Disseminating)
(role concrete))
(defclass Expressing "SUO 1.55: July 14, 2003\nInstances of this &%Class express a state of the &%agent.\nFor example, Jane thanked Barbara for the present she had given her. The thanking\nin this case expresses the gratitude of Jane towards Barbara. Note that &%Expressing,\nunlike the other speech act types, is not a subclass of &%LinguisticCommunication.\nThis is because emotions, for example, can be expressed without language, e.g. by\nsmiling."
(is-a Communication)
(role concrete))
(defclass LinguisticCommunication "SUO 1.55: July 14, 2003\nA &%Communication that involves\nthe transfer of information via a &%LinguisticExpression."
(is-a Communication)
(role concrete))
(defclass ExpressingInLanguage "SUO 1.55: July 14, 2003\nAny instance of &%Expressing that is also an\ninstance of &%LinguisticCommunication, e.g. thanking someone, expressing condolence,\nexpressing disapproval with an utterance rather than a &%Gesture, etc."
(is-a Expressing LinguisticCommunication)
(role concrete))
(defclass Stating "SUO 1.55: July 14, 2003\nInstances of this &%Class commit the &%agent to some truth.\nFor example, John claimed that the moon is made of green cheese."
(is-a LinguisticCommunication)
(role concrete))
(defclass Supposing "SUO 1.55: July 14, 2003\nInstances of this &%Class suppose, for the sake of\nargument, that a proposition is true. For example, John considered what he\nwould do if he won the lottery."
(is-a LinguisticCommunication)
(role concrete))
(defclass Directing "SUO 1.55: July 14, 2003\nInstances of this &%Class urge some further action\namong the receivers. A &%Directing can be an &%Ordering, a &%Requesting or\na &%Questioning."
(is-a LinguisticCommunication)
(role concrete))
(defclass Ordering "SUO 1.55: July 14, 2003\nA &%Directing in which the receiver is\ncommanded to realize the content of a &%ContentBearingObject. Orders\nare injunctions, the disobedience of which involves sanctions, or\nwhich express an obligation upon the part of the orderee."
(is-a Directing)
(role concrete))
(defclass Requesting "SUO 1.55: July 14, 2003\nA request expresses a desire that some future\naction be performed. For example, the 5th Battalion requested air support\nfrom the 3rd Bomber Group. Note that this class covers proposals,\nrecommendations, suggestions, etc."
(is-a Directing)
(role concrete))
(defclass Questioning "SUO 1.55: July 14, 2003\nA request for information. For example, John asked\nBill if the President had said anything about taxes in his State of the Union\naddress."
(is-a Directing)
(role concrete))
(defclass Committing "SUO 1.55: July 14, 2003\nInstances of this &%Class commit the &%agent to some\nfuture course. For example, Bob promised Susan that he would be home by 11pm."
(is-a LinguisticCommunication)
(role concrete))
(defclass Offering "SUO 1.55: July 14, 2003\nThe subclass of &%Committing in which a &%CognitiveAgent offers something &%Physical to another agent. Offerings may be unconditional (in which case they are a promise to effect a &%UnilateralGiving) or conditional (in which case they are a promise to effect a &%Transaction of some sort)."
(is-a Committing)
(role concrete))
(defclass Declaring "SUO 1.55: July 14, 2003\nThe &%Class of &%LinguisticCommunications that effect an institutional alteration when performed by competent authority.\nSome examples are nominating, marrying, and excommunicating."
(is-a LinguisticCommunication)
(role concrete))
(defclass Wedding "SUO 1.55: July 14, 2003\nAny &%Declaring that leads to one person being the &%spouse of another."
(is-a Declaring)
(role concrete))
(defclass Naming "SUO 1.55: July 14, 2003\nThe &%Process of assigning a name to someone or something."
(is-a Declaring)
(role concrete))
(defclass CommunicationAct-Single "OPENCYC 1: MAY 23, 2002\nA collection of information transfer events; a specialization of #$Communicating. Each instance of #$CommunicationAct-Single is a single-source transmission of information from _one_ sender (see the predicate #$senderOfInfo) to one or more recipients (see the predicate #$recipientOfInfo). Every instance of #$CommunicationAct-Single has a transmission sub-event (which is an instance of #$IBTGeneration) and one or more reception sub-events (which are instances of #$AccessingAnIBT). An instance of #$CommunicationAct-Single starts when its transmission sub-event starts and ends when its accessing sub-event(s) end."
(is-a LinguisticCommunication)
(role concrete))
(defclass Inform-CommunicationAct "OPENCYC 1: MAY 23, 2002\nA specialization of both #$PurposefulAction and #$CommunicationAct-Single. Each instance of #$Inform-CommunicationAct is a communication act in which an agent intentionally conveys some piece of information."
(is-a CommunicationAct-Single)
(role concrete))
(defclass Cooperation "SUO 1.55: July 14, 2003\nThe &%subclass of &%SocialInteraction where\nthe participants involved work together for the achievement of a common\ngoal."
(is-a SocialInteraction)
(role concrete))
(defclass Meeting "SUO 1.55: July 14, 2003\nThe coming together of two or more\n&%CognitiveAgents for the purpose of &%Communication. This covers informal\nmeetings, e.g. visits with family members, and formal meetings, e.g. a board\nof directors meeting."
(is-a SocialInteraction)
(role concrete))
(defclass Contest "SUO 1.55: July 14, 2003\nA &%SocialInteraction where the &%agent and\n&%patient are &%CognitiveAgents who are trying to defeat one another.\nNote that this concept is often applied in a metaphorical sense in natural\nlanguage, when we speak, e.g., of the struggle of plants for space or\nsunlight, or of bacteria for food resources in some environment."
(is-a SocialInteraction)
(role concrete))
(defclass ViolentContest "SUO 1.55: July 14, 2003\nA &%Contest where one participant attempts to\nphysically injure another participant."
(is-a Contest)
(role concrete))
(defclass War "SUO 1.55: July 14, 2003\nA military confrontation between two or more\n&%GeopoliticalAreas or &%Organizations whose members are &%GeopoliticalAreas.\nAs the corresponding axiom specifies, a &%War is made up of &%Battles."
(is-a ViolentContest)
(role concrete))
(defclass Battle "SUO 1.55: July 14, 2003\nA &%ViolentContest between two or more military\nunits within the context of a war. Note that this does not cover the\nmetaphorical sense of 'battle', which simply means a struggle of some\nsort. This sense should be represented with the more general concept of\n&%Contest."
(is-a ViolentContest)
(role concrete))
(defclass Game "SUO 1.55: July 14, 2003\nA &%Contest whose purpose is the\nenjoyment/stimulation of the participants or spectators of the &%Game."
(is-a Contest RecreationOrExercise)
(role concrete))
(defclass Sport "SUO 1.55: July 14, 2003\nA &%Game which requires some degree of physical\nexercion from the participants of the game."
(is-a Game)
(role concrete))
(defclass LegalAction "SUO 1.55: July 14, 2003\nAny &%Process where a &%CognitiveAgent seeks\nto obtain something through a court of law."
(is-a Contest)
(role concrete))
(defclass Maneuver "SUO 1.55: July 14, 2003\nAn intentional move or play within a &%Contest.\nIn many cases, a &%Maneuver is a realization of part of a strategy for\nwinning the &%Contest, but it also may be just an arbitrary or semi-arbitrary\ndivision of the overarching &%Contest, e.g. innings in a baseball game."
(is-a IntentionalProcess)
(role concrete))
(defclass Attack "SUO 1.55: July 14, 2003\nA &%Maneuver in a &%ViolentContest where the\n&%agent attempts to inflict damage on the &%patient."
(is-a Maneuver)
(role concrete))
(defclass DefensiveManeuver "SUO 1.55: July 14, 2003\nA &%Maneuver in a &%ViolentContest\nwhere the &%agent attempts to avoid being damaged."
(is-a Maneuver)
(role concrete))
(defclass Searching "SUO 1.15: September 6, 2001\nAny &%Process where the aim is to find something, whether it be information (i.e. a &%Proposition) or an &%Object."
(is-a IntentionalProcess)
(role concrete))
(defclass Motion "SUO 1.55: July 14, 2003\nAny &%Process of movement."
(is-a Process)
(role concrete)
(single-slot path
;+ (comment "(&%path ?MOTION ?PATH) means that ?PATH is a route along which ?MOTION occurs. For example, Highway 101 is the path in the following proposition: the car drove up Highway 101.")
(type INSTANCE)
;+ (allowed-classes Object)
;+ (cardinality 0 1)
(create-accessor read-write)))
(defclass BodyMotion "SUO 1.55: July 14, 2003\nAny &%Motion where the &%agent is an &%Organism\nand the &%patient is a &%BodyPart."
(is-a Motion)
(role concrete))
(defclass Swimming "SUO 1.55: July 14, 2003\nAny deliberate and controlled &%BodyMotion\nthrough water that is accomplished by an &%Organism."
(is-a BodyMotion)
(role concrete))
(defclass Dancing "SUO 1.55: July 14, 2003\nAny &%BodyMotion of &%Humans which is\ndeliberately coordinated with music."
(is-a BodyMotion)
(role concrete))
(defclass Gesture "SUO 1.55: July 14, 2003\nAny &%BodyMotion, e.g. a hand wave, a nod of the\nhead, a smile, which expresses a &%StateOfMind."
(is-a Expressing BodyMotion)
(role concrete))
(defclass GeologicalProcess "SUO 1.55: July 14, 2003\nThe class of activities that\nare caused by geological forces and affect geological features,\nand which may affect the biosphere as well."
(is-a Motion)
(role concrete))
(defclass LiquidMotion "SUO 1.55: July 14, 2003\nAny &%Motion where the &%patient is a\n&%Liquid. This class would cover, in particular, the flow of\n&%Water."
(is-a Motion)
(role concrete))
(defclass WaterMotion
(is-a LiquidMotion)
(role concrete))
(defclass GasMotion "SUO 1.55: July 14, 2003\nAny &%Motion where the &%patient is a\n&%Gas. This class would cover, in particular, the motion of\n&%Air, e.g. a breeze or wind."
(is-a Motion)
(role concrete))
(defclass Wind "SUO 1.55: July 14, 2003\nAny &%Motion of &%Air."
(is-a GasMotion)
(role concrete))
(defclass DirectionChange "SUO 1.55: July 14, 2003\nThe act of changing the direction in\nwhich the &%patient of the act is oriented."
(is-a Motion)
(role concrete))
(defclass Translocation "SUO 1.55: July 14, 2003\n&%Translocation is that class of &%Motions\nin which an object moves from one place to another. In the case of round\ntrips, the &%origin and &%destination are the same, but the intervening\nmotion passes through other locations. &%Translocation represents linear\nmotion, in contrast to rotation or other movement in place. A vehicle is\nnot necessary; &%Ambulating is a kind of &%Translocation."
(is-a Motion)
(role concrete))
(defclass Ambulating "SUO 1.55: July 14, 2003\nAny &%BodyMotion which is accomplished by\nmeans of the legs of an &%Animal for the purpose of moving from one\npoint to another."
(is-a BodyMotion Translocation)
(role concrete))
(defclass Walking "SUO 1.55: July 14, 2003\n&%Ambulating relatively slowly, i.e. moving in such a\nway that at least one foot is always in contact with the ground."
(is-a Ambulating)
(role concrete))
(defclass Running "SUO 1.55: July 14, 2003\n&%Ambulating relatively quickly, i.e. moving in such a\nway that, with each step, neither foot is in contact with the ground for a\nperiod of time."
(is-a Ambulating)
(role concrete))
(defclass Transfer "SUO 1.55: July 14, 2003\nAny &%instance of &%Translocation where the &%agent\nand the &%patient are not the same thing."
(is-a Translocation)
(role concrete))
(defclass Carrying "SUO 1.55: July 14, 2003\n&%Transfer from one point to another by means of\nan &%Animal or &%Human."
(is-a Transfer)
(role concrete))
(defclass Removing "SUO 1.55: July 14, 2003\nThe &%Class of &%Processes where something is\ntaken away from a location. Note that the thing removed and the location\nare specified with the &%CaseRoles &%patient and &%origin, respectively."
(is-a Transfer)
(role concrete))
(defclass Uncovering "SUO 1.55: July 14, 2003\nThe &%Class of &%Removing processes where the &%agent\nuncovers the &%patient, either completely or only partially."
(is-a Removing)
(role concrete))
(defclass Drying "SUO 1.55: July 14, 2003\nThe &%Class of &%Processes where a &%Liquid is removed\nfrom an &%Object."
(is-a Removing)
(role concrete))
(defclass Putting "SUO 1.55: July 14, 2003\nThe &%Class of &%Processes where something is put\nin a location. Note that the location is specified with the &%CaseRole\n&%destination."
(is-a Transfer)
(role concrete))
(defclass Covering "SUO 1.55: July 14, 2003\nThe &%Class of &%Putting processes where the &%agent\ncovers the &%patient, either completely or only partially, with something\nelse."
(is-a Putting)
(role concrete))
(defclass Dressing "SUO 1.55: July 14, 2003\nThe &%Process of putting on &%Clothing."
(is-a Covering)
(role concrete))
(defclass Inserting "SUO 1.55: July 14, 2003\n&%Putting one thing inside of another thing."
(is-a Putting)
(role concrete))
(defclass Injecting "SUO 1.55: July 14, 2003\n&%Inserting a &%BiologicallyActiveSubstance into an\n&%Animal or a &%Human with a syringe."
(is-a Inserting)
(role concrete))
(defclass Wetting "SUO 1.55: July 14, 2003\nThe &%Class of &%Processes where a &%Liquid is\nadded to an &%Object."
(is-a Putting)
(role concrete))
(defclass Substituting "SUO 1.55: July 14, 2003\nThe &%Class of &%Transfers where one thing is\nreplaced with something else."
(is-a Transfer DualObjectProcess)
(role concrete))
(defclass Impelling "SUO 1.55: July 14, 2003\nThe &%subclass of &%Transfer where the &%patient\ntravels through space by means of a sudden, forceful event. Some examples\nwould be shooting, throwing, tossing, etc."
(is-a Transfer)
(role concrete))
(defclass Shooting "SUO 1.55: July 14, 2003\nThe &%subclass of &%Impelling where the &%patient\nis a projectile that is fired through the air by means of some sort of\n&%Device."
(is-a Impelling)
(role concrete))
(defclass Touching "SUO 1.55: July 14, 2003\nAny &%Transfer where two &%Objects are\nbrought into immediate physical contact with one another."
(is-a Transfer)
(role concrete))
(defclass Grabbing "SUO 1.55: July 14, 2003\nAny instance of &%Touching which results in\na situation where the &%agent &%grasps the &%patient of the &%Touching."
(is-a Touching)
(role concrete))
(defclass Impacting "SUO 1.55: July 14, 2003\nAny &%Touching where something comes into\nsudden, forceful, physical contact with something else. Some examples\nwould be striking, knocking, whipping etc."
(is-a Touching)
(role concrete))
(defclass Releasing "SUO 1.55: July 14, 2003\nAny instance of &%Transfer which results in\na situation where it is not the case that the &%agent &%grasps something\nwhich he/she &%grasps previously."
(is-a Transfer)
(role concrete))
(defclass Transportation "SUO 1.55: July 14, 2003\n&%Motion from one point to another by means of a &%TransportationDevice."
(is-a Translocation)
(role concrete))
(defclass Sending "The portion of a shipping act that consists of consigning an object to be shipped to a carrier."
(is-a Transportation)
(role concrete))
(defclass Shipping "A form of transportation that consists of using an intermediary carrier to transport an item from the sender to the receiver. The carrier may be a separate department of a large company that maintains its own fleet of transportation devices."
(is-a Transportation)
(role concrete))
(defclass Receiving "The portion of a shipping act that consists of taking the object shipped from a carrier."
(is-a Transportation)
(role concrete))
(defclass Mailing
(is-a Translocation)
(role concrete))
(defclass Radiating "SUO 1.55: July 14, 2003\nProcesses in which some form of electromagnetic\nradiation, e.g. radio waves, light waves, electrical energy, etc., is given\noff or absorbed by something else."
(is-a Motion)
(role concrete))
(defclass RadiatingLight "SUO 1.55: July 14, 2003\nThe &%subclass of &%Radiating in which\nlight is given off or absorbed. Some examples include blinking, flashing,\nand glittering."
(is-a Radiating)
(role concrete))
(defclass RadiatingSound "SUO 1.55: July 14, 2003\nThe &%subclass of &%Radiating in which\nsound waves are given off or absorbed. Some examples include creaking,\nroaring, and whistling."
(is-a Radiating)
(role concrete))
(defclass Vocalizing "SUO 1.55: July 14, 2003\nAny instance of &%RadiatingSound where the\n&%instrument is the &%Human vocal cords. This covers grunts, screams,\nroars, as well as &%Speaking."
(is-a RadiatingSound BodyMotion)
(role concrete))
(defclass Speaking "SUO 1.55: July 14, 2003\nAny &%LinguisticGeneration which is also a\n&%Vocalizing, i.e. any &%LinguisticCommunication by a &%Human which\ninvolves his/her vocal cords."
(is-a LinguisticCommunication Vocalizing)
(role concrete))
(defclass Music "SUO 1.55: July 14, 2003\nThe &%subclass of &%RadiatingSound where the\nsound is intended to be melodic and is produced deliberately."
(is-a RadiatingSound)
(role concrete))
(defclass Singing "SUO 1.55: July 14, 2003\n&%Speaking that is also &%Music."
(is-a Speaking Music)
(role concrete))
(defclass RadiatingElectromagnetic "SUO 1.55: July 14, 2003\n&%RadiatingElectromagnetic\nis the subclass of &%Radiating processes in which electromagnetic\nradiation is transmitted or absorbed."
(is-a Radiating)
(role concrete))
(defclass RadiatingNuclear "SUO 1.55: July 14, 2003\nReleasing atomic energy, i.e. energy from\na nuclear reaction."
(is-a Radiating)
(role concrete))
(defclass InternalChange "SUO 1.55: July 14, 2003\n&%Processes which involve altering an internal\nproperty of an &%Object, e.g. the shape of the &%Object, its coloring, its\nstructure, etc. &%Processes that are not instances of this class include\nchanges that only affect the relationship to other objects, e.g. changes in\nspatial or temporal location."
(is-a Process)
(role concrete))
(defclass BiologicalProcess "SUO 1.55: July 14, 2003\nA &%Process embodied in an &%Organism."
(is-a InternalChange)
(role concrete))
(defclass PhysiologicProcess "SUO 1.55: July 14, 2003\nA normal process of an &%Organism\nor part of an &%Organism."
(is-a BiologicalProcess)
(role concrete))
(defclass AutonomicProcess "SUO 1.55: July 14, 2003\nThe class of &%PhysiologicProcesses of\nwhich there is not conscious awareness and control."
(is-a PhysiologicProcess)
(role concrete))
(defclass OrganismProcess "SUO 1.55: July 14, 2003\nA physiologic function of the\n&%Organism as a whole, of multiple organ systems or of multiple\n&%Organs or &%Tissues."
(is-a PhysiologicProcess)
(role concrete))
(defclass Birth "SUO 1.55: July 14, 2003\nThe &%Process of being born."
(is-a OrganismProcess)
(role concrete))
(defclass Death "SUO 1.55: July 14, 2003\nThe &%Process of dying."
(is-a OrganismProcess)
(role concrete))
(defclass Breathing "SUO 1.55: July 14, 2003\nThe &%Process of respiration, by which oxygen\nis made available to an &%Animal. This covers processes of inhalation,\nexhalation, and alternations between the two."
(is-a OrganismProcess)
(role concrete))
(defclass Ingesting "SUO 1.55: July 14, 2003\nThe &%Process by which &%Food is\ntaken into an &%Animal."
(is-a OrganismProcess)
(role concrete))
(defclass Eating "SUO 1.55: July 14, 2003\nThe &%Process by which solid &%Food is\nincorporated into an &%Animal."
(is-a Ingesting)
(role concrete))
(defclass Drinking "SUO 1.55: July 14, 2003\nThe &%Process by which liquid &%Food, i.e.\n&%Beverages, are incorporated into an &%Animal."
(is-a Ingesting)
(role concrete))
(defclass Digesting "SUO 1.55: July 14, 2003\nThe &%Process by which &%Food that has been\ningested is broken down into simpler chemical compounds and absorbed by\nthe &%Organism."
(is-a OrganismProcess)
(role concrete))
(defclass Growth "SUO 1.55: July 14, 2003\nThe &%Process of biological development in which\nan &%Organism or part of an &%Organism changes its form or its size."
(is-a OrganismProcess)
(role concrete))
(defclass Replication "SUO 1.55: July 14, 2003\nThe &%Process of biological reproduction.\nThis can be either a sexual or an asexual process."
(is-a OrganismProcess)
(role concrete))
(defclass SexualReproduction "SUO 1.55: July 14, 2003\nSexual &%Processes of biological\nreproduction."
(is-a Replication)
(role concrete))
(defclass AsexualReproduction "SUO 1.55: July 14, 2003\nAsexual &%Processes of biological\nreproduction."
(is-a Replication)
(role concrete))
(defclass OrganOrTissueProcess "SUO 1.55: July 14, 2003\nA &%PhysiologicProcess of a\nparticular &%Organ or &%Tissue."
(is-a PhysiologicProcess)
(role concrete))
(defclass PsychologicalProcess "SUO 1.55: July 14, 2003\nA &%BiologicalProcess which takes place in\nthe mind or brain of an &%Organism and which may be manifested in the behavior\nof the &%Organism."
(is-a BiologicalProcess)
(role concrete))
(defclass IntentionalPsychologicalProcess "SUO 1.55: July 14, 2003\nAn &%IntentionalProcess that\ncan be realized entirely within the mind or brain of an &%Organism. Thus,\nfor example, &%Reasoning is a subclass of &%IntentionalPsychologicalProcess,\nbecause one can reason simply by exercising one's mind/brain. On the other\nhand, &%RecreationOrExercise is not a subclass of &%IntentionalPsychologicalProcess,\nbecause many instances of &%RecreationOrExercise necessarily have &%subProcesses\nof &%BodyMotion."
(is-a IntentionalProcess PsychologicalProcess)
(role concrete))
(defclass Planning "SUO 1.55: July 14, 2003\nSpecifying a set of actions in order to meet a set of goals or objectives."
(is-a IntentionalPsychologicalProcess)
(role concrete))
(defclass Designing "SUO 1.55: July 14, 2003\nThe spatial analogue of &%Planning. &%Designing a\n&%Collection of &%Objects involves determining a placement of the &%Objects\nwith respect to one another and perhaps other &%Objects as well, in order to\nsatisfy a particular purpose."
(is-a IntentionalPsychologicalProcess)
(role concrete))
(defclass Interpreting "SUO 1.55: July 14, 2003\nAny &%Process of assigning a &%Proposition to\na &%Text, i.e. understanding the &%Text."
(is-a IntentionalPsychologicalProcess)
(role concrete))
(defclass Learning "SUO 1.55: July 14, 2003\nThe &%Class of &%Processes which relate to the\nacquisition of information."
(is-a IntentionalPsychologicalProcess)
(role concrete))
(defclass Discovering "SUO 1.55: July 14, 2003\nFinding something that was sought. Note that\nthis class is restricted to cases of discovering something &%Physical.\nFor cases involving the acquisition of knowledge, the class &%Learning\nshould be used."
(is-a IntentionalPsychologicalProcess)
(role concrete))
(defclass Classifying "SUO 1.55: July 14, 2003\nThe &%Class of &%IntentionalPsychologicalProcesses\nwhich involve attaching a name or category to a thing or set of things.\nNote that &%Classifying is distinguished from &%Learning by the fact\nthat the latter covers the acquisition by a &%CognitiveAgent of any\n&%Proposition, while the former involves the assignment of a label\nor category."
(is-a IntentionalPsychologicalProcess)
(role concrete))
(defclass Reasoning "SUO 1.55: July 14, 2003\nThe &%Class of &%IntentionalPsychologicalProcesses\nwhich involve concluding, on the basis of either deductive or inductive\nevidence, that a particular &%Proposition or &%Sentence is true."
(is-a IntentionalPsychologicalProcess)
(role concrete))
(defclass Selecting "SUO 1.55: July 14, 2003\nThe &%Class of &%IntentionalPsychologicalProcesses\nwhich involve opting for one or more &%Entity out of a larger set of &%Entities."
(is-a IntentionalPsychologicalProcess)
(role concrete))
(defclass Deciding "SUO 1.55: July 14, 2003\nThe subclass of &%Selecting where the &%agent\nopts for one course of action out of a set of multiple possibilities."
(is-a Selecting)
(role concrete))
(defclass LegalDecision "SUO 1.55: July 14, 2003\nA decision issued by a court with respect to\na &%LegalAction."
(is-a Deciding Declaring)
(role concrete))
(defclass Voting "SUO 1.55: July 14, 2003\n&%Voting is the activity of voting in an\n&%Election. Voting is typically done by individuals, while &%Elections\nare conducted by &%Organizations. The voting process by an individual\nvoter is part of an &%Election process."
(is-a Selecting)
(role concrete))
(defclass Comparing "SUO 1.55: July 14, 2003\nThe &%Class of &%IntentionalPsychologicalProcesses\nwhich involve comparing, relating, contrasting, etc. the properties of\ntwo or more &%Entities."
(is-a IntentionalPsychologicalProcess DualObjectProcess)
(role concrete))
(defclass Calculating "SUO 1.55: July 14, 2003\n&%IntentionalPsychologicalProcesses which involve\nthe consideration and/or manipulation of instances of &%Quantity."
(is-a IntentionalPsychologicalProcess)
(role concrete))
(defclass Measuring "SUO 1.55: July 14, 2003\nThe &%Class of &%Calculating &%Processes where\nthe aim is to determine the &%PhysicalQuantity of some aspect of the &%patient."
(is-a Calculating)
(role concrete))
(defclass Counting "SUO 1.55: July 14, 2003\nEnumerating something. The &%Class of &%Calculating\n&%Processes where the aim is to determine the &%Number corresponding to the\n&%patient."
(is-a Calculating)
(role concrete))
(defclass Predicting "SUO 1.55: July 14, 2003\nThe &%Class of &%IntentionalPsychologicalProcesses\nwhich involve the formulation of a &%Proposition about a state of affairs\nwhich might be realized in the future."
(is-a IntentionalPsychologicalProcess)
(role concrete))
(defclass Investigating "SUO 1.55: July 14, 2003\nThe class of &%IntentionalPsychologicalProcesses\nwhere the &%agent attempts to obtaina information (i.e. a &%Proposition denoted\nby a &%Formula)."
(is-a IntentionalPsychologicalProcess)
(role concrete))
(defclass DiagnosticProcess "SUO 1.55: July 14, 2003\nA &%Process that is carried out for\nthe purpose of determining the nature of a &%DiseaseOrSyndrome."
(is-a Investigating)
(role concrete))
(defclass Remembering "SUO 1.55: July 14, 2003\nThe &%Class of &%PsychologicalProcesses which\ninvolve the recollection of prior experiences and/or of knowledge\nwhich was previously acquired."
(is-a PsychologicalProcess)
(role concrete))
(defclass Perception "SUO 1.55: July 14, 2003\nSensing some aspect of the material world.\nNote that the &%agent of this sensing is assumed to be an &%Animal."
(is-a PsychologicalProcess)
(role concrete))
(defclass Seeing "SUO 1.55: July 14, 2003\nThe &%subclass of &%Perception in which the\nsensing is done by an ocular &%Organ."
(is-a Perception)
(role concrete))
(defclass Looking "SUO 1.55: July 14, 2003\nAny instance of &%Seeing which is intentional."
(is-a Seeing IntentionalProcess)
(role concrete))
(defclass Smelling "SUO 1.55: July 14, 2003\nThe &%subclass of &%Perception in which the\nsensing is done by an olefactory &%Organ."
(is-a Perception)
(role concrete))
(defclass Tasting "SUO 1.55: July 14, 2003\nThe &%subclass of &%Perception in which the\nsensing is done by of an &%Organ which can discriminate various tastes."
(is-a Perception)
(role concrete))
(defclass Hearing "SUO 1.55: July 14, 2003\nThe &%subclass of &%Perception in which the\nsensing is done by an auditory &%Organ."
(is-a Perception)
(role concrete))
(defclass Listening "SUO 1.55: July 14, 2003\nAny instance of &%Hearing which is intentional."
(is-a Hearing IntentionalProcess)
(role concrete))
(defclass TactilePerception "SUO 1.55: July 14, 2003\nThe &%subclass of &%Perception in which\nthe sensing is done by &%Touching. Note that &%Touching need not involve\n&%TactilePerception. For example, a person who has lost all sensation in\nboth of his legs would have no &%TactilePerception of anything his legs\nwere &%Touching."
(is-a Perception)
(role concrete))
(defclass PathologicProcess "SUO 1.55: July 14, 2003\nA disordered process, activity, or\nstate of the &%Organism as a whole, of a body system or systems, or of\nmultiple &%Organs or &%Tissues. Included here are normal responses to a\nnegative stimulus as well as patholologic conditions or states that are\nless specific than a disease. Pathologic functions frequently have\nsystemic effects."
(is-a BiologicalProcess)
(role concrete))
(defclass Damaging "SUO 1.55: July 14, 2003\nThe &%Class of &%Processes where the &%agent brings about a situation where the &%patient no longer functions normally or as intended."
(is-a InternalChange)
(role concrete))
(defclass Injuring "SUO 1.55: July 14, 2003\nThe process of creating a traumatic wound or\ninjury. Since &%Injuring is not possible without some biologic function\nof the organism being injured, it is a subclass of &%BiologicalProcess."
(is-a PathologicProcess Damaging)
(role concrete))
(defclass Poisoning "SUO 1.55: July 14, 2003\nA &%Poisoning is caused by an external\nsubstance. Since &%Poisoning is not possible without some biologic\nfunction which affects the &%Organism being injured, it is a subclass\nof &%BiologicalProcess."
(is-a Injuring)
(role concrete))
(defclass Destruction "SUO 1.55: July 14, 2003\nThe &%subclass of &%Damagings in which\nthe &%patient (or an essential element of the &%patient) is destroyed.\nNote that the difference between this concept and its superclass is solely\none of extent."
(is-a Damaging)
(role concrete))
(defclass Killing "SUO 1.55: July 14, 2003\nThe &%subclass of &%Destruction in which the\ndeath of an &%Organism is caused by an &%Organism. Note that in cases\nof suicide the &%Organism would be the same in both cases."
(is-a Destruction)
(role concrete))
(defclass ChemicalProcess "SUO 1.55: July 14, 2003\nA &%ChemicalProcess occurs whenever\nchemical compounds (&%CompoundSubstances) are formed or decomposed.\nFor example, reactants disappear as chemical change occurs, and products\nappear as chemical change occurs. In a chemical change a chemical\nreaction takes place. Catalysts in a &%ChemicalProcess may speed up the\nreaction, but aren't themselves produced or consumed. Examples: rusting of\niron and the decomposition of water, induced by an electric current, to\ngaseous hydrogen and gaseous oxygen."
(is-a InternalChange)
(role concrete))
(defclass ChemicalSynthesis "SUO 1.55: July 14, 2003\nThe &%Class of &%ChemicalProcesses in\nwhich a &%CompoundSubstance is formed from simpler reactants."
(is-a ChemicalProcess Combining)
(role concrete))
(defclass ChemicalDecomposition "SUO 1.55: July 14, 2003\nThe &%Class of &%ChemicalProcesses\nin which a &%CompoundSubstance breaks down into simpler products."
(is-a ChemicalProcess Separating)
(role concrete))
(defclass Combustion "SUO 1.55: July 14, 2003\nThe &%Class of &%ChemicalProcesses in which an &%Object\nreacts with oxygen and gives off heat. This includes all &%Processes in which\nsomething is burning."
(is-a ChemicalDecomposition)
(role concrete))
(defclass WeatherProcess "SUO 1.55: July 14, 2003\n&%WeatherProcess is the broadest class of\nprocesses that involve weather, including weather seasons (not to be confused\nwith instances of &%SeasonOfYear), weather systems, and short-term weather\nevents."
(is-a InternalChange)
(role concrete))
(defclass Precipitation "SUO 1.55: July 14, 2003\n&%Precipitation is the process of\nwater molecules falling from the air to the ground, in either a\nliquid or frozen state."
(is-a WeatherProcess WaterMotion)
(role concrete))
(defclass SurfaceChange "SUO 1.55: July 14, 2003\n&%Processes which involve altering\nthe properties that apply to the surface of an &%Object."
(is-a InternalChange)
(role concrete))
(defclass Coloring "SUO 1.55: July 14, 2003\nThe &%subclass of &%SurfaceChange where a\n&%ColorAttribute of the &%patient is altered."
(is-a SurfaceChange)
(role concrete))
(defclass ShapeChange "SUO 1.55: July 14, 2003\nThe &%Process of changing the shape of an &%Object."
(is-a InternalChange)
(role concrete))
(defclass Creation "SUO 1.55: July 14, 2003\nThe &%subclass of &%Process in which\nsomething is created. Note that the thing created is specified\nwith the &%result &%CaseRole."
(is-a InternalChange)
(role concrete))
(defclass Making "SUO 1.55: July 14, 2003\nThe &%subclass of &%Creation in which an individual\n&%Artifact or a type of &%Artifact is made."
(is-a Creation IntentionalProcess)
(role concrete))
(defclass Constructing "SUO 1.55: July 14, 2003\nThe &%subclass of &%Making in which a\n&%StationaryArtifact is built."
(is-a Making)
(role concrete))
(defclass Manufacturing "SUO 1.55: July 14, 2003\nThe &%Making of &%Artifacts on a mass scale."
(is-a Making)
(role concrete))
(defclass Publication "SUO 1.55: July 14, 2003\nThe &%Manufacture of &%Texts. Note that there is no implication that the &%Texts are distributed. Such distribution, when it occurs, is an instance of &%Dissemination."
(is-a Manufacturing ContentDevelopment)
(role concrete))
(defclass Cooking "SUO 1.55: July 14, 2003\nThe &%Making of an &%instance of &%Food."
(is-a Making)
(role concrete))
(defclass Composing
(is-a Creation)
(role concrete))
(defclass StateChange "SUO 1.55: July 14, 2003\nAny &%Process where the &%PhysicalState\nof &%part of the &%patient of the &%Process changes."
(is-a InternalChange)
(role concrete))
(defclass Melting "SUO 1.55: July 14, 2003\nThe &%Class of &%Processes where an &%Object is\nheated and converted from a &%Solid to a &%Liquid."
(is-a StateChange)
(role concrete))
(defclass Boiling "SUO 1.55: July 14, 2003\nThe &%Class of &%Processes where an &%Object is\nheated and converted from a &%Liquid to a &%Gas."
(is-a StateChange)
(role concrete))
(defclass Condensing "SUO 1.55: July 14, 2003\nThe &%Class of &%Processes where an &%Object is\ncooled and converted from a &%Gas to a &%Liquid."
(is-a StateChange)
(role concrete))
(defclass Freezing "SUO 1.55: July 14, 2003\nThe &%Class of &%Processes where an &%Object is\ncooled and converted from a &%Liquid to a &%Solid."
(is-a StateChange)
(role concrete))
(defclass QuantityChange
(is-a InternalChange)
(role concrete))
(defclass Increasing "SUO 1.55: July 14, 2003\nAny &%QuantityChange where the &%PhysicalQuantity\nis increased."
(is-a QuantityChange)
(role concrete))
(defclass Heating "SUO 1.55: July 14, 2003\nAny &%Increasing &%Process where the &%PhysicalQuantity\nincreased is a &%TemperatureMeasure."
(is-a Increasing)
(role concrete))
(defclass Decreasing "SUO 1.55: July 14, 2003\nAny &%QuantityChange where the &%PhysicalQuantity\nis decreased."
(is-a QuantityChange)
(role concrete))
(defclass Cooling "SUO 1.55: July 14, 2003\nAny &%Decreasing &%Process where the &%PhysicalQuantity\ndecreased is a &%TemperatureMeasure."
(is-a Decreasing)
(role concrete))
(defclass Abstract "SUO 1.55: July 14, 2003\nProperties or qualities as distinguished from any\nparticular embodiment of the properties/qualities in a physical medium.\nInstances of Abstract can be said to exist in the same sense as mathematical\nobjects such as sets and relations, but they cannot exist at a particular\nplace and time without some physical encoding or embodiment."
(is-a Entity)
(role concrete))
(defclass Quantity "SUO 1.55: July 14, 2003\nAny specification of how many or how much of \nsomething there is. Accordingly, there are two subclasses of &%Quantity: \n&%Number (how many) and &%PhysicalQuantity (how much)."
(is-a Abstract)
(role concrete)
(single-slot MultiplicationFn
;+ (comment "If ?NUMBER1 and ?NUMBER2 are &%Numbers, then (&%MultiplicationFn ?NUMBER1 ?NUMBER2) is the arithmetical product of these numbers.")
(type INSTANCE)
;+ (allowed-classes Quantity)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot RemainderFn
;+ (comment "(RemainderFn ?NUMBER ?DIVISOR) is the remainder of the number ?NUMBER divided by the number ?DIVISOR. The result has the same sign as ?DIVISOR.")
(type INSTANCE)
;+ (allowed-classes Quantity)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot MinFn
;+ (comment "(&%MinFn ?NUMBER1 ?NUMBER2) is the smallest of ?NUMBER1 and ?NUMBER2. In cases where ?NUMBER1 is equal to ?NUMBER2, &%MinFn returns one of its arguments.")
(type INSTANCE)
;+ (allowed-classes Quantity)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot lessThanOrEqualTo
;+ (comment "(&%lessThanOrEqualTo ?NUMBER1 ?NUMBER2) is true just in case the &%Quantity ?NUMBER1 is less than or equal to the &%Quantity ?NUMBER2.")
(type INSTANCE)
;+ (allowed-classes Quantity)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot lessThan
;+ (comment "(&%lessThan ?NUMBER1 ?NUMBER2) is true just in case the &%Quantity ?NUMBER1 is less than the &%Quantity ?NUMBER2.")
(type INSTANCE)
;+ (allowed-classes Quantity)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot greaterThanOrEqualTo
;+ (comment "(&%greaterThanOrEqualTo ?NUMBER1 ?NUMBER2) is true just in case the &%Quantity ?NUMBER1 is greater than the &%Quantity ?NUMBER2.")
(type INSTANCE)
;+ (allowed-classes Quantity)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot DivisionFn
;+ (comment "If ?NUMBER1 and ?NUMBER2 are &%Numbers, then (&%DivisionFn ?NUMBER1 ?NUMBER2) is the result of dividing ?NUMBER1 by ?NUMBER2. An exception occurs when ?NUMBER1 = 1, in which case (&%DivisionFn ?NUMBER1 ?NUMBER2) is the reciprocal of ?NUMBER2.")
(type INSTANCE)
;+ (allowed-classes Quantity)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot AdditionFn
;+ (comment "If ?NUMBER1 and ?NUMBER2 are &%Numbers, then (&%AdditionFn ?NUMBER1 ?NUMBER2) is the arithmetical sum of these numbers.")
(type INSTANCE)
;+ (allowed-classes Quantity)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot MaxFn
;+ (comment "(&%MaxFn ?NUMBER1 ?NUMBER2) is the largest of ?NUMBER1 and ?NUMBER2. In cases where ?NUMBER1 is equal to ?NUMBER2, &%MaxFn returns one of its arguments.")
(type INSTANCE)
;+ (allowed-classes Quantity)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot SubtractionFn
;+ (comment "If ?NUMBER1 and ?NUMBER2 are &%Numbers, then (&%SubtractionFn ?NUMBER1 ?NUMBER2) is the arithmetical difference between ?NUMBER1 and ?NUMBER2, i.e. ?NUMBER1 minus ?NUMBER2. An exception occurs when ?NUMBER1 is equal to 0, in which case (&%SubtractionFn ?NUMBER1 ?NUMBER2) is the negation of ?NUMBER2.")
(type INSTANCE)
;+ (allowed-classes Quantity)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot ExponentiationFn
;+ (comment "(&%ExponentiationFn ?NUMBER ?INT) returns the &%RealNumber ?NUMBER raised to the power of the &%Integer ?INT.")
(type INSTANCE)
;+ (allowed-classes Integer)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot RoundFn
;+ (comment "(&%RoundFn ?NUMBER) is the &%Integer closest to ?NUMBER on the number line. If ?NUMBER is halfway between two &%Integers (for example 3.5), it denotes the larger &%Integer.")
(type INSTANCE)
;+ (allowed-classes Quantity)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot ReciprocalFn
;+ (comment "(ReciprocalFn ?NUMBER) is the reciprocal element of ?NUMBER with respect to the multiplication operator (&%MultiplicationFn), i.e. 1/?NUMBER. Not all numbers have a reciprocal element. For example the number 0 does not. If a number ?NUMBER has a reciprocal ?RECIP, then the product of ?NUMBER and ?RECIP will be 1, e.g. 3*1/3 = 1. The reciprocal of an element is &%equal to applying the &%ExponentiationFn function to the element to the power -1.")
(type INSTANCE)
;+ (allowed-classes Quantity)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot greaterThan
;+ (comment "(&%greaterThan ?NUMBER1 ?NUMBER2) is true just in case the &%Quantity ?NUMBER1 is greater than the &%Quantity ?NUMBER2.")
(type INSTANCE)
;+ (allowed-classes Quantity)
;+ (cardinality 0 1)
(create-accessor read-write)))
(defclass PhysicalQuantity "SUO 1.55: July 14, 2003\n&%A PhysicalQuantity is a measure of\nsome quantifiable aspect of the modeled world, such as 'the earth's\ndiameter' (a constant length) and 'the stress in a loaded deformable\nsolid' (a measure of stress, which is a function of three spatial\ncoordinates). All &%PhysicalQuantities are either &%ConstantQuantities\nor &%FunctionQuantities. Instances of &%ConstantQuantity are dependent\non a &%UnitOfMeasure, while instances of &%FunctionQuantity are\n&%Functions that map instances of &%ConstantQuantity to other instances\nof &%ConstantQuantity (e.g., &%TimeDependentQuantities are\n&%FunctionQuantities). Although the name and definition of\n&%PhysicalQuantity is borrowed from physics, &%PhysicalQuantities need\nnot be material. Aside from the dimensions of length, time, velocity,\netc., nonphysical dimensions such as currency are also possible.\nAccordingly, amounts of money would be instances of &%PhysicalQuantity.\n&%PhysicalQuantities are distinguished from &%Numbers by the fact that\nthe former are associated with a dimension of measurement."
(is-a Quantity)
(role concrete))
(defclass ConstantQuantity "SUO 1.55: July 14, 2003\nA &%ConstantQuantity is a \n&%PhysicalQuantity which has a constant value, e.g. 3 meters and 5 hours. \nThe magnitude (see &%MagnitudeFn) of every &%ConstantQuantity is a \n&%RealNumber. &%ConstantQuantities are distinguished from \n&%FunctionQuantities, which map &%ConstantQuantities to other \n&%ConstantQuantities. All &%ConstantQuantites are expressed with the \n&%BinaryFunction &%MeasureFn, which takes a &%Number and a &%UnitOfMeasure \nas arguments. For example, 3 &%Meters can be expressed as (&%MeasureFn 3 \n&%Meter). &%ConstantQuantities form a partial order (see \n&%PartialOrderingRelation) with the &%lessThan relation, since &%lessThan \nis a &%RelationExtendedToQuantities and &%lessThan is defined over the \n&%RealNumbers. The &%lessThan relation is not a total order (see \n&%TotalOrderingRelation) over the class &%ConstantQuantity since elements \nof some subclasses of &%ConstantQuantity (such as length quantities) \nare incomparable to elements of other subclasses of &%ConstantQuantity \n(such as mass quantities)."
(is-a PhysicalQuantity)
(role concrete)
(single-slot MagnitudeFn
;+ (comment "The magnitude of a &%ConstantQuantity is the numeric value for the quantity. In other words, &%MagnitudeFn converts a &%ConstantQuantity with an associated &%UnitOfMeasure into an ordinary &%RealNumber. For example, the magnitude of the &%ConstantQuantity 2 &%Kilometers is the &%RealNumber 2. Note that the magnitude of a quantity in a given unit times that unit is equal to the original quantity.")
(type INSTANCE)
;+ (allowed-classes RealNumber)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot PerFn
;+ (comment "&%PerFn maps two instances of &%ConstantQuantity to the &%FunctionQuantity composed of these two instances. For example, (&%PerFn (&%MeasureFn 2 (&%MicroFn &%Gram)) (&%MeasureFn 1 (&%KiloFn &%Gram))) denotes the &%FunctionQuantity of 2 micrograms per kiogram. This function is useful, because it allows the knowledge engineer to dynamically generate instances of &%FunctionQuantity.")
(type INSTANCE)
;+ (allowed-classes ConstantQuantity)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot IntervalFn
;+ (comment "A &%BinaryFunction that maps two &%ConstantQuantities to the &%Class of &%ConstantQuantities that comprise the interval from the first &%ConstantQuantity to the second &%ConstantQuantity. For example, (&%IntervalFn (&%MeasureFn 8 &%Meter) (&%MeasureFn 14 &%Meter)) would return the &%Class of &%ConstantQuantities between 8 and 14 meters in length.")
(type INSTANCE)
;+ (allowed-classes ConstantQuantity)
;+ (cardinality 0 1)
(create-accessor read-write)))
(defclass TimeMeasure "SUO 1.55: July 14, 2003\nThe class of temporal durations (instances\nof &%TimeDuration) and positions of &%TimePoints and &%TimeIntervals along\nthe universal timeline (instances of &%TimePosition)."
(is-a ConstantQuantity)
(role concrete))
(defclass TimeDuration "SUO 1.55: July 14, 2003\nAny measure of length of time,\nwith or without respect to the universal timeline."
(is-a TimeMeasure)
(role concrete))
(defclass SecondDuration "SUO 1.55: July 14, 2003\nSI &%TimeDuration. Symbol: s.\nIt is one of the base units in SI, and it is currently defined as\nfollows: the &%SecondDuration is the duration of 9192631770 periods of\nthe radiation corresponding to the transition between the two hyperfine\nlevels of the ground state of the cesium 133 atom."
(is-a TimeDuration)
(role concrete))
(defclass DayDuration "SUO 1.55: July 14, 2003\nTime unit. 1 day = 24 hours."
(is-a TimeDuration)
(role concrete))
(defclass HourDuration "SUO 1.55: July 14, 2003\nTime unit. 1 hour = 60 minutes."
(is-a TimeDuration)
(role concrete))
(defclass MinuteDuration "SUO 1.55: July 14, 2003\nTime unit. 1 minute = 60 seconds. "
(is-a TimeDuration)
(role concrete))
(defclass WeekDuration "SUO 1.55: July 14, 2003\nTime unit. A week's duration is seven days."
(is-a TimeDuration)
(role concrete))
(defclass YearDuration "SUO 1.55: July 14, 2003\nTime unit. one calendar year. 1 year =\n365 days = 31536000 seconds."
(is-a TimeDuration)
(role concrete))
(defclass TimePosition "SUO 1.55: July 14, 2003\nAny &%TimePoint or &%TimeInterval \nalong the universal timeline from &%NegativeInfinity to \n&%PositiveInfinity."
(is-a TimeMeasure)
(role concrete)
(single-slot ImmediateFutureFn
;+ (comment "A &%UnaryFunction that maps a &%TimePosition to a short, indeterminate &%TimeInterval that immediately follows the &%TimePosition.")
(type INSTANCE)
;+ (allowed-classes TimeInterval)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot FutureFn
;+ (comment "A &%UnaryFunction that maps a &%TimePosition to the &%TimeInterval which it meets and which ends at &%PositiveInfinity.")
(type INSTANCE)
;+ (allowed-classes TimeInterval)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot PastFn
;+ (comment "A &%UnaryFunction that maps a &%TimePosition to the &%TimeInterval that meets it and that begins at &%NegativeInfinity.")
(type INSTANCE)
;+ (allowed-classes TimeInterval)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot RelativeTimeFn
;+ (comment "A means of converting &%TimePositions between different &%TimeZones. (&%RelativeTimeFn ?TIME ?ZONE) denotes the &%TimePosition in &%CoordinatedUniversalTime that is contemporaneous with the &%TimePosition ?TIME in &%TimeZone ?ZONE. For example, (&%RelativeTimeFn (&%MeasureFn 14 &%Hour) &%EasternTimeZone) would return the value (&%MeasureFn 19 &%Hour).")
(type INSTANCE)
;+ (allowed-classes TimeZone)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot holdsDuring
;+ (comment "(&%holdsDuring ?TIME ?FORMULA) means that the proposition denoted by ?FORMULA is true in the time frame ?TIME. Note that this implies that ?FORMULA is true at every &%TimePoint which is a &%temporalPart of ?TIME.")
(type INSTANCE)
;+ (allowed-classes Formula)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot ImmediatePastFn
;+ (comment "A &%UnaryFunction that maps a &%TimePosition to a short, indeterminate &%TimeInterval that immediately precedes the &%TimePosition.")
(type INSTANCE)
;+ (allowed-classes TimeInterval)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot temporalPart
;+ (comment "The temporal analogue of the spatial &%part predicate. (&%temporalPart ?POS1 ?POS2) means that &%TimePosition ?POS1 is part of &%TimePosition ?POS2. Note that since &%temporalPart is a &%ReflexiveRelation every &%TimePostion is a &%temporalPart of itself.")
(type INSTANCE)
;+ (allowed-classes TimePosition)
;+ (cardinality 0 1)
(create-accessor read-write)))
(defclass TimeInterval "SUO 1.55: July 14, 2003\nAn interval of time. Note that a \n&%TimeInterval has both an extent and a location on the universal timeline. Note too that a &%TimeInterval has no gaps, i.e. this class contains only convex time intervals."
(is-a TimePosition)
(role concrete)
(single-slot overlapsTemporally
;+ (comment "(&%overlapsTemporally ?INTERVAL1 ?INTERVAL2) means that the &%TimeIntervals ?INTERVAL1 and ?INTERVAL2 have a &%TimeInterval as a common part.")
(type INSTANCE)
;+ (allowed-classes TimeInterval)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot TemporalCompositionFn
;+ (comment "The basic &%Function for expressing the composition of larger &%TimeIntervals out of smaller &%TimeIntervals. For example, if &%ThisSeptember is an &%instance of &%September, (&%TemporalCompositionFn &%ThisSeptember &%Day) denotes the &%Class of consecutive days that make up &%ThisSeptember. Note that one can obtain the number of instances of this &%Class by using the function &%CardinalityFn.")
(type SYMBOL)
;+ (allowed-parents TimeInterval)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot duration
;+ (comment "(&%duration ?POS ?TIME) means that the duration of the &%TimePosition ?POS is ?TIME. Note that this &%Predicate can be used in conjunction with the &%Function &%WhenFn to specify the duration of any instance of &%Physical.")
(type INSTANCE)
;+ (allowed-classes TimeDuration)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot recurrentTimeIntervalFn
;+ (comment "A function that is useful for generating recurring timeintervals.\nFor example, (&%recurrentTimeIntervalFn (&%hourFn 6 &%Day) (&%hourFn 12 &%Day) ) returns the class of TimeIntervals beginning at 6 in the morning and endingat 12 noon. For example, (&%recurrentTimeIntervalFn (&%Saturday) (&%Sunday) ) returns the class of all weekends.")
(type SYMBOL)
;+ (allowed-parents TimeInterval)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot BeginFn
;+ (comment "A &%UnaryFunction that maps a &%TimeInterval to the &%TimePoint at which the interval begins.")
(type INSTANCE)
;+ (allowed-classes TimePoint)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot finishes
;+ (comment "(&%finishes ?INTERVAL1 ?INTERVAL2) means that ?INTERVAL1 and ?INTERVAL2 are both &%TimeIntervals that have the same ending &%TimePoint and that ?INTERVAL2 begins before ?INTERVAL1.")
(type INSTANCE)
;+ (allowed-classes TimeInterval)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot meetsTemporally
;+ (comment "(&%meetsTemporally ?INTERVAL1 ?INTERVAL2) means that the terminal point of the &%TimeInterval ?INTERVAL1 is the initial point of the &%TimeInterval ?INTERVAL2.")
(type INSTANCE)
;+ (allowed-classes TimeInterval)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot starts
;+ (comment "(&%starts ?INTERVAL1 ?INTERVAL2) means that ?INTERVAL1 and ?INTERVAL2 are both &%TimeIntervals that have the same initial &%TimePoint and that ?INTERVAL1 ends before ?INTERVAL2.")
(type INSTANCE)
;+ (allowed-classes TimeInterval)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot during
;+ (comment "(&%during ?INTERVAL1 ?INTERVAL2) means that ?INTERVAL1 starts after and ends before ?INTERVAL2.\n")
(type INSTANCE)
;+ (allowed-classes TimeInterval)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot EndFn
;+ (comment "A &%UnaryFunction that maps a &%TimeInterval to the &%TimePoint at which the interval ends.")
(type INSTANCE)
;+ (allowed-classes TimePoint)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot earlier
;+ (comment "(earlier INTERVAL1 INTERVAL2) means that INTERVAL1 ends before INTERVAL2 begins.")
(type INSTANCE)
;+ (allowed-classes TimeInterval)
;+ (cardinality 0 1)
(create-accessor read-write)))
(defclass Year "SUO 1.55: July 14, 2003\nThe &%Class of all calendar &%Years."
(is-a TimeInterval)
(role concrete))
(defclass LeapYear "SUO 1.55: July 14, 2003\nThe &%Class of all leap years. These are years\nwhich are either (i.) evenly divisible by 4 and not by 100 or (ii.) evenly\ndivisible by 400 (this latter case is known as a leap century)."
(is-a Year)
(role concrete))
(defclass Month "SUO 1.55: July 14, 2003\nThe &%Class of all calendar &%Months."
(is-a TimeInterval)
(role concrete)
(single-slot MonthFn
;+ (comment "A &%BinaryFunction that maps a subclass of &%Month and a subclass of &%Year to the class containing the &%Months corresponding to thos &%Years. For example (&%MonthFn &%January (&%YearFn 1912)) is the class containing the eighth\n&%Month, i.e. August, of the &%Year 1912. For another example, (&%MonthFn &%August &%Year) is equal to &%August, the class of all months of August. Note that this function returns a &%Class as a value. The reason for this is that the related functions, viz. DayFn, HourFn, MinuteFn, and SecondFn, are used to generate both specific &%TimeIntervals and recurrent intervals, and the only way to do this is to make the domains and ranges of these functions classes rather than individuals.\n")
(type SYMBOL)
;+ (allowed-parents Month)
;+ (cardinality 0 1)
(create-accessor read-write)))
(defclass January "SUO 1.55: July 14, 2003\nThe &%Class of all &%Months which are January."
(is-a Month)
(role concrete))
(defclass February "SUO 1.55: July 14, 2003\nThe &%Class of all &%Months which are February."
(is-a Month)
(role concrete))
(defclass March "SUO 1.55: July 14, 2003\nThe &%Class of all &%Months which are March."
(is-a Month)
(role concrete))
(defclass April "SUO 1.55: July 14, 2003\nThe &%Class of all &%Months which are April."
(is-a Month)
(role concrete))
(defclass May "SUO 1.55: July 14, 2003\nThe &%Class of all &%Months which are May."
(is-a Month)
(role concrete))
(defclass June "SUO 1.55: July 14, 2003\nThe &%Class of all &%Months which are June."
(is-a Month)
(role concrete))
(defclass July "SUO 1.55: July 14, 2003\nThe &%Class of all &%Months which are July."
(is-a Month)
(role concrete))
(defclass August "SUO 1.55: July 14, 2003\nThe &%Class of all &%Months which are August."
(is-a Month)
(role concrete))
(defclass September "SUO 1.55: July 14, 2003\nThe &%Class of all &%Months which are September."
(is-a Month)
(role concrete))
(defclass October "SUO 1.55: July 14, 2003\nThe &%Class of all &%Months which are October."
(is-a Month)
(role concrete))
(defclass November "SUO 1.55: July 14, 2003\nThe &%Class of all &%Months which are November."
(is-a Month)
(role concrete))
(defclass December "SUO 1.55: July 14, 2003\nThe &%Class of all &%Months which are December."
(is-a Month)
(role concrete))
(defclass Day "SUO 1.55: July 14, 2003\nThe &%Class of all calendar &%Days."
(is-a TimeInterval)
(role concrete))
(defclass Monday "SUO 1.55: July 14, 2003\nThe &%Class of all calendar Mondays."
(is-a Day)
(role concrete))
(defclass Tuesday "SUO 1.55: July 14, 2003\nThe &%Class of all calendar Tuesdays."
(is-a Day)
(role concrete))
(defclass Wednesday "SUO 1.55: July 14, 2003\nThe &%Class of all calendar Wednesdays."
(is-a Day)
(role concrete))
(defclass Thursday "SUO 1.55: July 14, 2003\nThe &%Class of all calendar Thursdays."
(is-a Day)
(role concrete))
(defclass Friday "SUO 1.55: July 14, 2003\nThe &%Class of all calendar Fridays."
(is-a Day)
(role concrete))
(defclass Saturday "SUO 1.55: July 14, 2003\nThe &%Class of all calendar Saturdays."
(is-a Day)
(role concrete))
(defclass Sunday "SUO 1.55: July 14, 2003\nThe &%Class of all calendar Sundays."
(is-a Day)
(role concrete))
(defclass Week "SUO 1.55: July 14, 2003\nThe &%Class of all calendar weeks."
(is-a TimeInterval)
(role concrete))
(defclass Hour "SUO 1.55: July 14, 2003\nThe &%Class of all clock &%Hours."
(is-a TimeInterval)
(role concrete))
(defclass Minute "SUO 1.55: July 14, 2003\nThe &%Class of all clock &%Minutes."
(is-a TimeInterval)
(role concrete))
(defclass Second "SUO 1.55: July 14, 2003\nThe &%Class of all clock &%Seconds."
(is-a TimeInterval)
(role concrete))
(defclass TimePoint "SUO 1.55: July 14, 2003\nAn extensionless point on the universal timeline. \nThe &%TimePoints at which &%Processes occur can be known with various \ndegrees of precision and approximation, but conceptually &%TimePoints are \npoint-like and not interval-like. That is, it doesn't make sense to talk \nabout how long a &%TimePoint lasts."
(is-a TimePosition)
(role concrete)
(single-slot temporallyBetweenOrEqual
;+ (comment "(&%temporallyBetweenOrEqual ?POINT1 ?POINT2 ?POINT3) means that the &%TimePoint ?POINT1 is before or equal to the &%TimePoint ?POINT2 and ?POINT2 is before or equal to the &%TimePoint ?POINT3.")
(type INSTANCE)
;+ (allowed-classes TimePoint)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot TimeIntervalFn
;+ (comment "A &%BinaryFunction that takes two &%TimePoints as arguments and returns the &%TimeInterval defined by these two &%TimePoints. Note that the first &%TimePoint must occur earlier than the second &%TimePoint.")
(type INSTANCE)
;+ (allowed-classes TimePoint)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot temporallyBetween
;+ (comment "(&%temporallyBetween ?POINT1 ?POINT2 ?POINT3) means that the &%TimePoint ?POINT2 is between the &%TimePoints ?POINT1 and ?POINT3, i.e. ?POINT1 is before ?POINT2 and ?POINT2 is before ?POINT3.")
(type INSTANCE)
;+ (allowed-classes TimePoint)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot before
;+ (comment "(&%before ?POINT1 ?POINT2) means that ?POINT1 precedes ?POINT2 on the universal timeline.")
(type INSTANCE)
;+ (allowed-classes TimePoint)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot beforeOrEqual
;+ (comment "(&%beforeOrEqual ?POINT1 ?POINT2) means that ?POINT1 is identical with ?POINT2 or occurs before it on the universal timeline.")
(type INSTANCE)
;+ (allowed-classes TimePoint)
;+ (cardinality 0 1)
(create-accessor read-write)))
(defclass RelativeTimeFn%28TimePosition%2CTimeZone%29
(is-a TimePosition)
(role concrete))
(defclass LengthMeasure "SUO 1.55: July 14, 2003\nThe &%Class of &%ConstantQuantities relating \nto length."
(is-a ConstantQuantity)
(role concrete)
(single-slot VelocityFn
;+ (comment "Specifies the velocity of an object, i.e. the speed and the direction of the speed. For example (&%VelocityFn (&%MeasureFn 55 &%Mile) (&%MeasureFn 2 &%HourDuration) ?REFERENCE &%North) denotes the velocity of 55 miles per hour North of the given reference point ?REFERENCE.")
(type INSTANCE)
;+ (allowed-classes TimeDuration)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot SpeedFn
(type INSTANCE)
;+ (allowed-classes TimeDuration)
;+ (cardinality 0 1)
(create-accessor read-write)))
(defclass Meter "SUO 1.55: July 14, 2003\nSI &%LengthMeasure. Symbol: m. It is one of the\nbase units in SI, and it is currently defined as follows: the &%Meter\nis the length of the path traveled by light in a vacuum during a time\ninterval of 1/299792458 of a &%SecondDuration."
(is-a LengthMeasure)
(role concrete))
(defclass Centimeter "SUO 1.55: July 14, 2003\nSubmultiple of &%Meter. Symbol: cm. It is\nthe 100th part of a &%Meter"
(is-a LengthMeasure)
(role concrete))
(defclass Angstrom "SUO 1.55: July 14, 2003\nThe &%Angstrom is a &%LengthMeasure.\n1 &%Angstrom = 10^(-10) m"
(is-a LengthMeasure)
(role concrete))
(defclass FootLength "SUO 1.55: July 14, 2003\nEnglish length unit of feet."
(is-a LengthMeasure)
(role concrete))
(defclass Inch "SUO 1.55: July 14, 2003\nEnglish length unit of inches."
(is-a LengthMeasure)
(role concrete))
(defclass Mile "SUO 1.55: July 14, 2003\nEnglish length unit of miles."
(is-a LengthMeasure)
(role concrete))
(defclass Foot "SUO 1.15: September 6, 2001\nEnglish length unit of feet."
(is-a LengthMeasure)
(role concrete))
(defclass MassMeasure "SUO 1.55: July 14, 2003\nThe &%Class of &%ConstantQuantities relating \nto the amount of matter in an &%Object."
(is-a ConstantQuantity)
(role concrete)
(single-slot DensityFn
;+ (comment "&%DensityFn maps an instance of &%MassMeasure and an instance of &%VolumeMeasure to the density represented by this proportion of mass and volume. For example, (&%DensityFn (&%MeasureFn 3 &%Gram) (&%MeasureFn 1 &%Liter)) represents the density of 3 grams per liter.\n")
(type INSTANCE)
;+ (allowed-classes VolumeMeasure)
;+ (cardinality 0 1)
(create-accessor read-write)))
(defclass Gram "SUO 1.55: July 14, 2003\nSubmultiple of kilogram. Symbol: g.\n1 kilogram = 1000 &%Grams."
(is-a MassMeasure)
(role concrete))
(defclass Mole "SUO 1.55: July 14, 2003\nSI amount of substance unit. symbol: mol. It is one\nof the base units in SI. It is defined as follows: the &%Mole is the\namount of substance of a system which contains as many elementary entities\nas there are atoms in 0.012 &%Kilograms of carbon 12. Note that, when this\n&%UnitOfMeasure is used, the elementary entities must be specified - they\nmay be atoms, molecules, ions, electrons, etc. or groups of such\nparticles."
(is-a MassMeasure)
(role concrete))
(defclass Amu "SUO 1.55: July 14, 2003\nAtomic mass unit. Symbol: u. It is the mass of\nthe twelfth part of an atom of the Carbon 12 isotope."
(is-a MassMeasure)
(role concrete))
(defclass AtomGram "SUO 1.55: July 14, 2003\n&%MassMeasure that is also known as the gram-atom.\nDefined as the mass in grams of 1 &%Mole of pure substance. For example,\n1 &%AtomGram of Carbon 12 will be 12 &%Grams of pure Carbon 12. 2 &%AtomGrams\nof the same substance will be 24 &%Grams of it. This is an unusual unit in\nthat it is essentially 1 &%Mole of 'stuff' measured in grams, so that the\nactual value (i.e. mass) depends on the type of substance."
(is-a MassMeasure)
(role concrete))
(defclass PoundMass "SUO 1.55: July 14, 2003\nEnglish mass unit of pounds."
(is-a MassMeasure)
(role concrete))
(defclass Slug "SUO 1.55: July 14, 2003\nEnglish mass unit of slugs."
(is-a MassMeasure)
(role concrete))
(defclass AreaMeasure "SUO 1.55: July 14, 2003\nMeasures of the amount of space in two dimensions."
(is-a ConstantQuantity)
(role concrete))
(defclass VolumeMeasure "SUO 1.55: July 14, 2003\nMeasures of the amount of space in three\ndimensions."
(is-a ConstantQuantity)
(role concrete))
(defclass Liter "SUO 1.55: July 14, 2003\nUnit of volume in the metric system. It is currently\ndefined to be equal to one cubic decimeter (0.001 cubic meter). Symbol: l."
(is-a VolumeMeasure)
(role concrete))
(defclass UnitedStatesGallon "SUO 1.55: July 14, 2003\nUnit of volume commonly used in the\nUnited States."
(is-a VolumeMeasure)
(role concrete))
(defclass Quart "SUO 1.55: July 14, 2003\nEnglish unit of volume equal to 1/4 of a\n&%UnitedStatesGallon."
(is-a VolumeMeasure)
(role concrete))
(defclass Pint "SUO 1.55: July 14, 2003\nEnglish unit of volume equal to 1/2 of a\n&%Quart."
(is-a VolumeMeasure)
(role concrete))
(defclass Cup "SUO 1.55: July 14, 2003\nEnglish unit of volume equal to 1/2 of a\n&%Pint."
(is-a VolumeMeasure)
(role concrete))
(defclass Ounce "SUO 1.55: July 14, 2003\nEnglish unit of volume equal to 1/8 of a\n&%Cup."
(is-a VolumeMeasure)
(role concrete))
(defclass UnitedKingdomGallon "SUO 1.55: July 14, 2003\nUnit of volume commonly used in the\nUnited Kingdom."
(is-a VolumeMeasure)
(role concrete))
(defclass TemperatureMeasure "SUO 1.55: July 14, 2003\nMeasures of temperature.\nIn scientific circles, the temperature of something is understood as the\naverage velocity of the atoms or molecules that make up the thing."
(is-a ConstantQuantity)
(role concrete))
(defclass KelvinDegree "SUO 1.55: July 14, 2003\nSI &%TemperatureMeasure. Symbol: K.\nIt is one of the base units in SI (it is also a unit in the ITS system).\nKelvin differs from the Celsius scale in that the triple point of water\nis defined to be 273.16 &%KelvinDegrees while it is 0 &%CelsiusDegrees.\nThe magnitudes of intervals in the two scales are the same. By definition\nthe conversion constant is 273.15."
(is-a TemperatureMeasure)
(role concrete))
(defclass CelsiusDegree "SUO 1.55: July 14, 2003\nA &%TemperatureMeasure. The freezing point\nand the boiling point of water are, respectively, 0 &%CelsiusDegrees and 100\n&%CelsiusDegrees."
(is-a TemperatureMeasure)
(role concrete))
(defclass RankineDegree "SUO 1.55: July 14, 2003\nA &%TemperatureMeasure. Note\nthat 0 &%RankineDegrees is the same as the absolute zero (i.e. 0\n&%KelvinDegrees)."
(is-a TemperatureMeasure)
(role concrete))
(defclass FahrenheitDegree "SUO 1.55: July 14, 2003\nA &%TemperatureMeasure that is commonly\nused in the United States. On the Fahrenheit scale, the freezing point\nof water is 32 &%FahrenheitDegrees, and the boiling point of water is\n212 &%FahrenheitDegrees."
(is-a TemperatureMeasure)
(role concrete))
(defclass CurrencyMeasure "SUO 1.55: July 14, 2003\nIncludes all standard measures of monetary\nvalue, including &%UnitedStatesDollar, &%UnitedStatesCent, Lire, Yen, etc."
(is-a ConstantQuantity)
(role concrete))
(defclass UnitedStatesDollar "SUO 1.55: July 14, 2003\nA currency measure."
(is-a CurrencyMeasure)
(role concrete))
(defclass UnitedStatesCent "SUO 1.55: July 14, 2003\nA currency measure. 1 &%UnitedStatesCent is\nequal to .01 &%UnitedStatesDollars."
(is-a CurrencyMeasure)
(role concrete))
(defclass EuroDollar "SUO 1.55: July 14, 2003\nA currency measure of most European Union countries.\nIt is based on the &%UnitedStatesDollar."
(is-a CurrencyMeasure)
(role concrete))
(defclass EuroCent "SUO 1.55: July 14, 2003\nA currency measure. 1 &%EuroCent is equal to .01\n&%EuroDollars."
(is-a CurrencyMeasure)
(role concrete))
(defclass AngleMeasure "SUO 1.55: July 14, 2003\nThe value of an angle in a plane or in a\nsolid."
(is-a ConstantQuantity)
(role concrete))
(defclass PlaneAngleMeasure "SUO 1.55: July 14, 2003\nThe value of an angle in a plane."
(is-a AngleMeasure)
(role concrete)
(single-slot TangentFn
;+ (comment "(&%TangentFn ?DEGREE) is the tangent of the &%PlaneAngleMeasure ?DEGREE. The tangent of ?DEGREE is the ratio of the side opposite ?DEGREE to the side next to ?DEGREE in a right-angled triangle.")
(type INSTANCE)
;+ (allowed-classes RealNumber)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot CosineFn
;+ (comment "(&%CosineFn ?DEGREE) returns the cosine of the &%PlaneAngleMeasure ?DEGREE. The cosine of ?DEGREE is the ratio of the side next to ?DEGREE to the hypotenuse in a right-angled triangle.")
(type INSTANCE)
;+ (allowed-classes RealNumber)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot SineFn
;+ (comment "(&%SineFn ?DEGREE) is the sine of the &%PlaneAngleMeasure ?DEGREE. The sine of ?DEGREE is the ratio of the side opposite ?DEGREE to the hypotenuse in a right-angled triangle.")
(type INSTANCE)
;+ (allowed-classes RealNumber)
;+ (cardinality 0 1)
(create-accessor read-write)))
(defclass Radian "SUO 1.55: July 14, 2003\nSI plane angle measure. Symbol: rad. It is the\nangle of a circle subtended by an arc equal in length to the circle's\nradius. Another definition is: the plane angle between two radii of a\ncircle which cut off on the circumference an arc equal in length to the\nradius. &%Radian = m/m = 1."
(is-a PlaneAngleMeasure)
(role concrete))
(defclass AngularDegree "SUO 1.55: July 14, 2003\nA plane angle measure."
(is-a PlaneAngleMeasure)
(role concrete))
(defclass SolidAngleMeasure "SUO 1.55: July 14, 2003\nThe value of an angle in a solid."
(is-a AngleMeasure)
(role concrete))
(defclass Steradian "SUO 1.55: July 14, 2003\nSI solid angle measure. Symbol: sr. It is\nthe solid angle of a sphere subtended by a portion of the surface whose\narea is equal to the square of the sphere's radius. Another definition\nis: the solid angle which, having its vertex in the center of the sphere,\ncuts off an area of the surface of the sphere equal to that of a square\nwith sides of length equal to the radius of the sphere. &%Steradian =\nm^2/m^2 = 1."
(is-a SolidAngleMeasure)
(role concrete))
(defclass InformationMeasure "SUO 1.55: July 14, 2003\nMeasures of the amount of information.\nIncludes &%Bit, &%Byte, and multiples of these, e.g. &%KiloByte and\n&%MegaByte."
(is-a ConstantQuantity)
(role concrete))
(defclass Bit "SUO 1.55: July 14, 2003\nOne &%Bit of information. A one or a zero."
(is-a InformationMeasure)
(role concrete))
(defclass Byte "SUO 1.55: July 14, 2003\nOne &%Byte of information. A &%Byte is eight\n&%Bits."
(is-a InformationMeasure)
(role concrete))
(defclass KiloByte "SUO 1.55: July 14, 2003\nOne &%KiloByte (KB) of information. One\n&%KiloByte is 1024 &%Bytes. Note that this sense of 'kilo' is\ndifferent from the one accepted in the SI system."
(is-a InformationMeasure)
(role concrete))
(defclass MegaByte "SUO 1.55: July 14, 2003\nOne &%MegaByte (MB) of information. One\n&%MegaByte is 1024 &%KiloBytes. Note that this sense of 'mega' is\ndifferent from the one accepted in the SI system."
(is-a InformationMeasure)
(role concrete))
(defclass UnitOfMeasure "SUO 1.55: July 14, 2003\nA standard of measurement for some dimension. \nFor example, the &%Meter is a &%UnitOfMeasure for the dimension of length, \nas is the &%Inch. There is no intrinsic property of a &%UnitOfMeasure that \nmakes it primitive or fundamental; rather, a system of units (e.g. \n&%SystemeInternationalUnit) defines a set of orthogonal dimensions and \nassigns units for each."
(is-a PhysicalQuantity)
(role concrete)
(single-slot MilliFn
;+ (comment "A &%UnaryFunction that maps a &%UnitOfMeasure into a &%UnitOfMeasure that is equal to .001 units of the original &%UnitOfMeasure. For example, (&%MilliFn &%Ampere) is .001 &%Amperes.")
(type INSTANCE)
;+ (allowed-classes UnitOfMeasure)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot TeraFn
;+ (comment "A &%UnaryFunction that maps a &%UnitOfMeasure into a &%UnitOfMeasure that is equal to 1,000,000,000,000 units of the original &%UnitOfMeasure. For example, (&%TeraFn &%Hertz) is 1,000,000,000,000 &%Hertz.")
(type INSTANCE)
;+ (allowed-classes UnitOfMeasure)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot NanoFn
;+ (comment "A &%UnaryFunction that maps a &%UnitOfMeasure into a &%UnitOfMeasure that is equal to .000000001 units of the original &%UnitOfMeasure. For example, (&%MicroFn &%SecondDuration) is .000000001 &%SecondDurations.")
(type INSTANCE)
;+ (allowed-classes UnitOfMeasure)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot KiloFn
;+ (comment "A &%UnaryFunction that maps a &%UnitOfMeasure into a &%UnitOfMeasure that is equal to 1,000 units of the original &%UnitOfMeasure. For example, (&%KiloFn &%Gram) is 1,000 &%Grams.")
(type INSTANCE)
;+ (allowed-classes UnitOfMeasure)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot MicroFn
;+ (comment "A &%UnaryFunction that maps a &%UnitOfMeasure into a &%UnitOfMeasure that is equal to .000001 units of the original &%UnitOfMeasure. For example, (&%MicroFn &%Meter) is .000001 &%Meters.")
(type INSTANCE)
;+ (allowed-classes UnitOfMeasure)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot MegaFn
;+ (comment "A &%UnaryFunction that maps a &%UnitOfMeasure into a &%UnitOfMeasure that is equal to 1,000,000 units of the original &%UnitOfMeasure. For example, (&%KiloFn &%Hertz) is 1,000,000 &%Hertz.")
(type INSTANCE)
;+ (allowed-classes UnitOfMeasure)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot GigaFn
;+ (comment "A &%UnaryFunction that maps a &%UnitOfMeasure into a &%UnitOfMeasure that is equal to 1,000,000,000 units of the original &%UnitOfMeasure. For example, (&%GigaFn &%Hertz) is 1,000,000,000 &%Hertz.")
(type INSTANCE)
;+ (allowed-classes UnitOfMeasure)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot PicoFn
;+ (comment "A &%UnaryFunction that maps a &%UnitOfMeasure into a &%UnitOfMeasure that is equal to .000000000001 units of the original &%UnitOfMeasure. For example, (&%PicoFn &%Ampere) is .000000000001 &%Amperes.")
(type INSTANCE)
;+ (allowed-classes UnitOfMeasure)
;+ (cardinality 0 1)
(create-accessor read-write)))
(defclass SystemeInternationalUnit "SUO 1.55: July 14, 2003\nThe &%Class of Systeme\nInternational (SI) units."
(is-a UnitOfMeasure)
(role concrete))
(defclass VariableQuantity "Introduce for UBL ontology:\nVariableQuantity is a composite form of ConstantQuantity which in effect refies the MeasureFn. It is composed of a quantifier and a unit of measure."
(is-a PhysicalQuantity)
(role concrete)
(single-slot hasUnit
;+ (comment "hasUnit points to the unit of measure in a reified PhysicalQuantity.")
(type SYMBOL)
;+ (allowed-parents ConstantQuantity FunctionQuantity)
;+ (cardinality 1 1)
(create-accessor read-write))
(single-slot hasQuantifier
;+ (comment "hasQuantifier points to the Quantifier portion of a reified PhysicalQuantity.")
(type INSTANCE)
;+ (allowed-classes Quantifier)
;+ (cardinality 1 1)
(create-accessor read-write)))
(defclass CurrencyQuantity "A sum of money in some currency."
(is-a VariableQuantity)
(role concrete)
(single-slot hasUnit
;+ (comment "hasUnit points to the unit of measure in a reified PhysicalQuantity.\n")
(type SYMBOL)
;+ (allowed-parents CurrencyMeasure)
;+ (cardinality 1 1)
(create-accessor read-write))
(single-slot hasQuantifier
;+ (comment "hasQuantifier points to the Quantifier portion of a reified PhysicalQuantity.")
(type INSTANCE)
;+ (allowed-classes DecimalNumber)
;+ (cardinality 1 1)
(create-accessor read-write)))
(defclass VolumeQuantity "A VolumeQuantity is a PhysicalQuantity specifying some volume of real space -- cubic meters, cubic inches, etc."
(is-a VariableQuantity)
(role concrete)
(single-slot hasUnit
;+ (comment "hasUnit points to the unit of measure in a reified PhysicalQuantity.")
(type SYMBOL)
;+ (allowed-parents VolumeMeasure)
;+ (cardinality 1 1)
(create-accessor read-write)))
(defclass MassQuantity "WeightQuantity is a PhysicalQuantity specifying some mass of a physical object."
(is-a VariableQuantity)
(role concrete)
(single-slot hasUnit
;+ (comment "hasUnit points to the unit of measure in a reified PhysicalQuantity.")
(type SYMBOL)
;+ (allowed-parents MassMeasure)
;+ (cardinality 1 1)
(create-accessor read-write)))
(defclass UBLMeasureType "A UBLMeasureType is a Measure that has the characteristics of a UBL MeasureType (a Core Component Type)."
(is-a VariableQuantity)
(role concrete))
(defclass WeightType "WeightType is a UBL MeasureType that specifies the weight (mass) of an object."
(is-a UBLMeasureType MassQuantity)
(role concrete))
(defclass VolumeType "VolumeType is a UBL MeasureType specifying the volume of an object."
(is-a UBLMeasureType)
(role concrete))
(defclass Quantifier "A Quanitifier is a gneeralized quantiy which may epxpress ranges or uncertain quantities as well as fixed numerical qualitites."
(is-a Quantity)
(role concrete))
(defclass Number "SUO 1.55: July 14, 2003\nA measure of how many things there are, or how\nmuch there is, of a certain kind. &%Numbers are subclassed into \n&%RealNumber, &%ComplexNumber, and &%ImaginaryNumber."
(is-a Quantity Quantifier)
(role concrete)
(single-slot RationalNumberFn
;+ (comment "(&%RationalNumberFn ?NUMBER) returns the rational representation of ?NUMBER.")
(type INSTANCE)
;+ (allowed-classes RationalNumber)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot RealNumberFn
;+ (comment "(RealNumberFn ?NUMBER) returns the part of ?NUMBER that is a &%RealNumber.")
(type INSTANCE)
;+ (allowed-classes RealNumber)
;+ (cardinality 0 1)
(create-accessor read-write)))
(defclass RealNumber "SUO 1.55: July 14, 2003\nAny &%Number that can be expressed as a (possibly infinite) decimal, i.e. any &%Number that has a position \non the number line."
(is-a Number)
(role concrete)
(single-slot NumeratorFn
;+ (comment "(&%NumeratorFn ?NUMBER) returns the numerator of the canonical reduced form ?NUMBER.")
(type INSTANCE)
;+ (allowed-classes Integer)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot MeasureFn
;+ (comment "This &%BinaryFunction maps a &%RealNumber and a &%UnitOfMeasure to that &%Number of units. It is used for expressing &%ConstantQuantities. For example, the concept of three meters is represented as (&%MeasureFn 3 &%Meter).")
(type INSTANCE)
;+ (allowed-classes UnitOfMeasure)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot FloorFn
;+ (comment "(&%FloorFn ?NUMBER) returns the largest &%Integer less than or equal to the &%RealNumber ?NUMBER.")
(type INSTANCE)
;+ (allowed-classes Integer)
;+ (cardinality 0 1)
(create-accessor read-write))
(single-slot AbsoluteValueFn
;+ (comment "The value of (&%AbsoluteValueFn ?NUMBER) is the absolute value of the &%RealNumber ?NUMBER.")
(type INSTANCE)
;+ (allowed-classes NonnegativeRealNumber)
;+ (cardinality 0 1)
(create-accessor read-write))
(sin