Repoint ADR references after HQ consolidated 65 records to 23

96 comments across the two repos named records that no longer exist. Each now
points at the consolidated record that holds its reasoning -- ADR 0034 (a test
defends a decision) is 0017, the eight host records are 0005, the four lab
records are 0016.

Worth noting for next time: these are references from outside HQ, so renumbering
there is not free. It cost 38 files here.

internal/store/store.go

@@ -1,11 +1,11 @@
 // Package store is what this node knows about itself, and it is authoritative while
 // disconnected.
 //
-// Not a cache of the control plane. novox/hq ADR 0036 makes disconnection an ordinary
+// Not a cache of the control plane. novox/hq ADR 0004 makes disconnection an ordinary
 // situation rather than an exception, and this is what makes it ordinary: a machine shut for a
 // week comes back and reconciles, it does not come back and ask what it is.
 //
-// Its first job arrives with the first apply rather than with the link (ADR 0043): the host
+// Its first job arrives with the first apply rather than with the link (ADR 0005): the host
 // removes what it previously applied and is no longer declared, and it can only know that
 // because it wrote it down.
 package store
@@ -27,7 +27,7 @@ const DefaultPath = "/var/lib/mesh-host/state.json"
 
 // Applied is one resource the host put on this machine, and what it did.
 //
-// Recorded AFTER the resource was applied and read back, never before (novox/hq ADR 0035).
+// Recorded AFTER the resource was applied and read back, never before (novox/hq ADR 0018).
 // A record written up front restates the request in a new place and inherits none of the
 // authority of having happened.
 type Applied struct {
@@ -164,7 +164,7 @@ func (s *State) Forget(id string) {
 //
 // Reverse order because undoing in the order things were made undoes a directory before the
 // file inside it. Reversing is the only ordering the host can derive without deciding
-// anything, which is the line novox/hq ADR 0037 draws.
+// anything, which is the line novox/hq ADR 0005 draws.
 func (s State) Orphans(declared map[string]bool) []Applied {
 	var out []Applied
 	for i := len(s.Resources) - 1; i >= 0; i-- {