Lines Matching defs:lbound
3863 index * stride + lbound(e, dim). */
3872 gfc_expr *lbound, *nindex;
3898 lbound = gfc_copy_expr (ar->start[i]);
3899 if (lbound->ts.kind != gfc_index_integer_kind)
3905 gfc_convert_type (lbound, &ts, 2);
3931 is the lbound of a full ref. */
3973 lbound = get_array_inq_function (GFC_ISYM_LBOUND, lbound_e,
3981 ar->start[i] = get_operand (INTRINSIC_PLUS, nindex, lbound);
4088 c(i * stride(c,1) + lbound(c,1), j * stride(c,2) + lbound(c,2)) =
4089 c(i * stride(c,1) + lbound(c,1), j * stride(c,2) + lbound(c,2)) +
4090 a(i * stride(a,1) + lbound(a,1), k * stride(a,2) + lbound(a,2)) *
4091 b(k * stride(b,1) + lbound(b,1), j * stride(b,2) + lbound(b,2))
Indexes created Tue May 05 00:25:04 UTC 2026