kc3-lang/kc3

diff --git a/lib/c3/0.1/c3.facts b/lib/c3/0.1/c3.facts
index ec7ca76..1e5e4b9 100644
--- a/lib/c3/0.1/c3.facts
+++ b/lib/c3/0.1/c3.facts
@@ -64,20 +64,20 @@ replace {C3.operator07, :arity, 2}
 replace {C3.operator07, :cfn, cfn Tag "tag_mod" (Tag, Tag, Result)}
 replace {C3.operator07, :operator_precedence, 11}
 replace {C3.operator07, :operator_associativity, :left}
-add {C3, :operator, C3.operator08}
-replace {C3.operator08, :is_a, :operator}
-replace {C3.operator08, :symbol, :+}
-replace {C3.operator08, :arity, 2}
-replace {C3.operator08, :cfn, cfn Tag "tag_add" (Tag, Tag, Result)}
-replace {C3.operator08, :operator_precedence, 10}
-replace {C3.operator08, :operator_associativity, :left}
-add {C3, :operator, C3.operator09}
-replace {C3.operator09, :is_a, :operator}
-replace {C3.operator09, :symbol, :-}
-replace {C3.operator09, :arity, 2}
-replace {C3.operator09, :cfn, cfn Tag "tag_sub" (Tag, Tag, Result)}
-replace {C3.operator09, :operator_precedence, 10}
-replace {C3.operator09, :operator_associativity, :left}
+add {C3, :operator, C3.operator_add}
+replace {C3.operator_add, :is_a, :operator}
+replace {C3.operator_add, :symbol, :+}
+replace {C3.operator_add, :arity, 2}
+replace {C3.operator_add, :cfn, cfn Tag "tag_add" (Tag, Tag, Result)}
+replace {C3.operator_add, :operator_precedence, 10}
+replace {C3.operator_add, :operator_associativity, :left}
+add {C3, :operator, C3.operator_sub}
+replace {C3.operator_sub, :is_a, :operator}
+replace {C3.operator_sub, :symbol, :-}
+replace {C3.operator_sub, :arity, 2}
+replace {C3.operator_sub, :cfn, cfn Tag "tag_sub" (Tag, Tag, Result)}
+replace {C3.operator_sub, :operator_precedence, 10}
+replace {C3.operator_sub, :operator_associativity, :left}
 add {C3, :operator, C3.operator10}
 replace {C3.operator10, :is_a, :operator}
 replace {C3.operator10, :symbol, :<<}
diff --git a/test/env_test.c b/test/env_test.c
index 12300a4..b80334e 100644
--- a/test/env_test.c
+++ b/test/env_test.c
@@ -43,7 +43,7 @@ TEST_CASE(env_eval_call)
   test_context("env_eval_call(1 + 2) -> 3");
   call_init(&call);
   call.ident.module = sym_1("C3");
-  call.ident.sym = sym_1("operator08");
+  call.ident.sym = sym_1("operator_add");
   call.arguments = list_new_1("[1, 2]");
   tag_init_u8(&expected, 3);
   TEST_ASSERT(env_eval_call(&env, &call, &result));