From da75ad2066aa9957747bc73f4b1bdab3f8842b02 Mon Sep 17 00:00:00 2001
From: vinassefranche <vincent.francois@inato.com>
Date: Tue, 18 Oct 2022 09:17:30 +0200
Subject: [PATCH 1/2] Add RTE.fromReaderIO

---
 src/ReaderTaskEither.ts  | 6 ++++++
 test/ReaderTaskEither.ts | 4 ++++
 2 files changed, 10 insertions(+)

diff --git a/src/ReaderTaskEither.ts b/src/ReaderTaskEither.ts
index 0469f39a9..c18d4d655 100644
--- a/src/ReaderTaskEither.ts
+++ b/src/ReaderTaskEither.ts
@@ -238,6 +238,12 @@ export const fromIOEither: <E, A, R = unknown>(fa: IOEither<E, A>) => ReaderTask
 export const fromReaderEither: <R, E, A>(fa: ReaderEither<R, E, A>) => ReaderTaskEither<R, E, A> = (ma) =>
   flow(ma, TE.fromEither)
 
+/**
+ * @category conversions
+ * @since 2.13.2
+ */
+export const fromReaderIO: <R, A, E = never>(fa: ReaderIO<R, A>) => ReaderTaskEither<R, E, A> = R.map(TE.fromIO)
+
 /**
  * @category pattern matching
  * @since 2.10.0
diff --git a/test/ReaderTaskEither.ts b/test/ReaderTaskEither.ts
index 9e9907148..2660fd340 100644
--- a/test/ReaderTaskEither.ts
+++ b/test/ReaderTaskEither.ts
@@ -244,6 +244,10 @@ describe('ReaderTaskEither', () => {
     U.deepStrictEqual(await _.fromIOEither(() => E.left('error'))({})(), E.left('error'))
   })
 
+  it('fromReaderIO', async () => {
+    U.deepStrictEqual(await _.fromReaderIO(RIO.of(1))({})(), E.right(1))
+  })
+
   it('fold', async () => {
     const fold = _.fold(
       (l: string) => R.of(T.of(l.length)),

From a0172466e96844cd31238c3c7de0f20807feb660 Mon Sep 17 00:00:00 2001
From: vinassefranche <vincent.francois@inato.com>
Date: Tue, 18 Oct 2022 09:18:53 +0200
Subject: [PATCH 2/2] Add doc

---
 docs/modules/ReaderTaskEither.ts.md | 11 +++++++++++
 1 file changed, 11 insertions(+)

diff --git a/docs/modules/ReaderTaskEither.ts.md b/docs/modules/ReaderTaskEither.ts.md
index a245274a9..bb1ff1acc 100644
--- a/docs/modules/ReaderTaskEither.ts.md
+++ b/docs/modules/ReaderTaskEither.ts.md
@@ -38,6 +38,7 @@ Added in v2.0.0
   - [fromOption](#fromoption)
   - [fromReader](#fromreader)
   - [fromReaderEither](#fromreadereither)
+  - [fromReaderIO](#fromreaderio)
   - [fromTask](#fromtask)
   - [fromTaskEither](#fromtaskeither)
   - [toUnion](#tounion)
@@ -446,6 +447,16 @@ export declare const fromReaderEither: <R, E, A>(fa: ReaderEither<R, E, A>) => R
 
 Added in v2.0.0
 
+## fromReaderIO
+
+**Signature**
+
+```ts
+export declare const fromReaderIO: <R, A, E = never>(fa: RIO.ReaderIO<R, A>) => ReaderTaskEither<R, E, A>
+```
+
+Added in v2.13.2
+
 ## fromTask
 
 **Signature**