Lines Matching defs:f31
266 GFC_COMPLEX_17 f11, f12, f21, f22, f31, f32, f41, f42,
383 f31 = c[i + 2 + j * c_dim1];
410 f31 += t1[l - ll + 1 + ((i - ii + 3) << 8) - 257]
435 c[i + 2 + j * c_dim1] = f31;
482 f31 = c[i + 2 + j * c_dim1];
491 f31 += t1[l - ll + 1 + ((i - ii + 3) << 8) -
498 c[i + 2 + j * c_dim1] = f31;
836 GFC_COMPLEX_17 f11, f12, f21, f22, f31, f32, f41, f42,
953 f31 = c[i + 2 + j * c_dim1];
980 f31 += t1[l - ll + 1 + ((i - ii + 3) << 8) - 257]
1005 c[i + 2 + j * c_dim1] = f31;
1052 f31 = c[i + 2 + j * c_dim1];
1061 f31 += t1[l - ll + 1 + ((i - ii + 3) << 8) -
1068 c[i + 2 + j * c_dim1] = f31;