2  * Copyright (c) 2008-2024 Stefan Krah. All rights reserved.
54     mpd_size_t idest, isrc;  in std_trans()  local
58         isrc = r * cols;  in std_trans()
61             dest[idest] = src[isrc];  in std_trans()
62             isrc += 1;  in std_trans()
69  * Swap half-rows of 2^n * (2*2^n) matrix.
99     m = cols - 1;  in swap_halfrows_pow2()
116             stride = (offset + b < cols/2) ? b : cols/2-offset;  in swap_halfrows_pow2()
148 /* In-place transpose of a square matrix */
153     mpd_size_t idest, isrc;  in squaretrans()  local
158         isrc = r*cols + c;  in squaretrans()
161             tmp = buf[isrc];  in squaretrans()
162             buf[isrc] = buf[idest];  in squaretrans()
164             isrc += 1;  in squaretrans()
242  * In-place transposition of a 2^n x 2^n or a 2^n x (2*2^n)