Come restituire un valore per una funzione in TI-89?

Question

Questa è la mia funzione per calcolare il GCD di due numeri a e b. Quando uso PRGM e Endprgm, ha funzionato bene. Tuttavia, ha continuato a fare un messaggio di errore dire "non valido in una funzione o espressione corrente" quando si crea una funzione :(. Qualche idea?

gcd(a, b )
Func 
 If a>b Then
  a->t
  b->a
  t->b
 EndIf

 While b#0
  a->t
  b->a
  mod(t, b)->b 
 EndWhile
 Return a
EndFunc