***********************
* Main script
***********************

rc = gsfallow("on")

iVal = 1

  say 'iVal = 'iVal
  say 'Making Call to GrADS script function "add1"'

oVal = add1(iVal)

  say 'Call Made - Checking for Answer'

  say 'oVal = 'oVal
