Section 3.1.4 - The “Handshake” 2-Links

It is possible that the caps here are placed on the wrong ends of strands!

(Subscript[R, s]^(+))[1,l](Subscript[R, s]^(+))[2,r] // dm[2,l,l] // dm[1,r,r] // hη[l] // hη[r]

(Subscript[R, s]^(+))[1,l](Subscript[R, s]^(-))[2,r] // dm[2,l,l] // dm[1,r,r] // hη[l] // hη[r]

(Subscript[R, s]^(-))[1,l](Subscript[R, s]^(+))[2,r] // dm[2,l,l] // dm[1,r,r] // hη[l] // hη[r]

(Subscript[R, s]^(-))[1,l](Subscript[R, s]^(-))[2,r] // dm[2,l,l] // dm[1,r,r] // hη[l] // hη[r]