summaryrefslogtreecommitdiff
path: root/provider/posts/simmons-intro-to-cat-t
diff options
context:
space:
mode:
authorGregor Kleen <gkleen@yggdrasil.li>2016-02-03 21:24:04 +0100
committerGregor Kleen <gkleen@yggdrasil.li>2016-02-03 21:24:04 +0100
commit927fe04b9bc95239bc6e6506e74bd47d6edbe0b0 (patch)
tree67d39c86359af0b61ebdf28a3cd9478c09f0bb63 /provider/posts/simmons-intro-to-cat-t
parent9deed79e33b9380ca90fbf3f2a64234f4e17945f (diff)
downloaddirty-haskell.org-927fe04b9bc95239bc6e6506e74bd47d6edbe0b0.tar
dirty-haskell.org-927fe04b9bc95239bc6e6506e74bd47d6edbe0b0.tar.gz
dirty-haskell.org-927fe04b9bc95239bc6e6506e74bd47d6edbe0b0.tar.bz2
dirty-haskell.org-927fe04b9bc95239bc6e6506e74bd47d6edbe0b0.tar.xz
dirty-haskell.org-927fe04b9bc95239bc6e6506e74bd47d6edbe0b0.zip
minor corrections
Diffstat (limited to 'provider/posts/simmons-intro-to-cat-t')
-rw-r--r--provider/posts/simmons-intro-to-cat-t/1.2.md5
1 files changed, 4 insertions, 1 deletions
diff --git a/provider/posts/simmons-intro-to-cat-t/1.2.md b/provider/posts/simmons-intro-to-cat-t/1.2.md
index c714f81..e180c6d 100644
--- a/provider/posts/simmons-intro-to-cat-t/1.2.md
+++ b/provider/posts/simmons-intro-to-cat-t/1.2.md
@@ -136,6 +136,7 @@ A \arrow[r, "f"] & B \arrow[r, "g"] & C \\
136\bar{\bar{A}} \arrow[u, hook] \arrow[ru, "\rest{f}{\bar{\bar{A}}}" description] & & \\ 136\bar{\bar{A}} \arrow[u, hook] \arrow[ru, "\rest{f}{\bar{\bar{A}}}" description] & & \\
137\end{tikzcd} 137\end{tikzcd}
138$$ 138$$
139where all restricted versions of $f$, $g$, and $h$ are total.
139 140
140Extending the above to three partial functions $f : A \to B$, $g : B \to C$, and $h : C \to D$: 141Extending the above to three partial functions $f : A \to B$, $g : B \to C$, and $h : C \to D$:
141$$ 142$$
@@ -160,7 +161,7 @@ $$
160\begin{aligned} 161\begin{aligned}
161\Phi : \ca{Pfn} & \to \ca{Set_\bot} \\ 162\Phi : \ca{Pfn} & \to \ca{Set_\bot} \\
162A & \mapsto A \cup \{ \bot_A \} \\ 163A & \mapsto A \cup \{ \bot_A \} \\
163\begin{tikzcd} 164f\ \text{s.t.} \begin{tikzcd}
164A \arrow[r, "f"] & B \\ 165A \arrow[r, "f"] & B \\
165\bar{A} \arrow[u, hook] \arrow[ru, "\rest{f}{\bar{A}}" description] & 166\bar{A} \arrow[u, hook] \arrow[ru, "\rest{f}{\bar{A}}" description] &
166\end{tikzcd} & \mapsto \begin{aligned} 167\end{tikzcd} & \mapsto \begin{aligned}
@@ -176,5 +177,7 @@ A & \mapsto A - \{ \bot \} \\
176f & \mapsto \rest{f}{\left ( A - \{ \bot \} \right )} 177f & \mapsto \rest{f}{\left ( A - \{ \bot \} \right )}
177\end{aligned} 178\end{aligned}
178$$ 179$$
180where $\rest{f}{\bar{A}}$ is total.
179</div> 181</div>
180</div> 182</div>
183