diff --git a/experiment.t b/experiment.t
index 3d2185c..865a333 100644
--- a/experiment.t
+++ b/experiment.t
@@ -55,4 +55,6 @@ gameMain: GameMainDef
 #include "src/room/pinkRoom.t"
 #include "src/item/labCoat.t"
 
+#include "src/room/redRoom.t"
+
 #include "src/actor/pc.t"
diff --git a/src/item/labCoat.t b/src/item/labCoat.t
index 5e1e960..9d145e3 100644
--- a/src/item/labCoat.t
+++ b/src/item/labCoat.t
@@ -1,6 +1,6 @@
 labCoat: Container
   'bloody cloth'
-  'bloody cloth'
+  'bloody cloth/pocket*pockets'
   @dumpster
   " The lab coat labeled <q>Dr. O'Neill</q>.
     Aside from the bloodstains,
diff --git a/src/room/cyanRoom.t b/src/room/cyanRoom.t
index e030dc8..aac72f0 100644
--- a/src/room/cyanRoom.t
+++ b/src/room/cyanRoom.t
@@ -34,6 +34,7 @@ cyanRoom: Room
 ;
 
 + operatingRoomDoorOutside: LockableWithKey, Door, RoomPartItem
+  -> operatingRoomDoor
   'armored operating door*doors'
   'armored door'
   " Armored door marked <q>Operating room</q>
diff --git a/src/room/redRoom.t b/src/room/redRoom.t
new file mode 100644
index 0000000..f556135
--- /dev/null
+++ b/src/room/redRoom.t
@@ -0,0 +1,13 @@
+redRoom: Room
+  'Operating room'
+  " Operating room"
+
+  west = operatingRoomDoor
+;
+
++ operatingRoomDoor: Door, RoomPartItem
+  'armored operating door*doors'
+  'armored door'
+  "An armored door with a massive locking mechanism."
+  specialNominalRoomPartLocation = defaultWestWall
+;