Define DEFENSE-P as a generic function.
Comment-out WIP, so that this thing loads.