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