cnoop (ada)