RosettaCodeData/Task/Four-bit-adder/J/four-bit-adder-5.j

2 lines
52 B
Text
Raw Permalink Normal View History

2023-07-01 11:58:00 -04:00
add=: ((({.,0:)@[ or {:@[ hadd {.@]), }.@])/@hadd"1