fact: Definition rtl (T : ml_type) (param : loc (ml_rlist T)) : M (loc (ml_rlist T)) := do v <- cget param; Ret (match v with Nil => param | Cons _ t => t end).
imports: ZArith mathcomp(all_ssreflect) infotheo(ssrZ) monad_model HB(structures) monae_lib hierarchy monad_lib typed_store_lib