fact: Definition locally_coherent I A (M:family I A) (i:I) (u:I->A) := coherent M (inverse (family_r M) i) u.
imports: TLC(LibTactics LibLogic LibReflect LibEpsilon LibInt LibProd LibSum LibOperation LibRelation LibWf LibOrder LibMin)