Projects: classes as entities, and the sidebar fits short windows

A project is a class with facts (description, status, kind, party,
dates, links, notes) in one project.set event behind the format
feature projects. Four tools (books.add_project, update_project,
projects, project); documents and decisions link to projects; B-37:
on-spec costs are expensed as incurred, repayment is revenue, and the
unrecovered cost is never below zero (Kani). Viewer: a Projects list
and a project page with its figures, by month and by account. The
sidebar measures its footer instead of reserving a fixed 172 px.

Co-Authored-By: Claude Opus 5.5 <noreply@anthropic.com>
Claude-Session: https://claude.ai/code/session_01T3gXMVt7XJPi6ens1or9Dj

crates/ledger-mcp/tests/hostile_args.rs

@@ -1366,6 +1366,7 @@ fn reads_of_old_books() -> Vec<(&'static str, Value)> {
         ("books.list_receipts", json!({})),
         ("books.list_vendors", json!({})),
         ("books.list_classes", json!({})),
+        ("books.projects", json!({})),
         ("books.parties", json!({})),
         ("books.statements", json!({})),
         ("books.reconciliations", json!({})),
@@ -1715,3 +1716,20 @@ fn hostile_renames_ranges_and_categories_are_answered() {
     );
     reopens(m, &p, "P3's hostile inputs");
 }
+
+/// books.project over the whole calendar answers, its months the last 240
+/// (each month is a statement: a hundred thousand of them would not).
+#[test]
+fn a_project_over_the_whole_calendar_answers_quickly() {
+    let p = places("project-wide");
+    let mut m = Mcp::start(&p);
+    fixture(&mut m, &p);
+    m.ok("books.add_project", json!({"name": "Harbor"}));
+    let t = std::time::Instant::now();
+    let p = m.ok(
+        "books.project",
+        json!({"project": "Harbor", "start": "0001-01-01", "end": "9999-12-31"}),
+    );
+    assert_eq!(p["period"]["by_month"].as_array().unwrap().len(), 240);
+    assert!(t.elapsed() < std::time::Duration::from_secs(30));
+}