diff --git a/anselme/stdlib/language/frFR.lua b/anselme/stdlib/language/frFR.lua
index 241e9b2..30c5064 100644
--- a/anselme/stdlib/language/frFR.lua
+++ b/anselme/stdlib/language/frFR.lua
@@ -57,6 +57,8 @@ return [[
 :@est = stdlib.is
 :@est une ancre = stdlib.is anchor
 :@est un booléen = stdlib.is boolean
+:@est vrai = stdlib.is true
+:@est faux = stdlib.is false
 :@est appelable = stdlib.is callable
 :@est une fonction = stdlib.is function
 :@est une liste = stdlib.is list
diff --git a/anselme/stdlib/number.lua b/anselme/stdlib/number.lua
index 3240e39..a3975e5 100644
--- a/anselme/stdlib/number.lua
+++ b/anselme/stdlib/number.lua
@@ -12,7 +12,7 @@ return {
 			end
 		end
 	},
-	{ "_<_", "(a::equal(false), b::is number)", function(state, a, b) return Boolean:new(false) end },
+	{ "_<_", "(a::is false, b::is number)", function(state, a, b) return Boolean:new(false) end },
 	{
 		"_<=_", "(a::is number, b::is number)",
 		function(state, a, b)
@@ -21,7 +21,7 @@ return {
 			end
 		end
 	},
-	{ "_<=_", "(a::equal(false), b::is number)", function(state, a, b) return Boolean:new(false) end },
+	{ "_<=_", "(a::is false, b::is number)", function(state, a, b) return Boolean:new(false) end },
 	{
 		"_>_", "(a::is number, b::is number)",
 		function(state, a, b)
@@ -30,7 +30,7 @@ return {
 			end
 		end
 	},
-	{ "_>_", "(a::equal(false), b::is number)", function(state, a, b) return Boolean:new(false) end },
+	{ "_>_", "(a::is false, b::is number)", function(state, a, b) return Boolean:new(false) end },
 	{
 		"_>=_", "(a::is number, b::is number)",
 		function(state, a, b)
@@ -39,7 +39,7 @@ return {
 			end
 		end
 	},
-	{ "_>=_", "(a::equal(false), b::is number)", function(state, a, b) return Boolean:new(false) end },
+	{ "_>=_", "(a::is false, b::is number)", function(state, a, b) return Boolean:new(false) end },
 	{ "_+_", "(a::is number, b::is number)", function(state, a, b) return Number:new(a.number + b.number) end },
 	{ "_-_", "(a::is number, b::is number)", function(state, a, b) return Number:new(a.number - b.number) end },
 	{ "_*_", "(a::is number, b::is number)", function(state, a, b) return Number:new(a.number * b.number) end },
diff --git a/anselme/stdlib/value check.lua b/anselme/stdlib/value check.lua
index 0f48ec4..c38bd14 100644
--- a/anselme/stdlib/value check.lua	
+++ b/anselme/stdlib/value check.lua	
@@ -6,6 +6,8 @@ return [[
 :@is number = is("number")
 :@is string = is("string")
 :@is boolean = is("boolean")
+:@is false = $(x) !x
+:@is true = $(x) !!x
 :@is symbol = is("symbol")
 :@is anchor = is("anchor")
 :@is pair = is("pair")