⊦ r =>_ = _∃(λ ce. r => ce)
cf(r) = a × r0 ⊦ (o[_∃(λ ce. r => ce)] * R)[rs, cf, af] ↔ (o[r => a × r0] * R)[rs, cf, af]
Used terms: r