------- Comment #2 from pault at gcc dot gnu dot org 2007-11-18 19:09 ------- (In reply to comment #1) > How about this: > > if (any(abs(ptr3 - (/cos(1.0_4), cos(3.0_4)/)).gt. 1e-05)) call abort () >
Jerry, Looks "obvious" to me... Cheers Paul -- http://gcc.gnu.org/bugzilla/show_bug.cgi?id=34139