\ -----------------------------------------------------------------------
\ 2-4.FORTH--------------------------------------------------------------
\ -----------------------------------------------------------------------
\ Code from Starting Forth Chapter 2
\ ANSized by Benjamin Hoyt in 1997

( problem 2-4 )
: 2-4  ( c a b -- a**2+ab+c )  OVER +  *  + ;