diff --git a/AlgebraicDataflowArchitectureModel/models/Accounts.model b/AlgebraicDataflowArchitectureModel/models/Accounts.model
new file mode 100644
index 0000000..81093de
--- /dev/null
+++ b/AlgebraicDataflowArchitectureModel/models/Accounts.model
@@ -0,0 +1,7 @@
+channel CIO1 {
+	out accounts(l:List, signup(name:Str)) == cons(name, l)
+}
+
+channel CIO2(uid:Int) {
+	out accounts.{uid}(n:Str, changeName(name)) == name
+}