i) H(i+1) . . . H(i+ib-1) */
            lapackf77_zlarft( MagmaForwardStr, MagmaColumnwiseStr,
                              &rows, &ib,
                              work<span class="strike"><span class="old">(i)</span></span>, &ldwork, tau+i, hwork, &ib );
            
            /* Put 0s in the upper triangular part of a panel (and 1s on the
               diagonal); copy the upper triangular <span class="strike"><span class="old">in</span></span><span class="new">to</span> ut and invert it. */
      