2019-03-17 14:40:57 +02:00
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
< html >
< head >
2020-04-14 19:56:54 +03:00
< title > Comparative Relations< / title >
2020-05-03 03:20:55 +03:00
< link href = "../docs-assets/Breadcrumbs.css" rel = "stylesheet" rev = "stylesheet" type = "text/css" >
2020-03-19 02:11:25 +02:00
< meta name = "viewport" content = "width=device-width initial-scale=1" >
2019-03-17 14:40:57 +02:00
< meta http-equiv = "Content-Type" content = "text/html; charset=utf-8" >
< meta http-equiv = "Content-Language" content = "en-gb" >
2020-05-03 03:01:21 +03:00
2020-05-03 03:20:55 +03:00
< link href = "../docs-assets/Contents.css" rel = "stylesheet" rev = "stylesheet" type = "text/css" >
< link href = "../docs-assets/Progress.css" rel = "stylesheet" rev = "stylesheet" type = "text/css" >
< link href = "../docs-assets/Navigation.css" rel = "stylesheet" rev = "stylesheet" type = "text/css" >
< link href = "../docs-assets/Fonts.css" rel = "stylesheet" rev = "stylesheet" type = "text/css" >
< link href = "../docs-assets/Base.css" rel = "stylesheet" rev = "stylesheet" type = "text/css" >
2020-08-20 13:50:43 +03:00
< script >
function togglePopup(material_id) {
var popup = document.getElementById(material_id);
popup.classList.toggle("show");
}
< / script >
< link href = "../docs-assets/Popups.css" rel = "stylesheet" rev = "stylesheet" type = "text/css" >
2020-05-03 03:20:55 +03:00
< link href = "../docs-assets/Colours.css" rel = "stylesheet" rev = "stylesheet" type = "text/css" >
2020-04-14 19:56:54 +03:00
2019-03-17 14:40:57 +02:00
< / head >
2020-05-03 03:01:21 +03:00
< body class = "commentary-font" >
2020-03-19 02:11:25 +02:00
< nav role = "navigation" >
2020-04-14 19:56:54 +03:00
< h1 > < a href = "../index.html" >
2020-05-03 18:34:53 +03:00
< img src = "../docs-assets/Inform.png" height = 72" >
2020-04-14 19:56:54 +03:00
< / a > < / h1 >
< ul > < li > < a href = "../compiler.html" > compiler tools< / a > < / li >
2020-03-19 02:11:25 +02:00
< li > < a href = "../other.html" > other tools< / a > < / li >
< li > < a href = "../extensions.html" > extensions and kits< / a > < / li >
< li > < a href = "../units.html" > unit test tools< / a > < / li >
2020-04-14 19:56:54 +03:00
< / ul > < h2 > Compiler Webs< / h2 > < ul >
2020-03-19 02:11:25 +02:00
< li > < a href = "../inbuild/index.html" > inbuild< / a > < / li >
< li > < a href = "../inform7/index.html" > inform7< / a > < / li >
< li > < a href = "../inter/index.html" > inter< / a > < / li >
2020-04-14 19:56:54 +03:00
< / ul > < h2 > Inbuild Modules< / h2 > < ul >
< li > < a href = "../supervisor-module/index.html" > supervisor< / a > < / li >
< / ul > < h2 > Inform7 Modules< / h2 > < ul >
< li > < a href = "index.html" > < span class = "selectedlink" > core< / span > < / a > < / li >
2020-03-19 02:11:25 +02:00
< li > < a href = "../if-module/index.html" > if< / a > < / li >
< li > < a href = "../multimedia-module/index.html" > multimedia< / a > < / li >
< li > < a href = "../index-module/index.html" > index< / a > < / li >
2020-04-14 19:56:54 +03:00
< / ul > < h2 > Inter Modules< / h2 > < ul >
< li > < a href = "../bytecode-module/index.html" > bytecode< / a > < / li >
2020-03-19 02:11:25 +02:00
< li > < a href = "../building-module/index.html" > building< / a > < / li >
< li > < a href = "../codegen-module/index.html" > codegen< / a > < / li >
2020-05-20 02:02:28 +03:00
< / ul > < h2 > Services< / h2 > < ul >
2020-04-14 19:56:54 +03:00
< li > < a href = "../arch-module/index.html" > arch< / a > < / li >
2020-08-20 01:36:18 +03:00
< li > < a href = "../calculus-module/index.html" > calculus< / a > < / li >
2020-04-14 19:56:54 +03:00
< li > < a href = "../html-module/index.html" > html< / a > < / li >
2020-05-20 02:02:28 +03:00
< li > < a href = "../inflections-module/index.html" > inflections< / a > < / li >
2020-08-20 01:36:18 +03:00
< li > < a href = "../kinds-module/index.html" > kinds< / a > < / li >
2020-05-20 02:02:28 +03:00
< li > < a href = "../linguistics-module/index.html" > linguistics< / a > < / li >
< li > < a href = "../problems-module/index.html" > problems< / a > < / li >
2020-08-20 01:36:18 +03:00
< li > < a href = "../syntax-module/index.html" > syntax< / a > < / li >
< li > < a href = "../words-module/index.html" > words< / a > < / li >
2020-03-19 02:11:25 +02:00
< li > < a href = "../../../inweb/docs/foundation-module/index.html" > foundation< / a > < / li >
2020-04-14 19:56:54 +03:00
< / ul >
2020-03-19 02:11:25 +02:00
< / nav >
< main role = "main" >
2020-05-03 03:01:21 +03:00
<!-- Weave of 'Comparative Relations' generated by Inweb -->
< div class = "breadcrumbs" >
< ul class = "crumbs" > < li > < a href = "../index.html" > Home< / a > < / li > < li > < a href = "../compiler.html" > Inform7 Modules< / a > < / li > < li > < a href = "index.html" > core< / a > < / li > < li > < a href = "index.html#15" > Chapter 15: Properties< / a > < / li > < li > < b > Comparative Relations< / b > < / li > < / ul > < / div >
< p class = "purpose" > When a measurement adjective like "tall" is defined, so is a comparative relation like "taller than".< / p >
2019-03-17 14:40:57 +02:00
2020-08-20 13:50:43 +03:00
< ul class = "toc" > < li > < a href = "15-cr.html#SP1" > § 1. Family< / a > < / li > < li > < a href = "15-cr.html#SP2" > § 2. Second stock< / a > < / li > < li > < a href = "15-cr.html#SP3" > § 3. Typechecking< / a > < / li > < li > < a href = "15-cr.html#SP4" > § 4. Assertion< / a > < / li > < li > < a href = "15-cr.html#SP5" > § 5. Compilation< / a > < / li > < li > < a href = "15-cr.html#SP6" > § 6. Problem message text< / a > < / li > < / ul > < hr class = "tocbar" >
2019-03-17 14:40:57 +02:00
2020-08-20 13:50:43 +03:00
< p class = "commentary firstcommentary" > < a id = "SP1" class = "paragraph-anchor" > < / a > < b > § 1. Family. < / b > Unlike the other relations to do with property values, these do not correspond
exactly with the properties. Some properties, like "carrying capacity", might
2019-03-17 14:40:57 +02:00
never be compared with measurement adjectives; others, like "height", might
be compared with more than one ("short", "tall").
< / p >
2020-05-03 03:01:21 +03:00
< pre class = "displayed-code all-displayed-code code-font" >
2020-08-20 13:50:43 +03:00
< span class = "identifier-syntax" > bp_family< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > property_comparison_bp_family< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > NULL< / span > < span class = "plain-syntax" > ;< / span >
< span class = "reserved-syntax" > void< / span > < span class = "plain-syntax" > < / span > < span class = "function-syntax" > Properties::ComparativeRelations::start< / span > < button class = "popup" onclick = "togglePopup('usagePopup1')" > < span class = "comment-syntax" > ?< / span > < span class = "popuptext" id = "usagePopup1" > Usage of < span class = "code-font" > < span class = "function-syntax" > Properties::ComparativeRelations::start< / span > < / span > :< br / > Core Module - < a href = "1-cm.html#SP6" > § 6< / a > < / span > < / button > < span class = "plain-syntax" > (< / span > < span class = "reserved-syntax" > void< / span > < span class = "plain-syntax" > ) {< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > property_comparison_bp_family< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > BinaryPredicateFamilies::new< / span > < span class = "plain-syntax" > ();< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > METHOD_ADD< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > property_comparison_bp_family< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > STOCK_BPF_MTID< / span > < span class = "plain-syntax" > , < / span > < a href = "15-cr.html#SP2" class = "function-link" > < span class = "function-syntax" > Properties::ComparativeRelations::stock< / span > < / a > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > METHOD_ADD< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > property_comparison_bp_family< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > TYPECHECK_BPF_MTID< / span > < span class = "plain-syntax" > , < / span > < a href = "15-cr.html#SP3" class = "function-link" > < span class = "function-syntax" > Properties::ComparativeRelations::REL_typecheck< / span > < / a > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > METHOD_ADD< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > property_comparison_bp_family< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > ASSERT_BPF_MTID< / span > < span class = "plain-syntax" > , < / span > < a href = "15-cr.html#SP4" class = "function-link" > < span class = "function-syntax" > Properties::ComparativeRelations::REL_assert< / span > < / a > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > METHOD_ADD< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > property_comparison_bp_family< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > SCHEMA_BPF_MTID< / span > < span class = "plain-syntax" > , < / span > < a href = "15-cr.html#SP5" class = "function-link" > < span class = "function-syntax" > Properties::ComparativeRelations::REL_compile< / span > < / a > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > METHOD_ADD< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > property_comparison_bp_family< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > DESCRIBE_FOR_PROBLEMS_BPF_MTID< / span > < span class = "plain-syntax" > , < / span > < a href = "15-cr.html#SP6" class = "function-link" > < span class = "function-syntax" > Properties::ComparativeRelations::REL_describe_for_problems< / span > < / a > < span class = "plain-syntax" > );< / span >
2020-05-03 03:01:21 +03:00
< span class = "plain-syntax" > }< / span >
2019-03-17 14:40:57 +02:00
< / pre >
2020-08-20 13:50:43 +03:00
< p class = "commentary firstcommentary" > < a id = "SP2" class = "paragraph-anchor" > < / a > < b > § 2. Second stock. < / b > When an adjective is defined so that it performs an inequality comparison
2019-03-17 14:40:57 +02:00
of a property value, like so:
< / p >
< blockquote >
< p > Definition: A woman is tall if her height is 68 or more.< / p >
< / blockquote >
2020-05-03 03:01:21 +03:00
< p class = "commentary" > ...Inform automatically generates a comparative form (here "taller than").
2019-03-17 14:40:57 +02:00
This is where our comparative relations come from, but the work is done in
the previous section.
< / p >
2020-05-03 03:01:21 +03:00
< pre class = "displayed-code all-displayed-code code-font" >
2020-08-20 13:50:43 +03:00
< span class = "reserved-syntax" > void< / span > < span class = "plain-syntax" > < / span > < span class = "function-syntax" > Properties::ComparativeRelations::stock< / span > < button class = "popup" onclick = "togglePopup('usagePopup2')" > < span class = "comment-syntax" > ?< / span > < span class = "popuptext" id = "usagePopup2" > Usage of < span class = "code-font" > < span class = "function-syntax" > Properties::ComparativeRelations::stock< / span > < / span > :< br / > < a href = "15-cr.html#SP1" > § 1< / a > < / span > < / button > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > bp_family< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > self< / span > < span class = "plain-syntax" > , < / span > < span class = "reserved-syntax" > int< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > n< / span > < span class = "plain-syntax" > ) {< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > n< / span > < span class = "plain-syntax" > == < / span > < span class = "constant-syntax" > 2< / span > < span class = "plain-syntax" > ) {< / span >
< span class = "plain-syntax" > < / span > < a href = "15-ma.html#SP13" class = "function-link" > < span class = "function-syntax" > Properties::Measurement::create_comparatives< / span > < / a > < span class = "plain-syntax" > ();< / span >
< span class = "plain-syntax" > }< / span >
2020-05-03 03:01:21 +03:00
< span class = "plain-syntax" > }< / span >
2020-08-22 00:38:20 +03:00
< span class = "reserved-syntax" > typedef< / span > < span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > struct< / span > < span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > comparative_bp_data< / span > < span class = "plain-syntax" > {< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > struct< / span > < span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > property< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > comparative_property< / span > < span class = "plain-syntax" > ; < / span > < span class = "comment-syntax" > (if right way) if a comparative adjective< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > int< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > comparison_sign< / span > < span class = "plain-syntax" > ; < / span > < span class = "comment-syntax" > ...and < / span > < span class = "extract" > < span class = "extract-syntax" > +1< / span > < / span > < span class = "comment-syntax" > or < / span > < span class = "extract" > < span class = "extract-syntax" > -1< / span > < / span > < span class = "comment-syntax" > according to sign of definition< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > CLASS_DEFINITION< / span >
< span class = "plain-syntax" > } < / span > < span class = "reserved-syntax" > comparative_bp_data< / span > < span class = "plain-syntax" > ;< / span >
< span class = "reserved-syntax" > void< / span > < span class = "plain-syntax" > < / span > < span class = "function-syntax" > Properties::ComparativeRelations::initialise< / span > < button class = "popup" onclick = "togglePopup('usagePopup3')" > < span class = "comment-syntax" > ?< / span > < span class = "popuptext" id = "usagePopup3" > Usage of < span class = "code-font" > < span class = "function-syntax" > Properties::ComparativeRelations::initialise< / span > < / span > :< br / > Measurement Adjectives - < a href = "15-ma.html#SP13_2" > § 13.2< / a > < / span > < / button > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > binary_predicate< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > bp< / span > < span class = "plain-syntax" > ,< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > int< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > sign< / span > < span class = "plain-syntax" > , < / span > < span class = "reserved-syntax" > property< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > prn< / span > < span class = "plain-syntax" > ) {< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > comparative_bp_data< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > D< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > CREATE< / span > < span class = "plain-syntax" > (< / span > < span class = "reserved-syntax" > comparative_bp_data< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > D< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > comparison_sign< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > sign< / span > < span class = "plain-syntax" > ; < / span > < span class = "identifier-syntax" > D< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > comparative_property< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > prn< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > bp< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > family_specific< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > STORE_POINTER_comparative_bp_data< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > D< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > }< / span >
2019-03-17 14:40:57 +02:00
< / pre >
2020-08-22 00:38:20 +03:00
< ul class = "endnotetexts" > < li > The structure comparative_bp_data is private to this section.< / li > < / ul >
2020-08-20 13:50:43 +03:00
< p class = "commentary firstcommentary" > < a id = "SP3" class = "paragraph-anchor" > < / a > < b > § 3. Typechecking. < / b > Because of the ambiguity between absolute and relative comparisons (see
2019-03-17 14:40:57 +02:00
below), we'll typecheck this asymmetrically; the left term is typechecked
as usual, but the right is more leniently handled.
< / p >
2020-05-03 03:01:21 +03:00
< pre class = "displayed-code all-displayed-code code-font" >
2020-08-22 00:38:20 +03:00
< span class = "reserved-syntax" > int< / span > < span class = "plain-syntax" > < / span > < span class = "function-syntax" > Properties::ComparativeRelations::REL_typecheck< / span > < button class = "popup" onclick = "togglePopup('usagePopup4')" > < span class = "comment-syntax" > ?< / span > < span class = "popuptext" id = "usagePopup4" > Usage of < span class = "code-font" > < span class = "function-syntax" > Properties::ComparativeRelations::REL_typecheck< / span > < / span > :< br / > < a href = "15-cr.html#SP1" > § 1< / a > < / span > < / button > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > bp_family< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > self< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > binary_predicate< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > bp< / span > < span class = "plain-syntax" > ,< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > kind< / span > < span class = "plain-syntax" > **< / span > < span class = "identifier-syntax" > kinds_of_terms< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > kind< / span > < span class = "plain-syntax" > **< / span > < span class = "identifier-syntax" > kinds_required< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > tc_problem_kit< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > tck< / span > < span class = "plain-syntax" > ) {< / span >
2020-05-03 03:01:21 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > ((< / span > < span class = "identifier-syntax" > kinds_required< / span > < span class = "plain-syntax" > [0]) & & < / span >
2020-08-12 01:59:29 +03:00
< span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > Kinds::compatible< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > kinds_of_terms< / span > < span class = "plain-syntax" > [0], < / span > < span class = "identifier-syntax" > kinds_required< / span > < span class = "plain-syntax" > [0]) == < / span > < span class = "identifier-syntax" > NEVER_MATCH< / span > < span class = "plain-syntax" > )) {< / span >
2020-08-09 20:39:31 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > LOG< / span > < span class = "plain-syntax" > (< / span > < span class = "string-syntax" > "Term 0 is %u not %u\n"< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > kinds_of_terms< / span > < span class = "plain-syntax" > [0], < / span > < span class = "identifier-syntax" > kinds_required< / span > < span class = "plain-syntax" > [0]);< / span >
2020-08-24 21:30:28 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > Propositions::Checker::issue_bp_typecheck_error< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > bp< / span > < span class = "plain-syntax" > ,< / span >
2020-05-03 03:01:21 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > kinds_of_terms< / span > < span class = "plain-syntax" > [0], < / span > < span class = "identifier-syntax" > kinds_of_terms< / span > < span class = "plain-syntax" > [1], < / span > < span class = "identifier-syntax" > tck< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > return< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > NEVER_MATCH< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > }< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > property< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > prn< / span > < span class = "plain-syntax" > = < / span > < a href = "15-cp.html#SP5" class = "function-link" > < span class = "function-syntax" > Properties::Conditions::get_coinciding_property< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > kinds_of_terms< / span > < span class = "plain-syntax" > [1]);< / span >
2020-08-22 00:38:20 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > comparative_bp_data< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > D< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > RETRIEVE_POINTER_comparative_bp_data< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > bp< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > family_specific< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > ((< / span > < span class = "identifier-syntax" > prn< / span > < span class = "plain-syntax" > ) & & (< / span > < span class = "identifier-syntax" > prn< / span > < span class = "plain-syntax" > != < / span > < span class = "identifier-syntax" > D< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > comparative_property< / span > < span class = "plain-syntax" > )) {< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > tck< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > log_to_I6_text< / span > < span class = "plain-syntax" > )< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > LOG< / span > < span class = "plain-syntax" > (< / span > < span class = "string-syntax" > "Comparative misapplied to $Y not $Y\n"< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > prn< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > D< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > comparative_property< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < a href = "2-sq.html#SP2" class = "function-link" > < span class = "function-syntax" > Problems::quote_property< / span > < / a > < span class = "plain-syntax" > (4, < / span > < span class = "identifier-syntax" > D< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > comparative_property< / span > < span class = "plain-syntax" > );< / span >
2020-05-03 03:01:21 +03:00
< span class = "plain-syntax" > < / span > < a href = "2-sq.html#SP2" class = "function-link" > < span class = "function-syntax" > Problems::quote_property< / span > < / a > < span class = "plain-syntax" > (5, < / span > < span class = "identifier-syntax" > prn< / span > < span class = "plain-syntax" > );< / span >
2020-05-21 02:11:29 +03:00
< span class = "plain-syntax" > < / span > < a href = "2-si.html#SP6" class = "function-link" > < span class = "function-syntax" > StandardProblems::tcp_problem< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > _p_< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > PM_ComparativeMisapplied< / span > < span class = "plain-syntax" > ), < / span > < span class = "identifier-syntax" > tck< / span > < span class = "plain-syntax" > ,< / span >
2020-05-03 03:01:21 +03:00
< span class = "plain-syntax" > < / span > < span class = "string-syntax" > "that ought to make a comparison of %4 not %5."< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > return< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > NEVER_MATCH< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > }< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > return< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > ALWAYS_MATCH< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > }< / span >
2019-03-17 14:40:57 +02:00
< / pre >
2020-08-20 13:50:43 +03:00
< p class = "commentary firstcommentary" > < a id = "SP4" class = "paragraph-anchor" > < / a > < b > § 4. Assertion. < / b > < / p >
2020-05-03 03:01:21 +03:00
< pre class = "displayed-code all-displayed-code code-font" >
2020-08-22 00:38:20 +03:00
< span class = "reserved-syntax" > int< / span > < span class = "plain-syntax" > < / span > < span class = "function-syntax" > Properties::ComparativeRelations::REL_assert< / span > < button class = "popup" onclick = "togglePopup('usagePopup5')" > < span class = "comment-syntax" > ?< / span > < span class = "popuptext" id = "usagePopup5" > Usage of < span class = "code-font" > < span class = "function-syntax" > Properties::ComparativeRelations::REL_assert< / span > < / span > :< br / > < a href = "15-cr.html#SP1" > § 1< / a > < / span > < / button > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > bp_family< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > self< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > binary_predicate< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > bp< / span > < span class = "plain-syntax" > ,< / span >
2020-05-03 03:01:21 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > inference_subject< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > infs0< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > parse_node< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > spec0< / span > < span class = "plain-syntax" > ,< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > inference_subject< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > infs1< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > parse_node< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > spec1< / span > < span class = "plain-syntax" > ) {< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > return< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > FALSE< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > }< / span >
2019-03-17 14:40:57 +02:00
< / pre >
2020-08-20 13:50:43 +03:00
< p class = "commentary firstcommentary" > < a id = "SP5" class = "paragraph-anchor" > < / a > < b > § 5. Compilation. < / b > We need do nothing special: these relations can be compiled from their schemas.
2019-03-17 14:40:57 +02:00
< / p >
2020-05-03 03:01:21 +03:00
< pre class = "displayed-code all-displayed-code code-font" >
2020-08-22 00:38:20 +03:00
< span class = "reserved-syntax" > int< / span > < span class = "plain-syntax" > < / span > < span class = "function-syntax" > Properties::ComparativeRelations::REL_compile< / span > < button class = "popup" onclick = "togglePopup('usagePopup6')" > < span class = "comment-syntax" > ?< / span > < span class = "popuptext" id = "usagePopup6" > Usage of < span class = "code-font" > < span class = "function-syntax" > Properties::ComparativeRelations::REL_compile< / span > < / span > :< br / > < a href = "15-cr.html#SP1" > § 1< / a > < / span > < / button > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > bp_family< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > self< / span > < span class = "plain-syntax" > , < / span > < span class = "reserved-syntax" > int< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > task< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > binary_predicate< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > bp< / span > < span class = "plain-syntax" > ,< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > annotated_i6_schema< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > asch< / span > < span class = "plain-syntax" > ) {< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > task< / span > < span class = "plain-syntax" > == < / span > < span class = "identifier-syntax" > TEST_ATOM_TASK< / span > < span class = "plain-syntax" > )< / span >
2020-08-20 13:50:43 +03:00
< span class = "plain-syntax" > < / span > < span class = "named-paragraph-container code-font" > < a href = "15-cr.html#SP5_1" class = "named-paragraph-link" > < span class = "named-paragraph" > Rewrite the annotated schema if it turns out to be an absolute comparison< / span > < span class = "named-paragraph-number" > 5.1< / span > < / a > < / span > < span class = "plain-syntax" > ;< / span >
2020-05-03 03:01:21 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > return< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > FALSE< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > }< / span >
2019-03-17 14:40:57 +02:00
< / pre >
2020-08-20 13:50:43 +03:00
< p class = "commentary firstcommentary" > < a id = "SP5_1" class = "paragraph-anchor" > < / a > < b > § 5.1. < / b > Normally, "taller than" would relate two people, and compare their heights.
2019-03-17 14:40:57 +02:00
But we also want to allow absolute comparison like this one:
< / p >
< blockquote >
< p > if Geoff is taller than 4 foot 5 inches, ...< / p >
< / blockquote >
2020-05-03 03:01:21 +03:00
< p class = "commentary" > In that case we need a different schema, where right and left are not handled
2019-03-17 14:40:57 +02:00
so symmetrically; we rewrite the annotated schema on the fly.
< / p >
2020-08-20 13:50:43 +03:00
< p class = "commentary" > < span class = "named-paragraph-container code-font" > < span class = "named-paragraph-defn" > Rewrite the annotated schema if it turns out to be an absolute comparison< / span > < span class = "named-paragraph-number" > 5.1< / span > < / span > < span class = "comment-syntax" > =< / span >
2020-05-03 03:01:21 +03:00
< / p >
2019-03-17 14:40:57 +02:00
2020-05-03 03:01:21 +03:00
< pre class = "displayed-code all-displayed-code code-font" >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > kind< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > st< / span > < span class = "plain-syntax" > [2];< / span >
2020-08-22 00:38:20 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > st< / span > < span class = "plain-syntax" > [0] = < / span > < a href = "12-cad.html#SP6" class = "function-link" > < span class = "function-syntax" > Calculus::Deferrals::Cinders::kind_of_value_of_term< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > asch< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > pt0< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > st< / span > < span class = "plain-syntax" > [1] = < / span > < a href = "12-cad.html#SP6" class = "function-link" > < span class = "function-syntax" > Calculus::Deferrals::Cinders::kind_of_value_of_term< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > asch< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > pt1< / span > < span class = "plain-syntax" > );< / span >
2020-08-12 01:59:29 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > ((< / span > < span class = "identifier-syntax" > Kinds::eq< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > st< / span > < span class = "plain-syntax" > [0], < / span > < span class = "identifier-syntax" > st< / span > < span class = "plain-syntax" > [1]) == < / span > < span class = "identifier-syntax" > FALSE< / span > < span class = "plain-syntax" > ) & & < / span >
2020-05-03 03:01:21 +03:00
< span class = "plain-syntax" > (< / span > < a href = "15-cp.html#SP5" class = "function-link" > < span class = "function-syntax" > Properties::Conditions::name_can_coincide_with_property< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > st< / span > < span class = "plain-syntax" > [1]))) {< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > property< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > prn< / span > < span class = "plain-syntax" > = < / span > < a href = "15-cp.html#SP5" class = "function-link" > < span class = "function-syntax" > Properties::Conditions::get_coinciding_property< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > st< / span > < span class = "plain-syntax" > [1]);< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > prn< / span > < span class = "plain-syntax" > ) {< / span >
2020-08-22 00:38:20 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > comparative_bp_data< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > D< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > RETRIEVE_POINTER_comparative_bp_data< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > bp< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > family_specific< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > Calculus::Schemas::modify< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > asch< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > schema< / span > < span class = "plain-syntax" > ,< / span >
2020-08-09 20:39:31 +03:00
< span class = "plain-syntax" > < / span > < span class = "string-syntax" > "*1.%n %s *2"< / span > < span class = "plain-syntax" > , < / span > < a href = "15-pr.html#SP26" class = "function-link" > < span class = "function-syntax" > Properties::iname< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > prn< / span > < span class = "plain-syntax" > ),< / span >
2020-08-22 00:38:20 +03:00
< span class = "plain-syntax" > < / span > < a href = "15-ma.html#SP4" class = "function-link" > < span class = "function-syntax" > Properties::Measurement::strict_comparison< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > D< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > comparison_sign< / span > < span class = "plain-syntax" > ));< / span >
2020-05-03 03:01:21 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > return< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > TRUE< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > }< / span >
< span class = "plain-syntax" > }< / span >
2019-03-17 14:40:57 +02:00
< / pre >
2020-08-20 13:50:43 +03:00
< ul class = "endnotetexts" > < li > This code is used in < a href = "15-cr.html#SP5" > § 5< / a > .< / li > < / ul >
< p class = "commentary firstcommentary" > < a id = "SP6" class = "paragraph-anchor" > < / a > < b > § 6. Problem message text. < / b > < / p >
2019-03-17 14:40:57 +02:00
2020-05-03 03:01:21 +03:00
< pre class = "displayed-code all-displayed-code code-font" >
2020-08-22 00:38:20 +03:00
< span class = "reserved-syntax" > int< / span > < span class = "plain-syntax" > < / span > < span class = "function-syntax" > Properties::ComparativeRelations::REL_describe_for_problems< / span > < button class = "popup" onclick = "togglePopup('usagePopup7')" > < span class = "comment-syntax" > ?< / span > < span class = "popuptext" id = "usagePopup7" > Usage of < span class = "code-font" > < span class = "function-syntax" > Properties::ComparativeRelations::REL_describe_for_problems< / span > < / span > :< br / > < a href = "15-cr.html#SP1" > § 1< / a > < / span > < / button > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > bp_family< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > self< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > OUTPUT_STREAM< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > binary_predicate< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > bp< / span > < span class = "plain-syntax" > ) {< / span >
2020-05-03 03:01:21 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > return< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > FALSE< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > }< / span >
2019-03-17 14:40:57 +02:00
< / pre >
2020-05-03 03:01:21 +03:00
< nav role = "progress" > < div class = "progresscontainer" >
2020-08-25 23:47:14 +03:00
< ul class = "progressbar" > < li class = "progressprev" > < a href = "15-tpr.html" > ❮ < / a > < / li > < li class = "progresschapter" > < a href = "P-wtmd.html" > P< / a > < / li > < li class = "progresschapter" > < a href = "1-cm.html" > 1< / a > < / li > < li class = "progresschapter" > < a href = "2-up.html" > 2< / a > < / li > < li class = "progresschapter" > < a href = "3-bv.html" > 3< / a > < / li > < li class = "progresschapter" > < a href = "4-dlr.html" > 4< / a > < / li > < li class = "progresschapter" > < a href = "5-rpt.html" > 5< / a > < / li > < li class = "progresschapter" > < a href = "6-lp.html" > 6< / a > < / li > < li class = "progresschapter" > < a href = "7-am.html" > 7< / a > < / li > < li class = "progresschapter" > < a href = "8-ptu.html" > 8< / a > < / li > < li class = "progresschapter" > < a href = "9-ef.html" > 9< / a > < / li > < li class = "progresschapter" > < a href = "10-its.html" > 10< / a > < / li > < li class = "progresschapter" > < / li > < li class = "progresschapter" > < a href = "12-terr.html" > 12< / a > < / li > < li class = "progresschapter" > < a href = "13-kak.html" > 13< / a > < / li > < li class = "progresschapter" > < a href = "14-sp.html" > 14< / a > < / li > < li class = "progresscurrentchapter" > 15< / li > < li class = "progresssection" > < a href = "15-pr.html" > pr< / a > < / li > < li class = "progresssection" > < a href = "15-ep.html" > ep< / a > < / li > < li class = "progresssection" > < a href = "15-vp.html" > vp< / a > < / li > < li class = "progresssection" > < a href = "15-ps.html" > ps< / a > < / li > < li class = "progresssection" > < a href = "15-cp.html" > cp< / a > < / li > < li class = "progresssection" > < a href = "15-ia.html" > ia< / a > < / li > < li class = "progresssection" > < a href = "15-tpr.html" > tpr< / a > < / li > < li class = "progresscurrent" > cr< / li > < li class = "progresssection" > < a href = "15-ma.html" > ma< / a > < / li > < li class = "progresssection" > < a href = "15-spr.html" > spr< / a > < / li > < li class = "progresssection" > < a href = "15-spr2.html" > spr2< / a > < / li > < li class = "progresssection" > < a href = "15-pov.html" > pov< / a > < / li > < li class = "progresssection" > < a href = "15-epv.html" > epv< / a > < / li > < li class = "progresschapter" > < a href = "16-is.html" > 16< / a > < / li > < li class = "progresschapter" > < a href = "17-tl.html" > 17< / a > < / li > < li class = "progresschapter" > < a href = "18-lc.html" > 18< / a > < / li > < li class = "progresschapter" > < a href = "19-tc.html" > 19< / a > < / li > < li class = "progresschapter" > < a href = "20-eq.html" > 20< / a > < / li > < li class = "progresschapter" > < a href = "21-rl.html" > 21< / a > < / li > < li class = "progresschapter" > < a href = "22-itp.html" > 22< / a > < / li > < li class = "progresschapter" > < a href = "23-ad.html" > 23< / a > < / li > < li class = "progresschapter" > < a href = "24-lv.html" > 24< / a > < / li > < li class = "progresschapter" > < a href = "25-in.html" > 25< / a > < / li > < li class = "progresschapter" > < a href = "26-fc.html" > 26< / a > < / li > < li class = "progresschapter" > < a href = "27-hr.html" > 27< / a > < / li > < li class = "progressnext" > < a href = "15-ma.html" > ❯ < / a > < / li > < / ul > < / div >
2020-05-03 03:01:21 +03:00
< / nav > <!-- End of weave -->
2019-03-17 14:40:57 +02:00
2020-03-19 02:11:25 +02:00
< / main >
2019-03-17 14:40:57 +02:00
< / body >
< / html >