Corrected error in findtc routine