diff --git a/fix16.tal b/fix16.tal
index d9d2af8..7c5157f 100644
--- a/fix16.tal
+++ b/fix16.tal
@@ -174,6 +174,12 @@
 @x16-gt   ( x* y* ->  x<y^ ) x16-cmp #01 EQU JMP2r
 @x16-gteq ( x* y* ->  x<y^ ) x16-cmp [ #ff NEQ ] JMP2r
 
+@x16-min ( x* y* -> min[x, y]* )
+    OVR2 OVR2 x16-lt JMP SWP2 POP2 JMP2r
+
+@x16-max ( x* y* -> max[x, y]* )
+    OVR2 OVR2 x16-gt JMP SWP2 POP2 JMP2r
+
 @x16-is-whole ( x* -> bool^ )
     NIP #00 EQU JMP2r