pub open spec fn swap4_1<A, B, C, D>(i: (B, (A, (C, D)))) -> (A, (B, (C, D)))
{ (i.1.0, (i.0, i.1.1)) }