Index: crime.ml
==================================================================
--- crime.ml
+++ crime.ml
@@ -829,10 +829,11 @@
 		T "servitude";
 		T "Infrared Clearance";
 		T "unskilled labor";
 		T "kitchen duty";
 		T "sanitation duty";
+		T "Keter duty";
 		T "court jester";
 	|];
 ]
 let conviction = C(B [
 	O(B[