diff --git a/WORK-RECORDS.md b/WORK-RECORDS.md
index 809dd5a..b82472f 100644
--- a/WORK-RECORDS.md
+++ b/WORK-RECORDS.md
@@ -11,7 +11,7 @@
 | workplan | CB-WP-0001 | done | — | workplans/CB-WP-0001-inner-loop.md |
 | workplan | CB-WP-0002 | done | — | workplans/CB-WP-0002-cost-accounting.md |
 | workplan | CB-WP-0003 | done | — | workplans/CB-WP-0003-loop-hardening.md |
-| workplan | CB-WP-0004 | proposed | — | workplans/CB-WP-0004-mechanical-work.md |
+| workplan | CB-WP-0004 | done | — | workplans/CB-WP-0004-mechanical-work.md |
 | task | CB-WP-0001-T01 | done | — | workplans/CB-WP-0001-inner-loop.md |
 | task | CB-WP-0001-T02 | done | — | workplans/CB-WP-0001-inner-loop.md |
 | task | CB-WP-0001-T03 | done | — | workplans/CB-WP-0001-inner-loop.md |
@@ -39,9 +39,9 @@
 | task | CB-WP-0003-T09 | done | — | workplans/CB-WP-0003-loop-hardening.md |
 | task | CB-WP-0003-T10 | done | — | workplans/CB-WP-0003-loop-hardening.md |
 | task | CB-WP-0003-T11 | done | — | workplans/CB-WP-0003-loop-hardening.md |
-| task | CB-WP-0004-T01 | todo | — | workplans/CB-WP-0004-mechanical-work.md |
-| task | CB-WP-0004-T02 | todo | — | workplans/CB-WP-0004-mechanical-work.md |
-| task | CB-WP-0004-T03 | todo | — | workplans/CB-WP-0004-mechanical-work.md |
-| task | CB-WP-0004-T04 | todo | — | workplans/CB-WP-0004-mechanical-work.md |
-| task | CB-WP-0004-T05 | todo | — | workplans/CB-WP-0004-mechanical-work.md |
-| task | CB-WP-0004-T06 | todo | — | workplans/CB-WP-0004-mechanical-work.md |
+| task | CB-WP-0004-T01 | done | — | workplans/CB-WP-0004-mechanical-work.md |
+| task | CB-WP-0004-T02 | done | — | workplans/CB-WP-0004-mechanical-work.md |
+| task | CB-WP-0004-T03 | done | — | workplans/CB-WP-0004-mechanical-work.md |
+| task | CB-WP-0004-T04 | done | — | workplans/CB-WP-0004-mechanical-work.md |
+| task | CB-WP-0004-T05 | done | — | workplans/CB-WP-0004-mechanical-work.md |
+| task | CB-WP-0004-T06 | done | — | workplans/CB-WP-0004-mechanical-work.md |