builtup4/std/core/pair/operations.bu4
2023-03-25 13:02:10 +03:00

6 lines
225 B
Plaintext

{ (_pair) /[1][_pair] | first }
{ (_pair) /[0][_pair] | second }
{ (x) /[x]/[x][pair] | double }
{ (x)(y) /[x]/[y][pair] | iswap }
{ (_pair) /[iswap][_pair] | swap }