a = [0,2,4,6,1,3,5,7] b = [6,5,4,3,2,3,4,5] c = [-1,-1,-1,-1,-1,-1,-1,-1]
!HPF$ INDEPENDENT FORALL ( j = 1:3 ) a(j) = a(b(j)) c(a(j)) = a(j)*b(a(j)) END FORALL