programdemos/square.xtl

A user function with the shorthand right argument ⍵. Run it with ./demos/square.xtl or "xetal run demos/square.xtl"; it prints 49.

source

ᵘs̲quare : Num a => a -> a

function · line 6

u:s_quare x: x times x.

ᵘs̲quare ← { ⍵ × ⍵ }