Searched refs:absX (Results 1 - 1 of 1) sorted by relevance

/haiku-buildtools/gcc/gcc/fortran/
H A Dtrans-intrinsic.c3450 absX = abs(x(i))
3451 if (absX > scale)
3453 val = scale/absX;
3455 scale = absX;
3459 val = absX/scale;
3463 tree res1, res2, cond, absX, val; local
3468 absX = gfc_create_var (type, "absX");
3469 gfc_add_modify (&ifblock1, absX,
3478 absX));
[all...]

Completed in 96 milliseconds