Function contextWithSTM

packages/effect/src/internal/stm/core.ts:420–422

(
  f: (environment: Context.Context<R0>) => STM.STM<A, E, R>
)

/** @internal */
export const contextWithSTM = <R0, A, E, R>(
  f: (environment: Context.Context<R0>) => STM.STM<A, E, R>
): STM.STM<A, E, R0 | R> => flatMap(context<R0>(), f)

/** @internal */
export class STMDriver<in out R, out E, out A> {