/ Reader / withReader
withReader
1  λ(r : Type) → ./../ReaderT/withReader r ./../Identity/Type