1 ! PR tree-optimization/51058
3 subroutine pr51058(n, u, v, w, z)
4 double precision :: x(3,-2:16384), y(3,-2:16384), b, u, v, w, z
8 b = u * int(x(1,i)) + sign(z,x(1,i))
11 b = v * int(x(2,i)) + sign(z,x(2,i))
14 b = w * int(x(3,i)) + sign(z,x(3,i))
20 ! { dg-final { cleanup-tree-dump "vect" } }