From: Luis on
Dear all,

In order to avoid division by zero I have write the flowing simply
code :

divideWithThreoshold[ai_,bi_]:= If[bi<0.1,0,ai/bi] ;
DivideWithThreoshold[a_,b_]:= MapThread[divideWithThreoshold,{a,b}]

Since I have to apply this operation to very large lists, can give me
some suggestion how to optimize this code? Any other optimize way to
do this task?

All my best,
Luis