diff --git a/src/PDF/Object.hs b/src/PDF/Object.hs
index 4aef0ee..795c988 100644
--- a/src/PDF/Object.hs
+++ b/src/PDF/Object.hs
@@ -25,6 +25,7 @@ module PDF.Object (
     , magicNumber
     , name
     , number
+    , object
     , outputBody
     , regular
     , stringObject
@@ -256,6 +257,9 @@ instance Output Object where
       , "endstream"
     ]
 
+object :: Int -> Id Object
+object = Id
+
 --
 -- Occurrence
 --