mirror of
https://github.com/urbit/shrub.git
synced 2024-12-02 08:55:07 +03:00
Converted :-.
This commit is contained in:
parent
81046c7587
commit
752a49c398
@ -1608,7 +1608,7 @@
|
|||||||
:- %ex
|
:- %ex
|
||||||
:* %wish
|
:* %wish
|
||||||
[%base %noun]
|
[%base %noun]
|
||||||
:+ %cons
|
:+ %clhp
|
||||||
[%rock %tas %cx]
|
[%rock %tas %cx]
|
||||||
%+ rash pax.source.com
|
%+ rash pax.source.com
|
||||||
rood:(vang | /(scot %p our.hid)/home/(scot %da now.hid))
|
rood:(vang | /(scot %p our.hid)/home/(scot %da now.hid))
|
||||||
|
@ -5439,7 +5439,7 @@
|
|||||||
:: :::::: tuples
|
:: :::::: tuples
|
||||||
{$scon p/twig q/twig} :: :_ [q p]
|
{$scon p/twig q/twig} :: :_ [q p]
|
||||||
{$conq p/twig q/twig r/twig s/twig} :: :^ [p q r s]
|
{$conq p/twig q/twig r/twig s/twig} :: :^ [p q r s]
|
||||||
{$cons p/twig q/twig} :: :- [p q]
|
{$clhp p/twig q/twig} :: :- [p q]
|
||||||
{$cont p/twig q/twig r/twig} :: :+ [p q r]
|
{$cont p/twig q/twig r/twig} :: :+ [p q r]
|
||||||
{$conl p/(list twig)} :: :~ [p ~]
|
{$conl p/(list twig)} :: :~ [p ~]
|
||||||
{$conp p/(list twig)} :: :* p as a tuple
|
{$conp p/(list twig)} :: :* p as a tuple
|
||||||
@ -5684,7 +5684,7 @@
|
|||||||
==
|
==
|
||||||
::
|
::
|
||||||
++ cons :: make formula cell
|
++ cons :: make formula cell
|
||||||
~/ %cons
|
~/ %clhp
|
||||||
|= {vur/nock sed/nock}
|
|= {vur/nock sed/nock}
|
||||||
^- nock
|
^- nock
|
||||||
?: ?=({{$0 *} {$0 *}} +<)
|
?: ?=({{$0 *} {$0 *}} +<)
|
||||||
@ -6310,7 +6310,7 @@
|
|||||||
:: {^ *} `[p.gen q.gen]
|
:: {^ *} `[p.gen q.gen]
|
||||||
:: {$dbug *} $(gen q.gen)
|
:: {$dbug *} $(gen q.gen)
|
||||||
:: {$scon *} `[q.gen p.gen]
|
:: {$scon *} `[q.gen p.gen]
|
||||||
:: {$cons *} `[p.gen q.gen]
|
:: {$clhp *} `[p.gen q.gen]
|
||||||
:: {$conq *} `[p.gen %cont q.gen r.gen s.gen]
|
:: {$conq *} `[p.gen %cont q.gen r.gen s.gen]
|
||||||
:: {$conl *} ?~(p.gen ~ `[i.p.gen %conl t.p.gen])
|
:: {$conl *} ?~(p.gen ~ `[i.p.gen %conl t.p.gen])
|
||||||
:: {$conp *} ?~ p.gen ~
|
:: {$conp *} ?~ p.gen ~
|
||||||
@ -6468,7 +6468,7 @@
|
|||||||
{$conq *} [p.gen q.gen r.gen s.gen]
|
{$conq *} [p.gen q.gen r.gen s.gen]
|
||||||
{$cont *} [p.gen q.gen r.gen]
|
{$cont *} [p.gen q.gen r.gen]
|
||||||
{$scon *} [q.gen p.gen]
|
{$scon *} [q.gen p.gen]
|
||||||
{$cons *} [p.gen q.gen]
|
{$clhp *} [p.gen q.gen]
|
||||||
{$conl *}
|
{$conl *}
|
||||||
|- ^- twig
|
|- ^- twig
|
||||||
?~ p.gen
|
?~ p.gen
|
||||||
@ -6768,7 +6768,7 @@
|
|||||||
$brwt (lead -.gen %.(+.gen (twin noop expr)))
|
$brwt (lead -.gen %.(+.gen (twin noop expr)))
|
||||||
$scon (lead -.gen %.(+.gen dubs))
|
$scon (lead -.gen %.(+.gen dubs))
|
||||||
$conq (lead -.gen %.(+.gen (quad expr expr expr expr)))
|
$conq (lead -.gen %.(+.gen (quad expr expr expr expr)))
|
||||||
$cons (lead -.gen %.(+.gen dubs))
|
$clhp (lead -.gen %.(+.gen dubs))
|
||||||
$cont (lead -.gen %.(+.gen trey))
|
$cont (lead -.gen %.(+.gen trey))
|
||||||
$conl (lead -.gen %.(+.gen moar))
|
$conl (lead -.gen %.(+.gen moar))
|
||||||
$conp (lead -.gen %.(+.gen moar))
|
$conp (lead -.gen %.(+.gen moar))
|
||||||
@ -9831,7 +9831,7 @@
|
|||||||
:~ ['_' (rune cab %scon expb)]
|
:~ ['_' (rune cab %scon expb)]
|
||||||
['^' (rune ket %conq expd)]
|
['^' (rune ket %conq expd)]
|
||||||
['+' (rune lus %cont expc)]
|
['+' (rune lus %cont expc)]
|
||||||
['-' (rune hep %cons expb)]
|
['-' (rune hep %clhp expb)]
|
||||||
['~' (rune sig %conl exps)]
|
['~' (rune sig %conl exps)]
|
||||||
['*' (rune tar %conp exps)]
|
['*' (rune tar %conp exps)]
|
||||||
==
|
==
|
||||||
@ -9870,7 +9870,7 @@
|
|||||||
(word %scon expb)
|
(word %scon expb)
|
||||||
(word %conq expd)
|
(word %conq expd)
|
||||||
(word %cont expc)
|
(word %cont expc)
|
||||||
(word %cons expb)
|
(word %clhp expb)
|
||||||
(word %conl exps)
|
(word %conl exps)
|
||||||
(word %conp exps)
|
(word %conp exps)
|
||||||
::
|
::
|
||||||
|
@ -23,7 +23,7 @@
|
|||||||
:~ login-hint+?~(lon '' (crip (rash lon suffix-email)))
|
:~ login-hint+?~(lon '' (crip (rash lon suffix-email)))
|
||||||
access-type+%offline
|
access-type+%offline
|
||||||
response-type+%code
|
response-type+%code
|
||||||
prompt+%consent
|
prompt+%clhpent
|
||||||
==
|
==
|
||||||
++ scopes
|
++ scopes
|
||||||
:~ 'https://mail.google.com'
|
:~ 'https://mail.google.com'
|
||||||
|
@ -5519,7 +5519,7 @@
|
|||||||
:: :::::: tuples
|
:: :::::: tuples
|
||||||
{$scon p/twig q/twig} :: :_ [q p]
|
{$scon p/twig q/twig} :: :_ [q p]
|
||||||
{$conq p/twig q/twig r/twig s/twig} :: :^ [p q r s]
|
{$conq p/twig q/twig r/twig s/twig} :: :^ [p q r s]
|
||||||
{$cons p/twig q/twig} :: :- [p q]
|
{$clhp p/twig q/twig} :: :- [p q]
|
||||||
{$cont p/twig q/twig r/twig} :: :+ [p q r]
|
{$cont p/twig q/twig r/twig} :: :+ [p q r]
|
||||||
{$conl p/(list twig)} :: :~ [p ~]
|
{$conl p/(list twig)} :: :~ [p ~]
|
||||||
{$conp p/(list twig)} :: :* p as a tuple
|
{$conp p/(list twig)} :: :* p as a tuple
|
||||||
@ -5768,7 +5768,7 @@
|
|||||||
==
|
==
|
||||||
::
|
::
|
||||||
++ cons :: make formula cell
|
++ cons :: make formula cell
|
||||||
~/ %cons
|
~/ %clhp
|
||||||
|= {vur/nock sed/nock}
|
|= {vur/nock sed/nock}
|
||||||
^- nock
|
^- nock
|
||||||
?: ?=({{$0 *} {$0 *}} +<)
|
?: ?=({{$0 *} {$0 *}} +<)
|
||||||
@ -6394,7 +6394,7 @@
|
|||||||
:: {^ *} `[p.gen q.gen]
|
:: {^ *} `[p.gen q.gen]
|
||||||
:: {$dbug *} $(gen q.gen)
|
:: {$dbug *} $(gen q.gen)
|
||||||
:: {$scon *} `[q.gen p.gen]
|
:: {$scon *} `[q.gen p.gen]
|
||||||
:: {$cons *} `[p.gen q.gen]
|
:: {$clhp *} `[p.gen q.gen]
|
||||||
:: {$conq *} `[p.gen %cont q.gen r.gen s.gen]
|
:: {$conq *} `[p.gen %cont q.gen r.gen s.gen]
|
||||||
:: {$conl *} ?~(p.gen ~ `[i.p.gen %conl t.p.gen])
|
:: {$conl *} ?~(p.gen ~ `[i.p.gen %conl t.p.gen])
|
||||||
:: {$conp *} ?~ p.gen ~
|
:: {$conp *} ?~ p.gen ~
|
||||||
@ -6552,7 +6552,7 @@
|
|||||||
{$conq *} [p.gen q.gen r.gen s.gen]
|
{$conq *} [p.gen q.gen r.gen s.gen]
|
||||||
{$cont *} [p.gen q.gen r.gen]
|
{$cont *} [p.gen q.gen r.gen]
|
||||||
{$scon *} [q.gen p.gen]
|
{$scon *} [q.gen p.gen]
|
||||||
{$cons *} [p.gen q.gen]
|
{$clhp *} [p.gen q.gen]
|
||||||
{$conl *}
|
{$conl *}
|
||||||
|- ^- twig
|
|- ^- twig
|
||||||
?~ p.gen
|
?~ p.gen
|
||||||
@ -6886,7 +6886,7 @@
|
|||||||
$brwt (lead -.gen %.(+.gen (twin noop expr)))
|
$brwt (lead -.gen %.(+.gen (twin noop expr)))
|
||||||
$scon (lead -.gen %.(+.gen dubs))
|
$scon (lead -.gen %.(+.gen dubs))
|
||||||
$conq (lead -.gen %.(+.gen (quad expr expr expr expr)))
|
$conq (lead -.gen %.(+.gen (quad expr expr expr expr)))
|
||||||
$cons (lead -.gen %.(+.gen dubs))
|
$clhp (lead -.gen %.(+.gen dubs))
|
||||||
$cont (lead -.gen %.(+.gen trey))
|
$cont (lead -.gen %.(+.gen trey))
|
||||||
$conl (lead -.gen %.(+.gen moar))
|
$conl (lead -.gen %.(+.gen moar))
|
||||||
$conp (lead -.gen %.(+.gen moar))
|
$conp (lead -.gen %.(+.gen moar))
|
||||||
@ -10226,7 +10226,7 @@
|
|||||||
:~ ['_' (rune cab %scon expb)]
|
:~ ['_' (rune cab %scon expb)]
|
||||||
['^' (rune ket %conq expd)]
|
['^' (rune ket %conq expd)]
|
||||||
['+' (rune lus %cont expc)]
|
['+' (rune lus %cont expc)]
|
||||||
['-' (rune hep %cons expb)]
|
['-' (rune hep %clhp expb)]
|
||||||
['~' (rune sig %conl exps)]
|
['~' (rune sig %conl exps)]
|
||||||
['*' (rune tar %conp exps)]
|
['*' (rune tar %conp exps)]
|
||||||
==
|
==
|
||||||
@ -10265,7 +10265,7 @@
|
|||||||
(word %scon expb)
|
(word %scon expb)
|
||||||
(word %conq expd)
|
(word %conq expd)
|
||||||
(word %cont expc)
|
(word %cont expc)
|
||||||
(word %cons expb)
|
(word %clhp expb)
|
||||||
(word %conl exps)
|
(word %conl exps)
|
||||||
(word %conp exps)
|
(word %conp exps)
|
||||||
::
|
::
|
||||||
|
Loading…
Reference in New Issue
Block a user