Start Coalescence-full-interface.for,
adapt from Sheet-retraction.for