: hypot { a b -- a^2 + b^2 } \ text between "--" and "}" remains commentary a a * b b * + ;