From 5ecf387a76c485db0e85c11de5446a3954e4f1d5 Mon Sep 17 00:00:00 2001
From: ADAM David Alan Martin <adam@recursive.engineer>
Date: Fri, 15 Oct 2021 05:16:53 -0400
Subject: [PATCH] Lambaste.

---
 Utility/evaluation.h | 9 +++++++++
 1 file changed, 9 insertions(+)

diff --git a/Utility/evaluation.h b/Utility/evaluation.h
index c412fc1..719b1fb 100644
--- a/Utility/evaluation.h
+++ b/Utility/evaluation.h
@@ -15,11 +15,13 @@ namespace Alepha::Hydrogen::Utility
 	{
 		struct evaluate_t {};
 		struct enroll_t {};
+		struct lambaste_t {};
 
 		inline namespace exports
 		{
 			inline constexpr evaluate_t evaluate;
 			inline constexpr enroll_t enroll;
+			inline constexpr lambaste_t lambaste;
 		}
 
 		template< typename Function >
@@ -39,6 +41,13 @@ namespace Alepha::Hydrogen::Utility
 
 			return registration;
 		}
+
+		template< typename Value >
+		auto
+		operator <=( lambaste_t, Value value )
+		{
+			return [value]{ return value; };
+		}
 	}
 
 	namespace exports::evaluation