{ "schema": "ailang/v0", "name": "t4_count_zeros", "imports": [], "defs": [ { "kind": "type", "name": "List", "vars": ["a"], "ctors": [ { "name": "Nil", "fields": [] }, { "name": "Cons", "fields": [ { "k": "var", "name": "a" }, { "k": "con", "name": "List", "args": [{ "k": "var", "name": "a" }] } ] } ] }, { "kind": "fn", "name": "count_zeros", "type": { "k": "fn", "params": [ { "k": "con", "name": "List", "args": [{ "k": "con", "name": "Int" }] } ], "ret": { "k": "con", "name": "Int" }, "effects": [] }, "params": ["xs"], "body": { "t": "match", "scrutinee": { "t": "var", "name": "xs" }, "arms": [ { "pat": { "p": "ctor", "ctor": "Nil", "fields": [] }, "body": { "t": "lit", "lit": { "kind": "int", "value": 0 } } }, { "pat": { "p": "ctor", "ctor": "Cons", "fields": [ { "p": "var", "name": "h" }, { "p": "var", "name": "rest" } ] }, "body": { "t": "if", "cond": { "t": "app", "fn": { "t": "var", "name": "eq" }, "args": [ { "t": "var", "name": "h" }, { "t": "lit", "lit": { "kind": "int", "value": 0 } } ] }, "then": { "t": "app", "fn": { "t": "var", "name": "+" }, "args": [ { "t": "lit", "lit": { "kind": "int", "value": 1 } }, { "t": "app", "fn": { "t": "var", "name": "count_zeros" }, "args": [{ "t": "var", "name": "rest" }] } ] }, "else": { "t": "app", "fn": { "t": "var", "name": "count_zeros" }, "args": [{ "t": "var", "name": "rest" }] } } } ] } }, { "kind": "fn", "name": "main", "type": { "k": "fn", "params": [], "ret": { "k": "con", "name": "Unit" }, "effects": ["IO"] }, "params": [], "body": { "t": "seq", "lhs": { "t": "do", "op": "io/print_int", "args": [{ "t": "app", "fn": { "t": "var", "name": "count_zeros" }, "args": [{ "t": "ctor", "type": "List", "ctor": "Nil", "args": [] }] }] }, "rhs": { "t": "do", "op": "io/print_int", "args": [{ "t": "app", "fn": { "t": "var", "name": "count_zeros" }, "args": [{ "t": "ctor", "type": "List", "ctor": "Cons", "args": [ { "t": "lit", "lit": { "kind": "int", "value": 0 } }, { "t": "ctor", "type": "List", "ctor": "Cons", "args": [ { "t": "lit", "lit": { "kind": "int", "value": 5 } }, { "t": "ctor", "type": "List", "ctor": "Cons", "args": [ { "t": "lit", "lit": { "kind": "int", "value": 0 } }, { "t": "ctor", "type": "List", "ctor": "Cons", "args": [ { "t": "lit", "lit": { "kind": "int", "value": 3 } }, { "t": "ctor", "type": "List", "ctor": "Cons", "args": [ { "t": "lit", "lit": { "kind": "int", "value": 0 } }, { "t": "ctor", "type": "List", "ctor": "Nil", "args": [] } ] } ] } ] } ] } ] }] }] } } } ] }