Mayan numerals: Difference between revisions
m
→{{header|jq}}: tidy
m (→{{header|jq}}: tidy) |
|||
Line 2,532:
'''Works with gojq, the Go implementation of jq'''
{{trans|Wren}}
<lang jq>def m:
{ ul: "╔",
uc: "╦",
Line 2,577 ⟶ 2,576:
($mayans|length) as $lm
| (reduce range(0; $lm) as $i (m.ul;
. + m.hb * 4 + if $i < $lm - 1 then m.uc else m.ur + "\n" end ) )
+ (reduce range(1; 5) as $i ("";
. + m.vb
+ (reduce range(0; $lm) as $j ("";
. + $mayans[$j][$i-1] + m.vb)) + "\n" ) )
▲ ( reduce range(0; $lm) as $i ("";
. + (m.hb * 4)
+ if ($i < $lm - 1) then m.lc else m.lr + "\n" end ) );
def decimal2mayan:
| |||