[coq] extend case insertion to CoInductive