mirror of
https://github.com/ganelson/inform.git
synced 2024-07-05 16:44:21 +03:00
18 lines
903 B
Plaintext
18 lines
903 B
Plaintext
'new unary even': ok
|
|
'new binary sees (none, sees-f1)': ok
|
|
'set P to << Forall x IN< kind = number (x) IN>: even (x) >>': p set to << ForAll x IN< kind=number(x) IN> : even(x) >>
|
|
'copy of P': << ForAll x IN< kind=number(x) IN> : even(x) >>
|
|
'set Q to negation of P': q set to << NOT< ForAll x IN< kind=number(x) IN> : even(x) NOT> >>
|
|
'P is a group': false
|
|
'Q is a group': true
|
|
'unnegation of Q': << ForAll x IN< kind=number(x) IN> : even(x) >>
|
|
'remove universal quantifier from P': << kind=number(x) ^ even(x) >>
|
|
'set R to delete 4 from P': r set to << ForAll x IN< kind=number(x) IN> >>
|
|
'remove close domain from R': << ForAll x IN< kind=number(x) >>
|
|
'P contains quantifier': true
|
|
'P contains relation': false
|
|
'<< (1 == 2) >> contains relation': true
|
|
'<< (1 == 2) ^ even (x) >> contains quantifier': false
|
|
'term first cited in << even (x) >>': x
|
|
'term first cited in << not< sees (56, 2) not> >>': '56'
|