improve FiniteComplete.agda