tgex2 - Robuta Search

https://www.intel.com/content/www/us/en/docs/onemkl/developer-reference-fortran/2023-0/tgex2.html ?tgex2 Swaps adjacent diagonal blocks in an upper (quasi) triangular matrix pair by an orthogonal/unitary equivalence transformation.