tests/Tests/Invoice.hs

   1 {-# LANGUAGE OverloadedLists #-}
   2 {-# LANGUAGE OverloadedStrings #-}
   3
   4 module Tests.Invoice where
   5
   6 import Data.List qualified as List
   7 import Data.Map.Strict qualified as Map
   8 import Data.Text.Lazy qualified as Text.Lazy
   9 import Data.Time.Clock qualified as Time
  10 import Data.Time.LocalTime qualified as Time
  11 import Literate.Accounting
  12 import Literate.Document qualified as Doc
  13 import Literate.Document.HTML qualified as HTML
  14 import Literate.Invoice.HTML qualified as HTML
  15 import Literate.Invoice.Invoice
  16 import Literate.Organization (Organization (Organization))
  17 import Literate.Prelude
  18 import Test.Syd
  19 import Tests.Organization qualified as Orga
  20 import Tests.Utils.Tests
  21 import Text.Blaze.Renderer.Text qualified as Blaze.Text
  22 import Text.Blaze.Renderer.Utf8 qualified as Blaze
  23 import Prelude (undefined, (*))
  24
  25 spec :: HasCallStack => Spec
  26 spec =
  27   -- aroundAll readDicts do
  28   describe "Invoice" do
  29     forM_ (invoices & Map.toList) \(invId, inv) -> do
  30       let idS = invId & Doc.toInline & HTML.toHtml & Blaze.Text.renderMarkup & Text.Lazy.unpack
  31       outPath <- goldenPath idS "html"
  32       it idS do
  33         goldenByteStringBuilderFile outPath do
  34           HTML.htmlIO (invId, inv) <&> Blaze.renderMarkupBuilder
  35
  36 works_NGIpkgs :: [Work]
  37 works_NGIpkgs =
  38   [ Work
  39       { workDate = "2025-11-06"
  40       , workDuration = 0.5
  41       , workAction = ["organization"]
  42       , workScope = ["NGIpkgs"]
  43       , workReferences = ["https://meet.google.com/hii-druc-tjp"]
  44       , workDescription = "first meeting"
  45       }
  46   , Work
  47       { workDate = "2025-11-06"
  48       , workDuration = 4
  49       , workAction = ["development"]
  50       , workScope = ["NGIpkgs", "Bonfire"]
  51       , workReferences = ["https://github.com/ju1m/bonfire-app/commits/nix"]
  52       , workDescription = "focus on the hardest part first"
  53       }
  54   , Work
  55       { workDate = "2025-11-07"
  56       , workDuration = 8
  57       , workAction = ["development"]
  58       , workScope = ["NGIpkgs", "Bonfire"]
  59       , workReferences = ["https://github.com/ju1m/bonfire-app/commits/nix"]
  60       , workDescription = "continuing to package Bonfire deps"
  61       }
  62   , Work
  63       { workDate = "2025-11-08"
  64       , workDuration = 0.1
  65       , workAction = ["development"]
  66       , workScope = ["Nixpkgs", "opencv"]
  67       , workReferences = ["https://github.com/NixOS/nixpkgs/pull/459592"]
  68       , workDescription = "fix opencv in nixpkgs"
  69       }
  70   , Work
  71       { workDate = "2025-11-09"
  72       , workDuration = 8
  73       , workAction = ["development"]
  74       , workScope = ["NGIpkgs", "Bonfire"]
  75       , workReferences = ["https://github.com/ju1m/bonfire-app/commits/nix"]
  76       , workDescription = "continue to fix deps"
  77       }
  78   , Work
  79       { workDate = "2025-11-09"
  80       , workDuration = 4
  81       , workAction = ["development"]
  82       , workScope = ["NGIpkgs", "Bonfire"]
  83       , workReferences = ["https://github.com/ju1m/bonfire-app/commits/nix"]
  84       , workDescription = "continue to fix deps"
  85       }
  86   , Work
  87       { workDate = "2025-11-11"
  88       , workDuration = 6
  89       , workAction = ["development"]
  90       , workScope = ["NGIpkgs", "Bonfire"]
  91       , workReferences = ["https://github.com/ju1m/bonfire-app/commits/nix"]
  92       , workDescription = "continue to fix deps"
  93       }
  94   , Work
  95       { workDate = "2025-11-12"
  96       , workDuration = 4
  97       , workAction = ["development"]
  98       , workScope = ["NGIpkgs", "Bonfire"]
  99       , workReferences = ["https://github.com/ju1m/bonfire-app/commits/nix"]
 100       , workDescription = "continue to fix deps"
 101       }
 102   , Work
 103       { workDate = "2025-11-14"
 104       , workDuration = 5
 105       , workAction = ["development"]
 106       , workScope = ["NGIpkgs", "Bonfire"]
 107       , workReferences = ["https://github.com/ngi-nix/ngipkgs/pull/1812"]
 108       , workDescription = "continue to fix deps and move into ngipkgs"
 109       }
 110   , Work
 111       { workDate = "2025-11-14"
 112       , workDuration = 1
 113       , workAction = ["organization"]
 114       , workScope = ["NGIpkgs"]
 115       , workReferences = ["https://www.notion.so/nixos-foundation/Nix-NGI-weekly-review-34-2ab59d49e1be80939503c655b009e934"]
 116       , workDescription = "weekly meeting"
 117       }
 118   , Work
 119       { workDate = "2025-11-15"
 120       , workDuration = 6
 121       , workAction = ["development"]
 122       , workScope = ["NGIpkgs", "Bonfire"]
 123       , workReferences = []
 124       , workDescription = "finish to build Bonfire and start to fix runtime bugs"
 125       }
 126   , Work
 127       { workDate = "2025-11-16"
 128       , workDuration = 4
 129       , workAction = ["development"]
 130       , workScope = ["NGIpkgs", "Bonfire"]
 131       , workReferences = ["https://github.com/ngi-nix/ngipkgs/pull/1812#issuecomment-3537609170"]
 132       , workDescription = "workaround and contribute upstream"
 133       }
 134   , Work
 135       { workDate = "2025-11-17"
 136       , workDuration = 8
 137       , workAction = ["development"]
 138       , workScope = ["NGIpkgs", "Bonfire"]
 139       , workReferences = []
 140       , workDescription = "add updateScript and fix opencv"
 141       }
 142   , Work
 143       { workDate = "2025-11-19"
 144       , workDuration = 8
 145       , workAction = ["development"]
 146       , workScope = ["NGIpkgs", "Bonfire"]
 147       , workReferences = ["https://github.com/ngi-nix/ngipkgs/pull/1812#issuecomment-3554376221"]
 148       , workDescription = "continue to fix startup crashes"
 149       }
 150   , Work
 151       { workDate = "2025-11-21"
 152       , workDuration = 4
 153       , workAction = ["development"]
 154       , workScope = ["NGIpkgs", "Bonfire"]
 155       , workReferences = []
 156       , workDescription = "begin to package yarn assets. Upstream likes convoluted code and fake libraries."
 157       }
 158   , Work
 159       { workDate = "2025-11-21"
 160       , workDuration = 1
 161       , workAction = ["organization"]
 162       , workScope = ["NGIpkgs"]
 163       , workReferences = []
 164       , workDescription = "weekly meeting"
 165       }
 166   , Work
 167       { workDate = "2025-11-21"
 168       , workDuration = 4
 169       , workAction = ["development"]
 170       , workScope = ["NGIpkgs", "Bonfire"]
 171       , workReferences = []
 172       , workDescription = "continue to package assets"
 173       }
 174   , Work
 175       { workDate = "2025-11-23"
 176       , workDuration = 4
 177       , workAction = ["development"]
 178       , workScope = ["NGIpkgs", "Bonfire"]
 179       , workReferences = []
 180       , workDescription = "continue to package assets and try to get Bonfire to work"
 181       }
 182   , Work
 183       { workDate = "2025-11-24"
 184       , workDuration = 10
 185       , workAction = ["development"]
 186       , workScope = ["NGIpkgs", "Bonfire"]
 187       , workReferences = ["https://github.com/surface-ui/surface/issues/762#issuecomment-3577030748"]
 188       , workDescription = "continue to solve problems with Bonfire packaging"
 189       }
 190   , Work
 191       { workDate = "2025-11-27"
 192       , workDuration = 8
 193       , workAction = ["development"]
 194       , workScope = ["NGIpkgs", "Bonfire"]
 195       , workReferences = ["https://github.com/ngi-nix/ngipkgs/pull/1812#issuecomment-3584319056"]
 196       , workDescription = "successfully auto-update and build Bonfire"
 197       }
 198   , Work
 199       { workDate = "2025-11-28"
 200       , workDuration = 1
 201       , workAction = ["organization"]
 202       , workScope = ["NGIpkgs"]
 203       , workReferences = ["https://www.notion.so/nixos-foundation/Nix-NGI-weekly-review-36-2b959d49e1be80fa823cd4d83581fda5#2b959d49e1be80fc85eed38c9a9dca86"]
 204       , workDescription = "weekly meeting"
 205       }
 206   , Work
 207       { workDate = "2025-11-29"
 208       , workDuration = 5
 209       , workAction = ["development"]
 210       , workScope = ["NGIpkgs", "Bonfire"]
 211       , workReferences = []
 212       , workDescription = "begin the service module"
 213       }
 214   , Work
 215       { workDate = "2025-12-02"
 216       , workDuration = 4
 217       , workAction = ["development"]
 218       , workScope = ["NGIpkgs", "Bonfire"]
 219       , workReferences = []
 220       , workDescription = "continue the service module"
 221       }
 222   , Work
 223       { workDate = "2025-12-03"
 224       , workDuration = 8
 225       , workAction = ["development"]
 226       , workScope = ["NGIpkgs", "Bonfire"]
 227       , workReferences = []
 228       , workDescription = "first working service module"
 229       }
 230   , Work
 231       { workDate = "2025-12-04"
 232       , workDuration = 5
 233       , workAction = ["development"]
 234       , workScope = ["NGIpkgs", "Bonfire"]
 235       , workReferences = ["https://github.com/ngi-nix/ngipkgs/pull/1871"]
 236       , workDescription = "improve service module"
 237       }
 238   , Work
 239       { workDate = "2025-12-05"
 240       , workDuration = 1
 241       , workAction = ["organization"]
 242       , workScope = ["NGIpkgs"]
 243       , workReferences = ["https://www.notion.so/nixos-foundation/Nix-NGI-weekly-review-36-2b959d49e1be80fa823cd4d83581fda5"]
 244       , workDescription = "weekly meeting"
 245       }
 246   , Work
 247       { workDate = "2025-12-05"
 248       , workDuration = 0.5
 249       , workAction = ["documentation"]
 250       , workScope = ["NGIpkgs", "Manuals"]
 251       , workReferences = ["https://github.com/ngi-nix/ngipkgs/pull/1954"]
 252       , workDescription = "meeting"
 253       }
 254   , Work
 255       { workDate = "2025-12-06"
 256       , workDuration = 2
 257       , workAction = ["documentation"]
 258       , workScope = ["NGIpkgs", "Manuals"]
 259       , workReferences = []
 260       , workDescription = "prepare wednesday meeting"
 261       }
 262   , Work
 263       { workDate = "2025-12-07"
 264       , workDuration = 4
 265       , workAction = ["documentation"]
 266       , workScope = ["NGIpkgs", "Manuals"]
 267       , workReferences = []
 268       , workDescription = "prepare demo for wednesday meeting"
 269       }
 270   , Work
 271       { workDate = "2025-12-08"
 272       , workDuration = 4
 273       , workAction = ["documentation"]
 274       , workScope = ["NGIpkgs", "Manuals"]
 275       , workReferences = ["https://github.com/ngi-nix/ngipkgs/pull/1891"]
 276       , workDescription = "prepare demo for wednesday meeting"
 277       }
 278   , Work
 279       { workDate = "2025-12-09"
 280       , workDuration = 4
 281       , workAction = ["documentation"]
 282       , workScope = ["NGIpkgs", "Manuals"]
 283       , workReferences = ["https://github.com/ngi-nix/ngipkgs/pull/1891"]
 284       , workDescription = "continue to document"
 285       }
 286   , Work
 287       { workDate = "2025-12-10"
 288       , workDuration = 2
 289       , workAction = ["review"]
 290       , workScope = ["NGIpkgs"]
 291       , workReferences = ["https://www.notion.so/nixos-foundation/Nix-NGI-best-practices-for-NixOS-modules-implementation-2c559d49e1be80a8a499f21abb203d6f"]
 292       , workDescription = "visio on “best practices”"
 293       }
 294   , Work
 295       { workDate = "2025-12-12"
 296       , workDuration = 1
 297       , workAction = ["organization"]
 298       , workScope = ["NGIpkgs"]
 299       , workReferences = []
 300       , workDescription = "weekly visio meeting"
 301       }
 302   , Work
 303       { workDate = "2025-12-11"
 304       , workDuration = 8
 305       , workAction = ["documentation"]
 306       , workScope = ["NGIpkgs", "Manuals"]
 307       , workReferences = []
 308       , workDescription = "continue to document"
 309       }
 310   , Work
 311       { workDate = "2025-12-12"
 312       , workDuration = 4
 313       , workAction = ["documentation"]
 314       , workScope = ["NGIpkgs", "Manuals"]
 315       , workReferences = []
 316       , workDescription = "continue to document"
 317       }
 318   , Work
 319       { workDate = "2025-12-13"
 320       , workDuration = 2
 321       , workAction = ["documentation"]
 322       , workScope = ["NGIpkgs", "Manuals"]
 323       , workReferences = []
 324       , workDescription =
 325           [ "setup sphinx like "
 326           , Doc.InlineLink
 327               { Doc.inlineLinkTarget = "https://nix.dev"
 328               , Doc.inlineLinkText = "nix.dev"
 329               }
 330           , " for the manuals"
 331           ]
 332       }
 333   , Work
 334       { workDate = "2025-12-13"
 335       , workDuration = 5
 336       , workAction = ["development"]
 337       , workScope = ["NGIpkgs", "Bonfire"]
 338       , workReferences = ["https://github.com/bonfire-networks/bonfire-app/issues/1670#issuecomment-3650762914"]
 339       , workDescription = "update to latest; overcoming new bugs introduced by upstream"
 340       }
 341   , Work
 342       { workDate = "2025-12-15"
 343       , workDuration = 4
 344       , workAction = ["development"]
 345       , workScope = ["NGIpkgs", "Bonfire"]
 346       , workReferences = []
 347       , workDescription = "improving the update script and still overcoming upstream bugs"
 348       }
 349   , Work
 350       { workDate = "2025-12-16"
 351       , workDuration = 3
 352       , workAction = ["development"]
 353       , workScope = ["NGIpkgs", "Bonfire"]
 354       , workReferences = []
 355       , workDescription = "overcoming bugs, again"
 356       }
 357   , Work
 358       { workDate = "2025-12-16"
 359       , workDuration = 2
 360       , workAction = ["review"]
 361       , workScope = ["NGIpkgs"]
 362       , workReferences = []
 363       , workDescription = "visio to review PRs"
 364       }
 365   , Work
 366       { workDate = "2025-12-16"
 367       , workDuration = 2
 368       , workAction = ["review"]
 369       , workScope = ["NGIpkgs"]
 370       , workReferences = []
 371       , workDescription = "visio to review PRs"
 372       }
 373   , Work
 374       { workDate = "2025-12-17"
 375       , workDuration = 1.5
 376       , workAction = ["review"]
 377       , workScope = ["NGIpkgs"]
 378       , workReferences = []
 379       , workDescription = "visio to review PRs"
 380       }
 381   , Work
 382       { workDate = "2025-12-18"
 383       , workDuration = 1
 384       , workAction = ["review"]
 385       , workScope = ["NGIpkgs", "dnsvizor"]
 386       , workReferences = []
 387       , workDescription = "review linj’s PR"
 388       }
 389   , Work
 390       { workDate = "2025-12-19"
 391       , workDuration = 1.5
 392       , workAction = ["organization"]
 393       , workScope = ["NGIpkgs"]
 394       , workReferences = []
 395       , workDescription = "weekly meeting"
 396       }
 397   , Work
 398       { workDate = "2025-12-21"
 399       , workDuration = 4
 400       , workAction = ["development"]
 401       , workScope = ["NGIpkgs", "Bonfire"]
 402       , workReferences = []
 403       , workDescription =
 404           [ "fix bug using "
 405           , "__structuredAttrs" & Doc.InlineCode
 406           ]
 407       }
 408   , Work
 409       { workDate = "2025-12-23"
 410       , workDuration = 4
 411       , workAction = ["documentation"]
 412       , workScope = ["NGIpkgs", "Manuals"]
 413       , workReferences = []
 414       , workDescription = "improve building the manuals"
 415       }
 416   , Work
 417       { workDate = "2025-12-23"
 418       , workDuration = 2
 419       , workAction = ["development"]
 420       , workScope = ["NGIpkgs", "Bonfire"]
 421       , workReferences = []
 422       , workDescription = "address reviewers’ concerns"
 423       }
 424   , Work
 425       { workDate = "2025-12-24"
 426       , workDuration = 4
 427       , workAction = ["development"]
 428       , workScope = ["NGIpkgs", "Bonfire"]
 429       , workReferences = []
 430       , workDescription = "update Bonfire and report issues upstream"
 431       }
 432   , Work
 433       { workDate = "2025-12-24"
 434       , workDuration = 4
 435       , workAction = ["documentation"]
 436       , workScope = ["NGIpkgs", "Manuals"]
 437       , workReferences = []
 438       , workDescription = "document"
 439       }
 440   , Work
 441       { workDate = "2025-12-24"
 442       , workDuration = 2
 443       , workAction = ["development"]
 444       , workScope = ["NGIpkgs", "Bonfire"]
 445       , workReferences = []
 446       , workDescription = "update Bonfire to fix bugs"
 447       }
 448   , Work
 449       { workDate = "2025-12-25"
 450       , workDuration = 2
 451       , workAction = ["documentation"]
 452       , workScope = ["NGIpkgs", "Manuals"]
 453       , workReferences = []
 454       , workDescription = "document"
 455       }
 456   , Work
 457       { workDate = "2025-12-25"
 458       , workDuration = 6
 459       , workAction = ["development"]
 460       , workScope = ["NGIpkgs", "Bonfire"]
 461       , workReferences = ["https://github.com/bonfire-networks/bonfire-app/issues/1698#issuecomment-3692147409"]
 462       , workDescription = "update and fix bugs"
 463       }
 464   , Work
 465       { workDate = "2025-12-26"
 466       , workDuration = 1
 467       , workAction = ["development"]
 468       , workScope = ["NGIpkgs", "Bonfire"]
 469       , workReferences = []
 470       , workDescription = "update to fix bugs"
 471       }
 472   , Work
 473       { workDate = "2025-12-28"
 474       , workDuration = 6
 475       , workAction = ["documentation"]
 476       , workScope = ["NGIpkgs", "Manuals"]
 477       , workReferences = []
 478       , workDescription = "document"
 479       }
 480   , Work
 481       { workDate = "2025-12-29"
 482       , workDuration = 2
 483       , workAction = ["development"]
 484       , workScope = ["NGIpkgs", "Bonfire"]
 485       , workReferences = []
 486       , workDescription = "add more tests"
 487       }
 488   , Work
 489       { workDate = "2025-12-29"
 490       , workDuration = 0.5
 491       , workAction = ["review"]
 492       , workScope = ["NGIpkgs", "Funkwhale"] -- goes into NGI Review
 493       , workReferences = ["https://github.com/ngi-nix/ngipkgs/pull/1707#discussion_r2651644145"]
 494       , workDescription = ""
 495       }
 496   , Work
 497       { workDate = "2025-12-30"
 498       , workDuration = 4
 499       , workAction = ["development"]
 500       , workScope = ["NGIpkgs", "BEAM"]
 501       , workReferences = []
 502       , workDescription = ["improve ", Doc.InlineCode "buildMix", " & ", Doc.InlineCode "mixRelease", " for packaging Elixir software"]
 503       }
 504   , Work
 505       { workDate = "2026-01-01"
 506       , workDuration = 4
 507       , workAction = ["development"]
 508       , workScope = ["NGIpkgs", "Bonfire"]
 509       , workReferences = []
 510       , workDescription = "support other flavours"
 511       }
 512   , Work
 513       { workDate = "2026-01-03"
 514       , workDuration = 4
 515       , workAction = ["development"]
 516       , workScope = ["NGIpkgs", "Bonfire"]
 517       , workReferences = []
 518       , workDescription = "support other flavours, and make update more resilient"
 519       }
 520   , Work
 521       { workDate = "2026-01-04"
 522       , workDuration = 2
 523       , workAction = ["development"]
 524       , workScope = ["NGIpkgs", "Bonfire"]
 525       , workReferences = []
 526       , workDescription = "provide upstream with reproducers"
 527       }
 528   , Work
 529       { workDate = "2026-01-05"
 530       , workDuration = 2
 531       , workAction = ["development"]
 532       , workScope = ["NGIpkgs", "Bonfire"]
 533       , workReferences = []
 534       , workDescription = "update to latest version"
 535       }
 536   , Work
 537       { workDate = "2026-01-07"
 538       , workDuration = 5
 539       , workAction = ["development"]
 540       , workScope = ["NGIpkgs", "Bonfire"]
 541       , workReferences = []
 542       , workDescription = "fix updating"
 543       }
 544   , Work
 545       { workDate = "2026-01-07"
 546       , workDuration = 1
 547       , workAction = ["documentation"]
 548       , workScope = ["NGIpkgs", "Manuals"] -- goes into NGI Core
 549       , workReferences = ["https://github.com/ngi-nix/ngipkgs/pull/1891"]
 550       , workDescription = "address reviewer’s comment"
 551       }
 552   , Work
 553       { workDate = "2026-01-09"
 554       , workDuration = 2
 555       , workAction = ["documentation"]
 556       , workScope = ["NGIpkgs", "Manuals"] -- goes into NGI Core
 557       , workReferences = []
 558       , workDescription = "address reviewer’s comments"
 559       }
 560   , Work
 561       { workDate = "2026-01-09"
 562       , workDuration = 2
 563       , workAction = ["development"]
 564       , workScope = ["NGIpkgs", "Bonfire"]
 565       , workReferences = ["https://github.com/bonfire-networks/bonfire-app/issues/1730"]
 566       , workDescription = "answer upstream’s questions"
 567       }
 568   , Work
 569       { workDate = "2026-01-11"
 570       , workDuration = 5
 571       , workAction = ["development"]
 572       , workScope = ["NGIpkgs", "dnsvizor"]
 573       , workReferences = []
 574       , workDescription = ["replace ", Doc.InlineCode "hillingar", " to package MirageOS unikernels"]
 575       }
 576   , Work
 577       { workDate = "2026-01-09"
 578       , workDuration = 2
 579       , workAction = ["organization"]
 580       , workScope = ["NGIpkgs"]
 581       , workReferences = []
 582       , workDescription = "weekly meeting"
 583       }
 584   , Work
 585       { workDate = "2026-01-12"
 586       , workDuration = 5
 587       , workAction = ["development"]
 588       , workScope = ["NGIpkgs", "dnsvizor"]
 589       , workReferences = ["https://github.com/ju1m/ngipkgs/commits/dnsvizor/"]
 590       , workDescription = ["remove the need for ", Doc.InlineCode "--allow-import-from-derivation"]
 591       }
 592   , Work
 593       { workDate = "2026-01-12"
 594       , workDuration = 6
 595       , workAction = ["documentation"]
 596       , workScope = ["NGIpkgs", "Manuals"] -- goes into NGI Core
 597       , workReferences = []
 598       , workDescription = "render options"
 599       }
 600   , Work
 601       { workDate = "2026-01-13"
 602       , workDuration = 1
 603       , workAction = ["documentation"]
 604       , workScope = ["NGIpkgs", "Manuals"] -- goes into NGI Core
 605       , workReferences = []
 606       , workDescription = "update"
 607       }
 608   , Work
 609       { workDate = "2026-01-16"
 610       , workDuration = 2
 611       , workAction = ["organization"]
 612       , workScope = ["NGIpkgs"]
 613       , workReferences = []
 614       , workDescription = "weekly meeting"
 615       }
 616   , Work
 617       { workDate = "2026-01-19"
 618       , workDuration = 2
 619       , workAction = ["documentation"]
 620       , workScope = ["NGIpkgs", "Manuals"] -- goes into NGI Core
 621       , workReferences = []
 622       , workDescription = "split into several PDF"
 623       }
 624   , Work
 625       { workDate = "2026-01-22"
 626       , workDuration = 4
 627       , workAction = ["development"]
 628       , workScope = ["NGIpkgs", "Manuals"] -- goes into NGI Core
 629       , workReferences = ["https://github.com/ngi-nix/ngipkgs/pull/2010"]
 630       , workDescription = "address reviewers’ concerns"
 631       }
 632   , Work
 633       { workDate = "2026-01-23"
 634       , workDuration = 1.5
 635       , workAction = ["organization"]
 636       , workScope = ["NGIpkgs"]
 637       , workReferences = []
 638       , workDescription = "weekly meeting"
 639       }
 640   , Work
 641       { workDate = "2026-01-25"
 642       , workDuration = 4
 643       , workAction = ["development"]
 644       , workScope = ["NGIpkgs", "Seppo"]
 645       , workReferences = []
 646       , workDescription = "begin packaging"
 647       }
 648   , Work
 649       { workDate = "2026-01-26"
 650       , workDuration = 5
 651       , workAction = ["development"]
 652       , workScope = ["NGIpkgs", "Seppo"]
 653       , workReferences = []
 654       , workDescription = "continue packaging"
 655       }
 656   , Work
 657       { workDate = "2026-01-27"
 658       , workDuration = 5
 659       , workAction = ["development"]
 660       , workScope = ["NGIpkgs", "Seppo"]
 661       , workReferences = []
 662       , workDescription = "continue packaging"
 663       }
 664   ]
 665
 666 invoiceRate_NGIpkgs =
 667   [ ["organization"] := 31.25
 668   , ["development"] := 31.25
 669   , ["documentation"] := 31.25
 670   , ["review"] := 31.25
 671   ]
 672
 673 invoice_org3sale1 =
 674   InvoiceId
 675     { invoiceIdRecipient = Orga.nixosFoundationNGITeam
 676     , invoiceIdType = InvoiceTypeSale
 677     , invoiceIdCount = 1
 678     }
 679     := let invoiceEmittedOn = "2026-01-22"
 680        in invoice
 681             { invoiceOrders = ["Contract n°2025-24"]
 682             , invoiceEmittedOn
 683             , invoicePaymentDueBefore = invoiceEmittedOn & Time.addLocalTime (31 * Time.nominalDay)
 684             , invoiceIssuer = Orga.julmInfo
 685             , invoiceRecipient = Orga.nixosFoundationNGITeam
 686             , invoiceRates = invoiceRate_NGIpkgs
 687             , invoiceMentions =
 688                 [ InvoiceMentionTVANonApplicable
 689                 , InvoiceMentionIndemnitéForfaitaire
 690                 , InvoiceMentionIndemnitéTaux (12.15 :: Amount 100 (UnitName "%"))
 691                 ]
 692             , invoiceWorks =
 693                 works_NGIpkgs
 694                   & List.filter \work ->
 695                     and $
 696                       list
 697                         [ work & workDate & (>= "2025-11-06")
 698                         , work & workDate & (<= "2025-12-22")
 699                         , work & workScope & (/= ["NGIpkgs", "Manuals"])
 700                         ]
 701             }
 702 invoice_org3sale2 =
 703   InvoiceId
 704     { invoiceIdRecipient = Orga.nixosFoundationNGITeam
 705     , invoiceIdType = InvoiceTypeSale
 706     , invoiceIdCount = 2
 707     }
 708     := let invoiceEmittedOn = "2026-01-27"
 709        in invoice
 710             { invoiceOrders = ["contract n°2026-03"]
 711             , invoiceEmittedOn
 712             , invoicePaymentDueBefore = invoiceEmittedOn & Time.addLocalTime (31 * Time.nominalDay)
 713             , invoiceIssuer = Orga.julmInfo
 714             , invoiceRecipient = Orga.nixosFoundationNGITeam
 715             , invoiceRates = invoiceRate_NGIpkgs
 716             , invoiceMentions =
 717                 [ InvoiceMentionTVANonApplicable
 718                 , InvoiceMentionIndemnitéForfaitaire
 719                 , InvoiceMentionIndemnitéTaux (12.15 :: Amount 100 (UnitName "%"))
 720                 ]
 721             , invoiceWorks =
 722                 works_NGIpkgs
 723                   & List.filter \work ->
 724                     and $
 725                       [ work & workDate & (>= "2025-12-23")
 726                       , work & workDate & (<= "2026-12-31")
 727                       , work & workScope & (/= ["NGIpkgs", "Manuals"])
 728                       , work & workScope & (/= ["NGIpkgs", "Funkwhale"])
 729                       , not $
 730                           and $
 731                             [ work & workDate & (>= "2026-01-09")
 732                             , work & workDate & (<= "2026-01-28")
 733                             , work & workAction & (== ["organization"])
 734                             , work & workScope & (== ["NGIpkgs"])
 735                             ]
 736                               & list
 737                       ]
 738                         & list
 739             }
 740
 741 invoice_org3sale3 =
 742   InvoiceId
 743     { invoiceIdRecipient = Orga.nixosFoundationNGITeam
 744     , invoiceIdType = InvoiceTypeSale
 745     , invoiceIdCount = 3
 746     }
 747     := let invoiceEmittedOn = "2026-01-28"
 748        in invoice
 749             { invoiceOrders = ["contract n°2026-FixMe"]
 750             , invoiceEmittedOn
 751             , invoicePaymentDueBefore = invoiceEmittedOn & Time.addLocalTime (31 * Time.nominalDay)
 752             , invoiceIssuer = Orga.julmInfo
 753             , invoiceRecipient = Orga.nixosFoundationNGITeam
 754             , invoiceRates = invoiceRate_NGIpkgs
 755             , invoiceMentions =
 756                 [ InvoiceMentionTVANonApplicable
 757                 , InvoiceMentionIndemnitéForfaitaire
 758                 , InvoiceMentionIndemnitéTaux (12.15 :: Amount 100 (UnitName "%"))
 759                 ]
 760             , invoiceWorks =
 761                 works_NGIpkgs
 762                   & List.filter \work ->
 763                     or $
 764                       [ and $
 765                           [ work & workDate & (>= "2026-01-21")
 766                           , work & workDate & (<= "2026-12-31")
 767                           , work & workScope & (== ["NGIpkgs", "Manuals"])
 768                           ]
 769                             & list
 770                       , and $
 771                           [ work & workDate & (>= "2025-12-29")
 772                           , work & workDate & (<= "2026-12-31")
 773                           , work & workScope & (== ["NGIpkgs", "Funkwhale"])
 774                           ]
 775                             & list
 776                       , and $
 777                           [ work & workDate & (>= "2026-01-09")
 778                           , work & workDate & (<= "2026-01-28")
 779                           , work & workAction & (== ["organization"])
 780                           , work & workScope & (== ["NGIpkgs"])
 781                           ]
 782                             & list
 783                       ]
 784                         & list
 785             }
 786
 787 invoices :: Invoices
 788 invoices =
 789   [ invoice_org3sale1
 790   , invoice_org3sale2
 791   , invoice_org3sale3
 792   ]
 793     & Map.fromListWith undefined
 794
 795 accounting :: [Movement]
 796 accounting =
 797   [ Movement
 798       { moveDate = "2026-01-27"
 799       , moveFrom = AccountOrga Orga.upwork
 800       , moveTo = AccountOrga Orga.julmInfo
 801       , moveAmount = 174.30
 802       }
 803   , Movement
 804       { moveDate = "2026-01-28"
 805       , moveFrom = AccountOrga Orga.nixosFoundationNGITeam
 806       , moveTo = AccountOrga Orga.julmInfo
 807       , moveAmount = 2000
 808       }
 809   , Movement
 810       { moveDate = "2026-01-29"
 811       , moveFrom = AccountOrga Orga.nixosFoundationNGITeam
 812       , moveTo = AccountOrga Orga.julmInfo
 813       , moveAmount = 4643.75
 814       }
 815   ]
 816
 817 {-
 818 29/01/2026      VIREMENT INSTANTANE CREDIT      + 4 643,75 €  4643.75
 819
 820 28/01/2026      ACHAT CB USSEL DISTRIBU 27.01.26
 821 CARTE NUMERO 271        − 227,74 €  -227.74
 822
 823 28/01/2026      ACHAT CB DR COMBEAU ALA 27.01.26
 824 CARTE NUMERO 271        − 31,50 €   -31.5
 825
 826 28/01/2026      VIREMENT INSTANTANE DE
 827 Stichting NixOS Foundati
 828 org3sale2       + 2 000,00 €  2000.0
 829
 830 27/01/2026      VIREMENT DE PAYMENT ESCROW INC
 831 4366185389168127
 832 PAYMENT ESCROW INC DOB-1987-Apr-
 833 REFERENCE : 0189027600000400    + 174,30 €
 834 -}