pif_list_contains
if(item1 != -1 && !pif_list_contains(shpif, item1))
if(item2 != -1 && !pif_list_contains(shpif, item2))
if(item3 != -1 && !pif_list_contains(shpif, item3))
if(item4 != -1 && !pif_list_contains(shpif, item4))
unit_assert(!pif_list_contains(shpif, p1));
if(p1 != 1) unit_assert(pif_list_contains(shpif, 1));
if(p1 != 2) unit_assert(pif_list_contains(shpif, 2));
if(p1 != 3) unit_assert(pif_list_contains(shpif, 3));
if(p1 != 4) unit_assert(pif_list_contains(shpif, 4));
unit_assert(!pif_list_contains(shpif, p1));
unit_assert(!pif_list_contains(shpif, p2));
if(p1 != 1 && p2 != 1) unit_assert(pif_list_contains(shpif, 1));
if(p1 != 2 && p2 != 2) unit_assert(pif_list_contains(shpif, 2));
if(p1 != 3 && p2 != 3) unit_assert(pif_list_contains(shpif, 3));
if(p1 != 4 && p2 != 4) unit_assert(pif_list_contains(shpif, 4));
unit_assert(pif_list_contains(shpif, p1));
unit_assert(pif_list_contains(shpif, p2));
unit_assert(!pif_list_contains(shpif, p1));
unit_assert(!pif_list_contains(shpif, p2));
unit_assert(!pif_list_contains(shpif, p3));
unit_assert(pif_list_contains(shpif, 1));
unit_assert(pif_list_contains(shpif, 2));
unit_assert(pif_list_contains(shpif, 3));
unit_assert(pif_list_contains(shpif, 4));
unit_assert(pif_list_contains(shpif, p1));
unit_assert(pif_list_contains(shpif, p2));
unit_assert(pif_list_contains(shpif, p3));
unit_assert(!pif_list_contains(shpif, 1));
unit_assert(!pif_list_contains(shpif, 2));
unit_assert(!pif_list_contains(shpif, 3));
unit_assert(!pif_list_contains(shpif, 4));
unit_assert(pif_list_contains(shpif, 1));
unit_assert(pif_list_contains(shpif, 2));
unit_assert(pif_list_contains(shpif, 3));
unit_assert(pif_list_contains(shpif, 4));