(truth
(eval `(store isaac ,isaac))
(delete2 isaac)
(delete2 isaac)
(eval `(store oscar ,oscar))
(eval `(store pat ,pat))
(delete2 matilda)
)