2014-09-25 04:37:29 +04:00
|
|
|
::
|
2016-02-05 06:05:37 +03:00
|
|
|
:::: /hoon/tang/mar
|
2014-09-25 04:37:29 +04:00
|
|
|
::
|
2016-02-18 02:00:12 +03:00
|
|
|
/? 310
|
2016-11-17 04:42:58 +03:00
|
|
|
::
|
2016-12-03 01:14:39 +03:00
|
|
|
=, format
|
2020-11-25 23:22:55 +03:00
|
|
|
|_ tan=(list tank)
|
2020-05-05 06:21:05 +03:00
|
|
|
++ grad %noun
|
2015-02-06 08:00:35 +03:00
|
|
|
++ grow
|
|
|
|
|
|%
|
2020-05-05 06:21:05 +03:00
|
|
|
++ noun tan
|
2020-12-11 08:51:29 +03:00
|
|
|
++ json
|
|
|
|
|
=/ result=(each (list ^json) tang)
|
|
|
|
|
(mule |.((turn tan tank:enjs:format)))
|
|
|
|
|
?- -.result
|
|
|
|
|
%& a+p.result
|
|
|
|
|
%| a+[a+[%s '[[output rendering error]]']~]~
|
|
|
|
|
==
|
|
|
|
|
::
|
2015-06-06 01:20:26 +03:00
|
|
|
++ elem
|
2016-12-03 01:14:39 +03:00
|
|
|
=- ;pre:code:"{(of-wall -)}"
|
2015-02-06 08:00:35 +03:00
|
|
|
^- wall %- zing ^- (list wall)
|
2020-11-25 23:22:55 +03:00
|
|
|
(turn (flop tan) |=(a=tank (wash 0^160 a)))
|
2015-02-06 08:00:35 +03:00
|
|
|
--
|
2014-09-25 04:37:29 +04:00
|
|
|
++ grab :: convert from
|
|
|
|
|
|%
|
2016-01-26 03:49:09 +03:00
|
|
|
++ noun (list ^tank) :: clam from %noun
|
2020-11-25 23:22:55 +03:00
|
|
|
++ tank |=(a=^tank [a]~)
|
2014-09-25 04:37:29 +04:00
|
|
|
--
|
|
|
|
|
--
|
