#!/bin/tcsh

start_over:

echo "------------------"
echo -n "Enter a number to square: "
set start = "$<"

set answer = `subroutine $start`

echo "The answer is: $answer"

echo "------------------"

goto start_over