The RETURN statement returns the value of the GARKHPRC function.

      return (garkhprc);
   endsub;