I'm losing sight of what is supposed to be true or false. Anyway, back to the original spousal revelation golfed down a bit.

$=-1,-1,-1,0,-1
IIf(Ascan($array,0)=-1,T,F)