Hi everyone,

just for completeness if one is interested in speed:

l1 = RandomReal[1, 100000] - 0.5; l2 = RandomReal[1, 100000] - 0.5;
AbsoluteTiming[Positive[(l1 - l2)]]

where

AbsoluteTiming[Thread[l1 > l2]]

Speed might not be an issue though...

Cheers,

Marco

PS: For all the different approaches that Sander lists the respective values are:

How about:

l1 = RandomInteger[2, 10];
l2 = RandomInteger[1, 10];
Thread[l1 > l2] /. {False -> "FAIL", True -> "PASS"}
(* Out (e.g.):   {"FAIL","FAIL","FAIL","PASS","PASS","PASS","FAIL","PASS","PASS", "PASS"}  *)

Note that you can do it in more than 1 way:

list1={1,2,3}
list2={2.5,2,1.5}
Thread[list1<list2]
Map[#[[1]]<#[[2]]&,{list1,list2}\[Transpose]]
Apply[#1<#2&,{list1,list2}\[Transpose],{1}]
Apply[Less,{list1,list2}\[Transpose],{1}]
Less@@@({list1,list2}\[Transpose])
MapThread[Less,{list1,list2}]
Table[list1[[i]]<list2[[i]],{i,Length[list1]}]

I came up with these ways! and there are probably more!

Thank you, exactly this I was looking for ...I tried "Map", "Scan+Print", "Condition" etc.

You can use the command Thread, try:

l1 = {a, b, c, d}; l2 = {e, f, g, h};
Thread[l1 > l2]
(* Out:   {a>e,b>f,c>g,d>h} *)

Regards -- Henrik