diff --git a/packages/charlie/src/back.js b/packages/charlie/src/back.js
index ad739337fb3..6e15a55a4f2 100644
--- a/packages/charlie/src/back.js
+++ b/packages/charlie/src/back.js
@@ -194,6 +194,110 @@ export default (part) => {
     )
 
     if (paperless) {
+      // Clean up paperless dimensions
+      macro('rmad')
+      delete paths.hint
+
+      // Shared
+      macro('hd', {
+        from: points.floorIn,
+        to: points.grainlineBottom,
+        y: points.floorIn.y - 15
+      })
+      macro('hd', {
+        from: points.grainlineBottom,
+        to: points.floorOut,
+        y: points.floorIn.y - 15
+      })
+      macro('hd', {
+        from: points.floorIn,
+        to: points.floorOut,
+        y: points.floorIn.y - 30
+      })
+
+      let y = points.floorIn.y + sa * 6
+      macro('hd', {
+        from: points.fork,
+        to: points.grainlineBottom,
+        y: y + 15
+      })
+      macro('hd', {
+        from: points.grainlineBottom,
+        to: points.slantBottomNotch,
+        y: y + 15
+      })
+      macro('hd', {
+        from: points.grainlineBottom,
+        to: points.slantOut,
+        y: y + 30
+      })
+
+      y = points.styleWaistIn.y - sa
+      macro('hd', {
+        from: points.styleWaistIn,
+        to: points.grainlineTop,
+        y: y - 15
+      })
+      macro('hd', {
+        from: points.fork,
+        to: points.grainlineTop,
+        y: y - 30
+      })
+      macro('hd', {
+        from: points.grainlineTop,
+        to: points.waistPocketCenter,
+        y: y - 15
+      })
+      macro('hd', {
+        from: points.grainlineTop,
+        to: points.slantOut,
+        y: y - 30
+      })
+
+      macro('ld', {
+        from: points.pocketLeft,
+        to: points.pocketRight,
+        d: -15
+      })
+      macro('ld', {
+        from: points.backDartLeft,
+        to: points.backDartRight,
+        d: 15
+      })
+      macro('ld', {
+        from: points.pocketCenter,
+        to: points.waistPocketCenter,
+        d: 25
+      })
+
+      let x = points.fork.x - sa
+      macro('vd', {
+        from: points.fork,
+        to: points.pocketCenter,
+        x: x - 15
+      })
+      macro('vd', {
+        from: points.fork,
+        to: points.waistPocketCenter,
+        x: x - 30
+      })
+      macro('vd', {
+        from: points.fork,
+        to: points.styleWaistIn,
+        x: x - 45
+      })
+
+      x = points.slantOut.x + sa
+      macro('vd', {
+        from: points.floorOut,
+        to: points.slantBottomNotch,
+        x: x + 15
+      })
+      macro('vd', {
+        from: points.floorOut,
+        to: points.slantOut,
+        x: x + 30
+      })
     }
   }