case Intrv_Similar :
Tins.FuseAtStart(myInter(index).Start(),
myInter(index).TolStart()); // modifier le debut
+ Standard_FALLTHROUGH
case Intrv_JustEnclosingAtEnd :
Tins.FuseAtEnd (myInter(index).End (),
myInter(index).TolEnd ()); // modifier la fin
+ Standard_FALLTHROUGH
case Intrv_Enclosing :
myInter.Remove(index); // detruire et
index--; // continuer