src/deck.m: using pred for (det_)draw_card(s)