Recursion

Foirtran 77 does not allow recursion by default.