2 lines
99 B
Forth
2 lines
99 B
Forth
: hypot { a b -- a^2 + b^2 } \ text between "--" and "}" remains commentary
|
|
a a * b b * + ;
|