TIntrSegment2Segment2::SetSegment1