Module spred. Section spred.
Variables x y z : spred.
Local Open Scope pred.

Lemma list_denote_intersection_filter_nonreflex:
forall(B:spred) (l:list pure_atom),
list_denote pure_atom_denote (@andp state) B l =
list_denote pure_atom_denote (@andp state) B (filter nonreflex_atom l).