Create sum-squares-2-biggest-of-3-numbers.forth

3 5 4 sqsum ok 
. 41 ok 
3 4 4 sqsum . 32 ok 
3 -4 4 sqsum . 25 ok