diff --git a/ega/src/operators/mod.rs b/ega/src/operators/mod.rs
index 8e6176e..1718df3 100644
--- a/ega/src/operators/mod.rs
+++ b/ega/src/operators/mod.rs
@@ -10,7 +10,7 @@ mod join;
 mod meet;
 mod mul;
 mod neg;
-mod norm;
+// mod norm;
 mod normalise;
 mod partial_eq;
 mod reverse;
diff --git a/rga/src/operators/mod.rs b/rga/src/operators/mod.rs
index 3412d11..b1c6c71 100644
--- a/rga/src/operators/mod.rs
+++ b/rga/src/operators/mod.rs
@@ -2,6 +2,7 @@
 // - matrix exomorphisms
 // - distance (euclidean)
 // - angle
+// - sandwich product
 
 mod antidot_product;
 mod antiwedge_product;
diff --git a/rga/src/values/scalar.rs b/rga/src/values/scalar.rs
index ef9c6f4..9badfbf 100644
--- a/rga/src/values/scalar.rs
+++ b/rga/src/values/scalar.rs
@@ -11,3 +11,10 @@ impl From<Empty> for Scalar {
     Self::ZERO
   }
 }
+
+impl From<F> for Scalar {
+  #[inline]
+  fn from(f: F) -> Scalar {
+    Scalar { s: f }
+  }
+}