ZIO-Direct - Functional Scala 2022

IMPERATIVE
ZIO PROGRAMMING
By Alexander Ioffe
@deusaquilus

Is Functional Programming
Easy?

Is Functional Programming
(With Effect Systems)
Easy?

IMPERATIVE
SEQUENCING
val textA = read(fileA)
val textB = read(fileB)
write(fileC, textA + textB)
def read(file: File): String
def write(file: File, content: String): Unit

IMPERATIVE FUNCTIONAL
SEQUENCING
def read(file: File):
ZIO[Any, Throwable, String]
def write(file: File, content: String):
ZIO[Any, Throwable, Unit]

SEQUENCING
read(fileA).flatMap { textA =>
read(fileB).flatMap { textB =>
}
}

SEQUENCING
for {
textA <- read(fileA)
textB <- read(fileB)
_ <- write(fileC, textA + textB)
} yield ()
FOR COMPREHENSIONS TO THE RESCUE

SEQUENCING
for {
} yield ()
FOR COMPREHENSIONS TO THE RESCUE
For-Comprehension
All the things!

IMPERATIVE
BRANCHING
val rows: List[Row] = ...
val db = Database.open()
if (db.transactionsEnabled() && db.lazyFetchEnabled()) {
db.bulkInsert(rows)
}
class Database {
def transactionsEnabled(): Boolean
def lazyFetchEnabled(): Boolean
def bulkInsert(row: List[Row]): Unit
}

BRANCHING FOR COMPREHENSIONS TO THE RESCUE?
class Database {
def transactionsEnabled(): ZIO[Any, Throwable, Boolean]
def lazyFetchEnabled(): ZIO[Any, Throwable, Boolean]
def bulkInsert(row: List[Row]): ZIO[Any, Throwable, Unit]
}
db.bulkInsert(rows)
}
for {
db <- Database.open
te <- db.transactionsEnabled()
lf <- db.lazyFetchEnabled()
_ <- {
if (te && lf)
db.bulkInsert(rows)
else
ZIO.unit
}
} yield ()
Why am I fetching
properties I might
never use???
class Database {
}

BRANCHING FOR COMPREHENSIONS TO THE RESCUE?
class Database {
}
db.bulkInsert(rows)
}
class Database {
}
Database.open().flatMap { db =>
db.transactionsEnabled().flatMap { te =>
if (te)
db.lazyFetchEnabled().flatMap { lf =>
if (lf)
db.bulkInsert(rows)
else
ZIO.unit
}
else
ZIO.unit
}
}
Back to This???

LOOPING
class File {
def readLine(): String
def close(): Unit
}
var line: String = file.readLine()
while (line != null) {
buffer.append(line)
line = file.readLine()
}

THE PROGRAM... OR YOUR MIND?
class File {
def close(): Unit
}
buffer.append(line)
}
class File {
def readLine(): ZIO[Any, Throwable, String]
def close(): ZIO[Any, Throwable, Unit]
}
file.readLine().flatMap { line0 =>
var line = line0
def whileFun(): ZIO[Any, Throwable, Unit] =
if (line != null)
buffer.append(line)
file.readLine().flatMap { lineN =>
line = lineN
whileFun()
}
else
ZIO.unit
whileFun()
Wait... there are actually cases
where WHILE is not reducible to
simple iteration examples???
LOOPING

def whileFun(): Unit =
if (line != null) {
buffer.append(line)
whileFun()
} else {
()
}
class File {
def close(): Unit
}
class File {
}
var line = line0
if (line != null)
buffer.append(line)
line = lineN
whileFun()
}
else
ZIO.unit
whileFun()
THE PROGRAM... OR YOUR MIND?
LOOPING

LOOPING
def higherFunction(file: File) = {
def whileFun(): Unit =
if (line != null) {
buffer.append(line)
whileFun()
} else {
()
}
}
P.S. NOT ACTUALLY USING GLOBALLY MUTABLE STATE!
class File {
def close(): Unit
}
class File {
}
def higherFunction(file: File) = {
var line = line0
if (line != null)
buffer.append(line)
line = lineN
whileFun()
}
else
ZIO.unit
whileFun()
}

IMPERATIVE
ERROR HANDLING EXPECT THE (MILDLY) UNEXPECTED
var file: JsonFile = JsonFile.from(path)
try {
file =
file.readToJson()
} catch {
case e: IOException => handleIO(e)
case e: DecodingException => handleDE(e)
} finally {
file.close()
}
class JsonFile {
def readToJson(): Json
def close(): Unit
}
object JsonFile {
def from(path: String): JsonFile
}

ERROR HANDLING EXPECT THE (MILDLY) UNEXPECTED
var file: JsonFile = JsonFile.from(path)
try {
file =
file.readToJson()
} catch {
} finally {
file.close()
}
succeed(JsonFile.from(path)).flatMap { jsonFile =>
jsonFile.readToJson()
}.catchSome {
}.ensuring {
jsonFile.close().orDie
}
class JsonFile {
def readToJson(): ZIO[Any, Throwable, Json]
}
object JsonFile {
}
class JsonFile {
def close(): Unit
}
object JsonFile {
}

Once upon a time... IN JAVA 101
if (
db.transactionsEnabled() &&
db.lazyFetchEnabled()
)
db.bulkInsert(rows)
}
buffer.append(line)
}
try {
file = JsonFile.open(path)
file.readToJson()
} catch {
} finally {
file.close()
}

But these don't scale
if (
)
db.bulkInsert(rows)
}
buffer.append(line)
}
val file = JsonFile.from(path)
try {
file.readToJson()
} catch {
} finally {
file.close()
}

if (
)
db.bulkInsert(rows)
}
buffer.append(line)
}
try {
file.readToJson()
} catch {
} finally {
file.close()
}
SO WE NEED THESE...
var line = line0
if (line != null)
buffer.append(line)
line = lineN
whileFun()
}
else
ZIO.unit
whileFun()
if (te)
if (lf)
db.bulkInsert(rows)
else
ZIO.unit
}
else
ZIO.unit
}
}.catchSome {
}.ensuring {
}
for {
} yield ()

if (
)
db.bulkInsert(rows)
}
buffer.append(line)
}
try {
file.readToJson()
} catch {
} finally {
file.close()
}
OR DO They?
var line = line0
if (line != null)
buffer.append(line)
line = lineN
whileFun()
}
else
ZIO.unit
whileFun()
if (te)
if (lf)
db.bulkInsert(rows)
else
ZIO.unit
}
else
ZIO.unit
}
for {
} yield ()
}.catchSome {
}.ensuring {
}

if (
)
db.bulkInsert(rows)
}
buffer.append(line)
}
try {
file.readToJson()
} catch {
} finally {
file.close()
}
var line = line0
if (line != null)
buffer.append(line)
line = lineN
whileFun()
}
else
ZIO.unit
whileFun()
if (te)
if (lf)
db.bulkInsert(rows)
else
ZIO.unit
}
else
ZIO.unit
}
for {
} yield ()
WHAT IF I OLD YOU THAT
MONADIC SYNTAX IS JUST
INCIDENTAL COMPLEXITY?
}.catchSome {
}.ensuring {
}

if (
)
db.bulkInsert(rows)
}
buffer.append(line)
}
try {
file.readToJson()
} catch {
} finally {
file.close()
}
var line = line0
if (line != null)
buffer.append(line)
line = lineN
whileFun()
}
else
ZIO.unit
whileFun()
if (te)
if (lf)
db.bulkInsert(rows)
else
ZIO.unit
}
else
ZIO.unit
}
for {
} yield ()
}.catchSome {
}.ensuring {
}
Imperative coding
is easy.
Write imperative style, translate
to Functional!
Functional code is
scaleable.

if (
)
db.bulkInsert(rows)
}
buffer.append(line)
}
try {
file.readToJson()
} catch {
} finally {
file.close()
}
var line = line0
if (line != null)
buffer.append(line)
line = lineN
whileFun()
}
else
ZIO.unit
whileFun()
if (te)
if (lf)
db.bulkInsert(rows)
else
ZIO.unit
}
else
ZIO.unit
}
for {
} yield ()
Monadless
}.catchSome {
}.ensuring {
}

RE-WRITING SEQUENCES FROM THIS... TO THIS!
FUNCTIONAL
IMPERATIVE
}
}

FUNCTIONAL
IMPERATIVE
}
}
RE-WRITING SEQUENCES MAKE TO LOOK LIKE IMPERATIVE

FUNCTIONAL
IMPERATIVE
}
}
write(fileC, textA + textB) :ZIO[..String]
:ZIO[..String]
:ZIO[..Unit]
RE-WRITING SEQUENCES ...BUT TYPE LIKE FUNCTINOAL

RE-WRITING SEQUENCES
FUNCTIONAL
IMPERATIVE
val textA = run(read(fileA))
val textB = run(read(fileB))
run(write(fileC, textA + textB))
PRESTO-CHANGE-OH
}
}
write(fileC, textA + textB) :String
:String
:Unit

FUNCTIONAL
IMPERATIVE
}
}
THE RABIT IN THE HAT
:String
:String
:Unit

FUNCTIONAL
IMPERATIVE
defer {
}
}
}
RE-WRITING SEQUENCES RUN MACRO, WRAP IN A BOW

FUNCTIONAL
IMPERATIVE
defer {
}
}
}
:ZIO[Any, Throwable, Unit]
RUN MACRO, WRAP IN A BOW

FUNCTIONAL
IMPERATIVE
}
}
defer {
}
FEEL IMPERATIVE ACT FUNCTIONALLY
THAT'S ALL FOLKS

RE-WRITING SEQUENCES P.S. BETTER LIKE THIS
FUNCTIONAL
IMPERATIVE
defer {
val textA = read(fileA).run
val textB = read(fileB).run
write(fileC, textA + textB).run
}
}
}

RE-WRITING BRANCHING START WITH IMPERATIVE STYLE
FUNCTIONAL
IMPERATIVE
class Database {
}
if (
) {
db.bulkInsert(rows)
}
class Database {
}
if (te)
if (lf)
db.bulkInsert(rows)
else
ZIO.unit
}
else
ZIO.unit
}
}
if (
) {
db.bulkInsert(rows)
}

FUNCTIONAL
IMPERATIVE
class Database {
}
defer {
val db = Database.open().run
if (
db.transactionsEnabled().run &&
db.lazyFetchEnabled().run
) {
db.bulkInsert(rows).run
}
}
if (
) {
db.bulkInsert(rows)
}
class Database {
}
if (te)
if (lf)
db.bulkInsert(rows)
else
ZIO.unit
}
else
ZIO.unit
}
}
RE-WRITING BRANCHING START WITH IMPERATIVE STYLE... THEN DEFER AND RUN!

FUNCTIONAL
IMPERATIVE
RE-WRITING LOOPING START WITH IMPERATIVE STYLE... THEN DEFER AND RUN!
class File {
def close(): Unit
}
buffer.append(line)
}
class File {
}
var line = line0
if (line != null)
buffer.append(line)
line = lineN
whileFun()
}
else
ZIO.unit
whileFun()

FUNCTIONAL
IMPERATIVE
class File {
def close(): Unit
}
buffer.append(line)
}
class File {
}
var line = line0
if (line != null)
buffer.append(line)
line = lineN
whileFun()
}
else
ZIO.unit
whileFun()
buffer.append(line)
}

FUNCTIONAL
IMPERATIVE
defer {
var line: String = file.readLine().run
buffer.append(line)
line = file.readLine().run
}
}
class File {
def close(): Unit
}
buffer.append(line)
}
class File {
}
var line = line0
if (line != null)
buffer.append(line)
line = lineN
whileFun()
}
else
ZIO.unit
whileFun()

FUNCTIONAL
IMPERATIVE
defer {
val line0 = file.readLine().run
var line: String = line0
buffer.append(line)
val lineN = file.readLine().run
line = lineN
}
}
class File {
def close(): Unit
}
buffer.append(line)
}
class File {
}
var line = line0
if (line != null)
buffer.append(line)
line = lineN
whileFun()
}
else
ZIO.unit
whileFun()

FUNCTIONAL
IMPERATIVE
defer {
buffer.append(line)
line = lineN
}
}
class File {
def close(): Unit
}
buffer.append(line)
}
class File {
}
var line = line0
if (line != null)
buffer.append(line)
line = lineN
whileFun()
}
else
ZIO.unit
whileFun()

RE-WRITING ERROR HANDLING EXPECT THE (MILDLY) UNEXPECTED
try {
file.readToJson()
} catch {
} finally {
file.close()
}
class JsonFile {
}
object JsonFile {
}
class JsonFile {
def close(): Unit
}
object JsonFile {
def open(path: String): JsonFile
}
FUNCTIONAL
IMPERATIVE
succeed(JsonFile.from(path))
.flatMap { file =>
file.readToJson().catchSome {
}.ensuring {
file.close().orDie
}

FUNCTIONAL
IMPERATIVE
try {
file.readToJson()
} catch {
} finally {
file.close()
}
class JsonFile {
}
object JsonFile {
}
class JsonFile {
def close(): Unit
}
object JsonFile {
}
val file: JsonFile = JsonFile.from(path)
try {
file.readToJson()
} catch {
} finally {
file.close()
}
.flatMap { file =>
}.ensuring {
file.close().orDie
}

FUNCTIONAL
IMPERATIVE
defer {
try {
file.readToJson().run
} catch {
case e: IOException => handleIO(e).run
case e: DecodingException => handleDE(e).run
} finally {
file.close().run
}
}
try {
file.readToJson()
} catch {
} finally {
file.close()
}
.flatMap { file =>
}.ensuring {
file.close().orDie
}
class JsonFile {
}
object JsonFile {
}
class JsonFile {
def close(): Unit
}
object JsonFile {
} FEEL IMPERATIVE ACT FUNCTIONALLY

var line = line0
if (line != null)
buffer.append(line)
line = lineN
whileFun()
}
else
ZIO.unit
whileFun()
if (te)
if (lf)
db.bulkInsert(rows)
else
ZIO.unit
}
else
ZIO.unit
}
Monadless
}.catchSome {
}.ensuring {
}
}
}
defer {
try {
} catch {
} finally {
file.close().run
}
}
defer {
if (
) {
}
}
defer {
val textA = read(fileA).run
val textB = read(fileB).run
write(fileC, textA + textB).run
}
defer {
buffer.append(line)
line = lineN
}
}

async {
try {
file.readToJson().await
} catch {
case e: IOException => handleIO(e).await
case e: DecodingException => handleDE(e).await
} finally {
file.close().await
}
}
async {
val db = Database.open().await
if (
db.transactionsEnabled().await &&
db.lazyFetchEnabled().await
) {
db.bulkInsert(rows).await
}
}
async {
val textA = read(fileA).await
val textB = read(fileB).await
write(fileC, textA + textB).await
}
async {
val line0 = file.readLine().await
buffer.append(line)
val lineN = file.readLine().await
line = lineN
}
}
ISN'T THIS ASYNC-AWAIT ?
defer {
val p = List(joe, jack, jill).run
val a = p.addresses.run
(p, a)
}
defer {
val p =
query[Person].run
val a =
query[Address].filter(a.fk == p.id).run
(p, a)
}
Works for Collections! Works for Queries!

async {
try {
file.readToJson().await
} catch {
case e: IOException => handleIO(e).await
case e: DecodingException => handleDE(e).await
} finally {
file.close().await
}
}
async {
val db = Database.open().await
if (
db.transactionsEnabled().await &&
db.lazyFetchEnabled().await
) {
db.bulkInsert(rows).await
}
}
async {
val textA = read(fileA).await
val textB = read(fileB).await
write(fileC, textA + textB).await
}
async {
val line0 = file.readLine().await
buffer.append(line)
val lineN = file.readLine().await
line = lineN
}
}
NO
defer {
val p = List(joe, jack, jill).run
(p, a)
}
defer {
val p =
query[Person].run
val a =
query[Address].filter(a.fk == p.id).run
(p, a)
}
Works for Collections! Works for Queries!

Wouldn't Everyone want this?
defer {

ZIO-Direct - Functional Scala 2022

buffer.append(line)
line = lineN
}
}
defer {
}
defer {
if (
) {
}
}
defer {
try {
} catch {
} finally {
file.close().run
}
}
SUPPORTS THESE
and...

defer {
buffer.append(line)
line = lineN
}
}
defer {
}
defer {
if (
) {
}
}
defer {
try {
} catch {
} finally {
file.close().run
}
}
getWebsites()
.flatMap { websites =>
ZIO.foreach(websites)(
postUpdate(_)
)
}
for (site <- getWebsites()) {
postUpdate(site)
}
FOR-LOOP
IMPERATIVE TRANSLATION

defer {
buffer.append(line)
line = lineN
}
}
defer {
}
TRANSLATION
defer {
if (
) {
}
}
defer {
try {
} catch {
} finally {
file.close().run
}
}
getWebsites()
ZIO.foreach(websites)(
postUpdate(_)
)
}
IMPERATIVE
FOR
defer {
for (site <- getWebsites().run) {
postUpdate(site).run
}
}

defer {
buffer.append(line)
line = lineN
}
}
defer {
}
TRANSLATION
defer {
if (
) {
}
}
defer {
try {
} catch {
} finally {
file.close().run
}
}
getWebsites()
ZIO.foreachPar(websites)(
postUpdate(_)
)
}
IMPERATIVE
FOR
defer(Params(Collect.Parallel)) {
for (site <- getWebsites().run) {
postUpdate(site).run
}
}

ZIO-Tailored
Features
Error
Channels
Transparency
of Rewrite
Logic
ZIO-DIRECT
Direct Programming tailored to ZIO
Correctness
Using
Refs
{x ⟺ y}
1 2 3
4 5

val out: ZIO[CustomerConfig & DistributorConfig, Throwable, (Customer, Distributor)] =
defer {
val custUrl: String = ZIO.service[CustomerConfig].run.url
val distUrl: String = ZIO.service[DistributorConfig].run.url
(parseCustomer(httpGet(custUrl).run), parseDistrubutor(httpGet(distUrl).run))
}
ZIO-DIRECT
Direct Programming tailored to ZIO
def httpGet(url: String): ZIO[Any, Throwable, String]
def parseCustomer(customer: String): Customer
def parseDistrubutor(customer: String): Distributor
case class CustomerConfig(url: String)
case class DistributorConfig(url: String)

val out: ZIO[CustomerConfig & DistributorConfig, Throwable, (Customer, Distributor)] =
defer {
}
ZIO-DIRECT
Environment? Composes!
API
def httpGet(url: String): ZIO[Any, Throwable, String]

val out: ZIO[CustomerConfig & DistributorConfig, IOException, (Customer, Distributor)] =
defer {
}
def httpGet(url: String): ZIO[Any, IOException, String]
ZIO-DIRECT
Errors? Compose!
API

val out: ZIO[..., CustomerGetException | DistributorGetException, (...)] =
defer {
(parseCustomer(httpGetCustomer(custUrl).run), parseDistrubutor(httpGetDistributor(distUrl).run))
}
def httpGetCustomer(url: String): ZIO[Any, CustomerGetException, String]
def httpGetDistributor(url: String): ZIO[Any, DistrubutorGetException, String]
API
ZIO-DIRECT
Errors? Compose!

val out: ZIO[..., Exception, (...)] =
defer(Params(TypeUnion.LeastUpper)) {
(parseCustomer(httpGetCustomer(custUrl).run), parseDistrubutor(httpGetDistributor(distUrl).run))
}
def httpGetCustomer(url: String): ZIO[Any, CustomerGetException, String]
def httpGetDistributor(url: String): ZIO[Any, DistrubutorGetException, String]
API
ZIO-DIRECT
Errors? Compose... in Two Ways!

ZIO-DIRECT
Want to see it up close?

ZIO-DIRECT
Use defer.info
root> compile
...
[info] -- Info: /Users/me/zio-direct/src/test/scala-3.x/zio/direct/examples/TailoredForZio.scala:40:8
[info] 40 | val out =
[info] | ^
[info] |Computed Type: ZIO[CustomerConfig & DistributorConfig, CustomerGetException | DistrubutorGetException, Tuple2[Customer, Distributor]]

ZIO-DIRECT
root> compile
...
[info] | ^
Use defer.info

ZIO-DIRECT
Use defer.info or defer.verbose
root> compile
[info] | ^

ZIO-DIRECT
root> compile
[info] | ^
ZIO.service[CustomerConfig].map { (sm: CustomerConfig) =>
sm.url
}.flatMap { custUrl =>
...
}

ZIO-DIRECT
root> compile
[info] | ^
ZIO.service[CustomerConfig].map { (sm: CustomerConfig) =>
val runVal: CustomerConfig = sm
sm.url
}.flatMap { (v: String) =>
val custUrl: String = v
}

ZIO-DIRECT
root> compile
=== Reconstituted Code ========
ZIO.service[CustomerConfig].map(((sm: CustomerConfig) => {
val runVal: CustomerConfig = sm
runVal.url
})).asInstanceOf[ZIO[_, _, String]].flatMap(((v: String) => {
val custUrl: String = v
ZIO.service[DistributorConfig].map(((`sm₂`: DistributorConfig) => {
val `runVal₂`: DistributorConfig = `sm₂`
`runVal₂`.url
})).asInstanceOf[ZIO[_, _, String]].flatMap(((`v₂`: String) => {
val distUrl: String = `v₂`
ZIO.collectAll(Chunk.from(List.apply(httpGetCustomer(custUrl), httpGetDistributor(distUrl)))).map(((terms: Chunk[Any]) => {
val iter: Iterator[Any] = terms.iterator
{
val `runVal₃`: String = iter.next.asInstanceOf[String]
val `runVal₄`: String = iter.next.asInstanceOf[String]
Tuple2.apply(parseCustomer(`runVal₃`), parseDistrubutor(`runVal₄`))
}.asInstanceOf[Tuple2[Customer, Distributor]]
})).asInstanceOf[ZIO[_, _, Tuple2[Customer, Distributor]]]
}))
}))

ZIO-DIRECT

val out =
defer {
}
ZIO-DIRECT
Wait... how do you do that?
That's an arbitrary
construct...
how do you do that?

val out =
defer {
}
ZIO-DIRECT
Mystery Challenge... spot the IOs!
ZIO.service[CustomerConfig].flatMap { cc =>
val custUrl: String = cc.url
ZIO.service[DistributorConfig].flatMap { dc =>
val distUrl: String = dc.url
ZIO.collectAll(Chunk(httpGet(custUrl), (httpGet(distUrl)))).map { col =>
val iter = col.iterator
(parseCustomer(iter.next()), parseDistrubutor(iter.next()))
}
}
}

val out =
defer {
}
ZIO-DIRECT
Pull them out of the line body...
}
}
}

val out =
defer {
}
ZIO-DIRECT
Collect, iterate, and splice back in!
}
}
}

ZIO-DIRECT
If you have no mutable data structures
and no lazy actions... things in here
cannot interact between each other...
therefore, I can extract them!

ZIO-DIRECT
Things in defer blocks must be:
EAGER + IMMUTABLE
(unless they are wrapped in an effect)
CORRECTENESS
{x ⟺ y}

yes... it's very important! CORRECTNESS
defer(Params(Verify.None)) {
val db = Database.open.run
while (db.hasNextRow()) {
if (db.lockNextRow())
doSomethingWith(db.nextRow().run)
else
wait()
}
}
class Database {
def nextRow(): ZIO[Any, Throwable, Row]
def hasNextRow(): Boolean
def lockNextRow(): Boolean //somehow not an effect
}
API

else
wait()
}
}
class Database {
}
API
Database.open.flatMap { db =>
if (db.hasNextRow())
db.nextRow().flatMap { row =>
// Too late to check if row is locked, we already READ IT!!
if (db.lockNextRow()) doSomethingWith(row) else waitT()
whileFun()
}
else
ZIO.unit
whileFun()
}

else
wait()
}
}
class Database {
}
API
FunctionalObjectModel.Database.open.flatMap(((v: Database) => {
val db: Database = v
def whileFunc: ZIO[Any, Throwable, Unit] = if (db.hasNextRow) if (db.lockNextRow) db.nextRow.map(((sm: Row) => {
val runVal: Row = sm
FunctionalObjectModel.doSomethingWith(runVal)
})) else zio.ZIO.succeed(FunctionalObjectModel.waitT).flatMap(((`v₂`: Unit) => whileFunc)) else zio.ZIO.succeed(())
whileFunc
}))

while (ZIO.succeed(db.hasNextRow()).run) {
if (ZIO.succeed(db.lockNextRow()).run)
else
wait()
}
}
class Database {
}
API

Here's the thing you shouldn't do! CORRECTNESS
(db.lockNextRow(), db.nextRow().run)
FunctionalObjectModel.Database.open.flatMap(((v: Database) => {
val db: Database = v
db.nextRow.map(((sm: Row) => {
val runVal: Row = sm
Tuple2.apply(db.lockNextRow, runVal)
}))
}))

CORRECTNESS
val a = effectA.run
<expressions-using a>
val b = effectB.run
<expressions-using a, b>
val c = effectC.run
<expressions-using a, b, c>
effectA.flatMap { a =>
effectB.flatMap { b =>
effectC.flatMap {
}
}
}
The Basic Intuition

CORRECTNESS
val a = effectA.run
val b = effectB.run
val c = effectC.run
effectC.flatMap {
}
}
}
val a = effectA.run
val b = effectB.run
<expressions-using effectC.run, effectD.run>
foreach(effectC, effectD) { list =>
<expressions-using list.get(0), list.get(1)>
}
}
}
The Basic Intuition

CORRECTNESS
val a = effectA.run
val b = effectB.run
val c = effectC.run
val a = effectA.run
val b = effectB.run
}
}
}
The Basic Intuition
NO INTER-LINE INTERACTIONS
NO INTER-LINE INTERACTIONS
effectC.flatMap { c =>
}
}
}

CORRECTNESS
val a = effectA.run
val b = effectB.run
val c = effectC.run
}
}
}
val a = effectA.run
val b = effectB.run
}
}
}
The Basic Intuition
ALL INTERACTIONS HAPPEN DOWNWARD

CORRECTNESS
}
}
}
ZIO.foreach(effectC, effectD) { list =>
}
}
}
The Basic Intuition
SEQUENTIALITY =:= NESTING

CORRECTNESS
}
}
}
}
}
}
The Basic Intuition
for {
a <- effectA.run
_ = <expressions-using a>
b <- effectB.run
_ = <expressions-using a, b>
c <- effectC.run
} yield <expressions-using a, b, c>

CORRECTNESS
The Re-Write Rules
- If the statement already transformed e.g. defer { defer { ... } }:
- Chain it in a
fl
atMap and continue
- If statement is a try:
- Recurse on the body, then the catch clauses, then the
fi
nalizer if it exists.
- Chain all of them in nested
fl
atMaps (or maps if they have no run statements inside)
- If statement is a throw, or unsafe { ... } block:
- Chain it in a
fl
atMap (or map if it has run statements inside)
- If statement is an if, for-loop, or match statement
- Recurse on the pre
fi
x/condition and then the body statement(s).
- Chain both in
fl
atMaps (or maps if they have no run statements inside)
- If statement is a run call:
- Chain it in a
fl
atMap
- If statement is a block e.g. { a; b; c }
- Chain each clause in a
fl
atMap (or maps if it has no `run` statements inside)
- Otherwise if the statement has no vars, defs, classes mutable state, or any other forbidden construct:
- Extract each run call into a ZIO. collect
- Then splice in the iteration steps in each call-site.
- Chain the whole thing in a
fl
atMap

CORRECTNESS
Other Forbidden Things!
• lazy value declarations
• class declarations
• function declarations
• lambdas/closures
• implicit variables/functions
OTHER THINGS
FORBIDDEN IN
DEFER-CLAUSES
(Unless they are in the .run calls)

Constraints Certainty Capability
CORRECTNESS
NO lazy value declarations
NO class declarations
NO function declarations
NO lambdas/closures
NO implicit variables/functions
Cut-Points Work
Splicing Correct
Sequencing Correct
Generated Code Correct
Direct-Style Syntax
Language-Level Constructs

CORRECTNESS
Mutation... Forbidden!
var x = 1
defer.info {
({ x = x + 1; x }, ZIO.succeed(x).run)
}
> runMain
(2, 1) ...but why
not (2, 2)
???

CORRECTNESS
Mutable Collections... Forbidden!
> runMain
(2, 1)
defer.info {
({ buff.update(0, buff(0) + 1); buff(0) }, ZIO.succeed(buff(0)).run)
}

CORRECTNESS
Mutable Collections... Forbidden!
Unless inside run(...) clauses
Things in defer blocks must be:
EAGER + IMMUTABLE
(unless they are wrapped in an effect!!!
...and called with .run)
CORRECTENESS

ARGUMENT 1 It is not Referentially Transparent

Definition:
An expression shall called referentially transparent
if it can be replaced with its corresponding value
without changing the program's behavior.
Interpretation:
Ordering of value-terms should not matter.

defer {
val int = run(List(1, 2))
val bool = run(List(true, false))
(int, bool)
}
// List((1, true), (1, false), (2, true), (2, false))
defer {
(int, bool)
}
// List((1, true), (2, true), (1, false), (2, false))

defer.info {
(int, bool)
}
defer.info {
(int, bool)
}
List(1, 2).flatMap { int =>
List(true, false).map { bool =>
(int, bool)
}
}
List(true, false).flatMap { int =>
List(1, 2).map { bool =>
(int, bool)
}
}

(int, bool)
}
}
(int, bool)
}
}
... but the things on the left
hand side are PURE
VALUES since they have no
monad signature!
defer.info {
(int, bool)
}
defer.info {
(int, bool)
}

defer {
val int: Int = run(List(1, 2))
val bool: Boolean = run(List(true, false))
(int, bool)
}
defer {
(int, bool)
}
(int, bool)
}
}
(int, bool)
}
}
... but the things on the left
hand side are PURE VALUES
since they have no monad
signature!
No, they're just
syntactic sugar for flatMap/map
variables.
Same as the left-hand of a
for comprehension. Look...

(int, bool)
}
}
(int, bool)
}
}
for {
int: Int <- List(1, 2)
bool: Boolean <- List(true, false)
} yield (int, bool)
for {
} yield (int, bool)
defer {
(int, bool)
}
defer {
(int, bool)
}

(int, bool)
}
}
(int, bool)
}
}
No Equivalent
for {
} yield (int, bool)
defer {
(int, run(List(true, false)))
}
defer {
(int, bool)
}

ARGUMENT 1
defer {
val int = List(1, 2).run
val bool = List(true, false).run
val bool1 = bool
val int1 = int
(int, bool)
}
defer {
val bool = List(true, false).run
val int = List(1, 2).run
val bool1 = bool
val int1 = int
(int, bool)
}
It is not Referentially Transparent... Take 613
List(true, false).flatMap { bool =>
val bool1 = bool
val int1 = int
(int, bool)
}
}
List(1, 2).flatMap { bool =>
val bool1 = bool
val int1 = int
(int, bool)
}
}

defer {
val int = List(1, 2)
val bool = List(true, false)
val bool1 = bool.run
val int1 = int.run
(int, bool)
}
defer {
val bool1 = bool.run
val int1 = int.run
(int, bool)
}
ARGUMENT 1
bool.flatMap { bool =>
int.map { int =>
(int, bool)
}
}
bool.flatMap { bool =>
int.map { int =>
(int, bool)
}
}
It is not Referentially Transparent... Take 613

ARGUMENT 2 It is Lawless
I.
Ye shall not use mutable
things inside of a defer
unless the statement is
wrapped in a run(...) or
UNSAFE(...) block.
II.
Ye shall not use lazy things
inside of a defer unless the
statement is wrapped in a
run(...) or UNSAFE(...) block.
III.
Ye shall not interact with
external state inside of a
defer unless the statement is
wrapped in a run(...) or
unsafe(...) block.
IV.
All run(...) statements inside a
defer shall be run from top to
bottom if they are in different
lines, and from left to right if
they are on the same line.
V.
All plain statements inside of a
defer shall be run after the
run(...) on the line above and
before the run(...) on the line
below.
VI.
In the case that there are plain
statements and run(ZIO)s on the
same line, the run(ZIO)s can be
executed before the plain
statements in some
circumstances. To ensure
correctness in this scenario,
make sure to follow laws I, II,
and III.

Because ZIO actually has
them....
ERROR
CHANNELS

ZIO.fail(new Boom())
ZIO.succeed(pretendPureCode())
ERROR CHANNELS
💣 To Error Channel
💣 To Defect Channel
class Boom extends Exception("Boom!")
zio.direct.BoomExamples$Boom: Boom!
at zio.direct.BoomExamples$.main$$anonfun$1(BoomExamples.scala:22)
at zio.ZIO$.fail$$anonfun$1(ZIO.scala:3021)
at zio.ZIO$.failCause$$anonfun$1(ZIO.scala:3027)
at zio.internal.FiberRuntime.runLoop(FiberRuntime.scala:986)
at zio.UnsafeVersionSpecific.implicitFunctionIsFunction$$anonfun$1(UnsafeVersionSpecific.scala:23)
at zio.Unsafe$.unsafe(Unsafe.scala:37)
at zio.ZIOCompanionVersionSpecific.succeed$$anonfun$1(ZIOCompanionVersionSpecific.scala:161)
ZIO.succeed(pureCode)
< pureCode >
No Error
def pretendPureCode() = throw new Boom()
Expecting the somewhat/somewhat-not unexpected

ERROR CHANNELS
ZIO.attempt(pretendPureCode())
at zio.ZIO$.fail$$anonfun$1(ZIO.scala:3021)
at zio.ZIO$.failCause$$anonfun$1(ZIO.scala:3027)
at zio.UnsafeVersionSpecific.implicitFunctionIsFunction$$anonfun$1(UnsafeVersionSpecific.scala:23)
at zio.Unsafe$.unsafe(Unsafe.scala:37)
at zio.ZIOCompanionVersionSpecific.succeed$$anonfun$1(ZIOCompanionVersionSpecific.scala:161)
at zio.ZIOCompanionVersionSpecific.attempt$$anonfun$1(ZIOCompanionVersionSpecific.scala:107)
< pureCode >
No Error
Expecting Attempting the somewhat/somewhat-not unexpected

ERROR CHANNELS
No Error
defer { pureCode }
defer { throw new Boom() }
???
defer { pretendPureCode() }
Expecting Attempting the somewhat/somewhat-not unexpected

ERROR CHANNELS
No Error
defer { pureCode }
defer { ZIO.attempt(pretendPureCode()).run }

ERROR CHANNELS
No Error
defer { pureCode }
defer { unsafe(pretendPureCode()) }

ERROR CHANNELS
object Database {
def openConnection(): ZIO[Scope, Throwable, Connection]
}
object S3Object {
def openInputStream(path: String): ZIO[Scope, Throwable, InputStream]
}
defer {
try {
val input = S3Object.openInputStream("foo/bar").run
val reader = InputStreamReader(input)
val conn = Database.openConnection().run
val ps = conn.prepareStatement("INSERT ? INTO Someplace")
ps.setClob(1, reader)
ps.execute()
} catch {
case e: IOException => handle(e).run
case e: SQLException => handle(e).run
}
}
A "Real Cloud World" Example

ERROR CHANNELS
object Database {
}
object S3Object {
}
defer {
try {
ps.execute()
} catch {
}
}
Could Potentially Throw Something!

ERROR CHANNELS
object Database {
}
object S3Object {
}
defer {
try {
val reader = unsafe(InputStreamReader(input))
val ps = unsafe(conn.prepareStatement("INSERT ? INTO Someplace"))
unsafe {
ps.execute()
}
} catch {
}
}

ERROR CHANNELS
object Database {
}
object S3Object {
}
defer {
try {
val reader = unsafe(InputStreamReader(input))
val ps = unsafe(conn.prepareStatement("INSERT ? INTO Someplace"))
unsafe {
ps.execute()
}
} catch {
}
}
val out: ZIO[Scope, Throwable, Unit] =

ERROR CHANNELS
object Database {
}
object S3Object {
}
defer {
try {
unsafe {
ps.execute()
}
} catch {
}
}
Or wrap the entire thing!

ERROR CHANNELS
defer {
try {
unsafe {
ps.execute()
}
} catch {
}
}
S3Object.openInputStream("foo/bar").flatMap(((v: InputStream) => {
val input: InputStream = v
val reader: InputStreamReader = new InputStreamReader(input)
Database.openConnection.map(((`v₂`: Connection) => {
val conn: Connection = `v₂`
val ps: PreparedStatement = conn.prepareStatement("INSERT ? INTO Someplace")
ps.execute
}))
})).catchSome(((tryLamParam: Throwable) => tryLamParam match {
case e: IOException =>
handle(e)
case e: SQLException =>
handle(`e₂`)
}))
ObjectModel.S3Object.openInputStream("foo/bar").flatMap(((v: InputStream) => {
val input: InputStream = v
ZIO.attempt(new InputStreamReader(input)).flatMap(((`v₂`: InputStreamReader) => {
val reader: InputStreamReader = `v₂`
ObjectModel.Database.openConnection.flatMap(((`v₃`: Connection) => {
val conn: Connection = `v₃`
ZIO.attempt(conn.prepareStatement("INSERT ? INTO Someplace")).flatMap(((`v₄`: PreparedStatement) => {
val ps: PreparedStatement = `v₄`
ZIO.attempt({
ps.execute
})
}))
}))
}))
})).catchSome(((tryLamParam: Throwable) => tryLamParam match {
case e: IOException =>
ObjectModel.handle(e)
case e: SQLException =>
ObjectModel.handle(`e₂`)
}))
Wrap in Unsafe
Generated Code wraps ZIO.attempt

USING REFS
var i: Int = 10
while (i > 0) {
println(s"Currently: ${i}")
i = i - 1
}
Looping with vars Looping with Refs
Okay...
?

USING REFS
var i: Int = 10
while (i > 0) {
i = i - 1
}
val i: UIO[Ref[Int]] = Ref.make(10)
i.flatMap { i0 =>
def whileLoop(): ZIO[Any, Nothing, Unit] =
i0.get.flatMap { iv =>
if (iv > 0) {
println(s"Currently: ${iv}")
i0.update(i => i - 1).flatMap { _ =>
whileLoop()
}
} else {
ZIO.unit
}
}
whileLoop()
}
Let's pull some teeth!

USING REFS
var i: Int = 10
while (i > 0) {
i = i - 1
}
val i: UIO[Ref[Int]] = Ref.make(10)
i.flatMap { i0 =>
def whileLoop(): ZIO[Any, Nothing, Unit] =
i0.get.flatMap { iv =>
if (iv > 0) {
println(s"Currently: ${iv}")
i0.update(i => i - 1).flatMap { _ =>
whileLoop()
}
} else {
ZIO.unit
}
}
whileLoop()
}
Let's pull some teeth!
Be sure these are right...
or it runs forever!

USING REFS
var i: Int = 10
while (i > 0) {
i = i - 1
}
Looping with vars Looping with Refs - Take 2
defer {
val i: Ref[Int] = Ref.make(10).run
while (i.get.run > 0) {
println(s"Currently: ${i.get.run}")
i.update(i => i - 1).run
}
}

USING REFS
var i: Int = 10
while (i > 0) {
i = i - 1
}
Looping with vars Looping with Refs - Take 2
defer.info {
val i: Ref[Int] = Ref.make(10).run
while (i.get.run > 0) {
println(s"Currently: ${i.get.run}")
i.update(i => i - 1).run
}
}
Ref.make(10).flatMap(((v: Ref[Int]) => {
val i: Ref[Int] = v
def whileFunc: ZIO[Any, Nothing, Unit] = i.get.map(((sm: Int) => {
val runVal: Int = sm
runVal.>(0)
})).flatMap(((`v₂`: Boolean) => {
val ifVar: Boolean = `v₂`
if (ifVar) i.get.map(((`sm₂`: Int) => {
val `runVal₂`: Int = `sm₂`
println(_root_.scala.StringContext.apply("Currently: ", "").s(`runVal₂`))
})).flatMap(((`v₃`: Unit) => i.update(((`i₂`: Int) => `i₂`.-(1))))).flatMap(((`v₄`: Any) => whileFunc)) else zio.ZIO.succeed(())
}))
whileFunc
}))

USING REFS
Quicksort with Mutable Indices
def quicksortImperative(a: Array[Int]): Unit = {
def swap(i: Int, j: Int): Unit = {
val t = a(i)
a(i) = a(j)
a(j) = t
}
def sort(l: Int, r: Int): Unit = {
val pivot = a((l + r) / 2)
var i = l
var j = r
while (i <= j) {
while (a(i) < pivot) i += 1
while (a(j) > pivot) j -= 1
if (i <= j) {
swap(i, j)
i += 1
j -= 1
}
}
if (l < j) sort(l, j)
if (j < r) sort(i, r)
}
sort(0, a.length - 1)
}
val arr = Array(3, 2, 8, 5, 7, 2, 3, 8, 9, 4, 5, 8, 2, 3, 4, 7, 6, 5, 9, 2, 3, 8, 4, 7, 5, 6, 2, 0, 8, 3)
quicksortImperative(arr)
println(arr.toList)
// List(0, 2, 2, 2, 2, 2, 3, 3, 3, 3, 3, 4, 4, 4, 5, 5, 5, 5, 6, 6, 7, 7, 7, 8, 8, 8, 8, 8, 9, 9)

USING REFS
def quicksortImperative(a: Array[Int]): Unit = {
def swap(i: Int, j: Int): Unit = {
val t = a(i)
a(i) = a(j)
a(j) = t
}
def sort(l: Int, r: Int): Unit = {
val pivot = a((l + r) / 2)
var i = l
var j = r
while (i <= j) {
while (a(i) < pivot) i += 1
while (a(j) > pivot) j -= 1
if (i <= j) {
swap(i, j)
i += 1
j -= 1
}
}
if (l < j) sort(l, j)
if (j < r) sort(i, r)
}
sort(0, a.length - 1)
}
val arr = Array(3, 2, 8, 5, 7, 2, 3, 8, 9, 4, 5, 8, 2, 3, 4, 7, 6, 5, 9, 2, 3, 8, 4, 7, 5, 6, 2, 0, 8, 3)
runUnsafe(quicksortDefer(arr))
println(arr.toList)
// List(0, 2, 2, 2, 2, 2, 3, 3, 3, 3, 3, 4, 4, 4, 5, 5, 5, 5, 6, 6, 7, 7, 7, 8, 8, 8, 8, 8, 9, 9)
def quicksortDefer(arr: Array[Int]): ZIO[Any, Nothing, Unit] = {
def swap(i: Int, j: Int) =
val temp = arr(i)
arr(i) = arr(j)
arr(j) = temp
def sort(l: Int, r: Int): ZIO[Any, Nothing, Unit] =
defer(Params(Verify.Lenient)) {
val pivot = arr((l + r) / 2)
val i = Ref.make(l).run
val j = Ref.make(r).run
while (i.get.run <= j.get.run)
while (arr(i.get.run) < pivot) i.getAndUpdate(i => i + 1).run
while (arr(j.get.run) > pivot) j.getAndUpdate(j => j - 1).run
if (i.get.run <= j.get.run)
swap(i.get.run, j.get.run)
i.getAndUpdate(i => i + 1).run
j.getAndUpdate(j => j - 1).run
if (l < j.get.run)
val jv = j.get.run
sort(l, jv).run
if (j.get.run < r)
val iv = i.get.run
sort(iv, r).run
}
sort(0, arr.length - 1)
}

IN SUMMARY...
1. Introducing
ZIO-DIRECT is a ZIO-specific system
based on the Monadless paradigm of
imperative -> functional transformation.
2. Uses ZIO Features
ZIO-DIRECT Correctly interoperates
with ZIO Environment
and Error Types
3. Can Peek Inside
ZIO-DIRECT provides enhanced
feedback with .info and .verbose so
that you clearly know what code it is
generating.
4. Correctness based on Constraints
ZIO-DIRECT constrains problematic
Scala constructs in order to
guarantee correctness.
5. Uses Error Channel
ZIO-DIRECT uses the ZIO error
channel to mediate try-catch
statements.
6. Works well with Mutable Refs
ZIO-DIRECT makes the use of ZIO
Refs natural and ergonomic.

Future Directions
val q: Future[(Person, Address)] =
defer[Future].from {
val p = httpGet[Person]("http://people").run
val a = httpGet[Address](s"http://address?owner=${p.id}").run
(p, a)
}
def httpGet[T](str: String): Future[T]
val q: List[(Person, Address)] =
defer[List].from {
val p = people.run
(p, a)
}
def people: List[Person]
val q: Query[(Person, Address)] =
defer[Query].from {
val p = query[Person].run
val a = query[Address].join(a => a.fk == p.id).run
(p, a)
}
def query[T]: Query[T]

Thank You
Repo: github.com/zio/zio-direct
Example Usage: github.com/zio/zio-protoquill/tree/zio-direct

ZIO-Direct - Functional Scala 2022

Recommended

More Related Content

What's hot (20)

Similar to ZIO-Direct - Functional Scala 2022 (20)

Recently uploaded (20)

ZIO-Direct - Functional Scala 2022