Move absolutely measured portions of header to src/base

src/base/page.typ

@@ -1,13 +1,17 @@
 #let base_page(
   header: [],
   body
-) = page(
+) = {
+  import "page/header.typ": base_page_header
+
+  page(
     paper: "us-letter",
     margin: (
       x: 1in,
       y: 1in,
     ),
-  header: header,
+    header: base_page_header(header),
     header-ascent: 0in,
     body
   )
+}

src/base/page/header.typ

@@ -0,0 +1,8 @@
+#let base_page_header(content) = block(
+  width: 100%,
+  height: 0.5in,
+  align(
+    right + top,
+    content
+  )
+)

src/page/essay/header.typ

@@ -1,12 +1,5 @@
 #let page_essay_header(author_name_last: "") = {
-  import "header/content.typ": page_essay_header_content
-  
-  block(
-    width: 100%,
-    height: 0.5in,
-    align(
-      right + top,
-      page_essay_header_content(author_name_last: author_name_last)
-    )
-  )
+  author_name_last
+  " "
+  counter(page).display()
 }

src/page/essay/header/content.typ

@@ -1,5 +0,0 @@
-#let page_essay_header_content(author_name_last: "") = {
-  author_name_last
-  " "
-  counter(page).display()
-}