From 4995fef3a7e4968dddf5e86cbf523b85ad5776a4 Mon Sep 17 00:00:00 2001 From: "C. Brenhin Keller" Date: Thu, 28 Mar 2024 16:30:38 -0400 Subject: [PATCH] Test `C`-filling property of new `carbonateconversion!` --- Project.toml | 2 +- test/testGeochemistry.jl | 9 +++++++++ 2 files changed, 10 insertions(+), 1 deletion(-) diff --git a/Project.toml b/Project.toml index 8616b78..68ba0e0 100644 --- a/Project.toml +++ b/Project.toml @@ -1,7 +1,7 @@ name = "StatGeochem" uuid = "df4de05a-b714-11e8-3c2a-c30fb13e804c" authors = ["C. Brenhin Keller "] -version = "0.7.6" +version = "0.7.7" [deps] Colors = "5ae59095-9a9b-59fe-a467-6f913c188581" diff --git a/test/testGeochemistry.jl b/test/testGeochemistry.jl index 60456aa..bf99544 100644 --- a/test/testGeochemistry.jl +++ b/test/testGeochemistry.jl @@ -49,6 +49,15 @@ @test all(C["TIC"] .≈ 0.9616817911685506*molarmass["C"]/(molarmass["C"] + 2molarmass["O"])) @test all(C["TOC"] .≈ 1 - 0.9616817911685506*molarmass["C"]/(molarmass["C"] + 2molarmass["O"])) + D = ["CaCO3" "MgCO3" "CaO" "MgO" "CO2" "TOC" "TIC" "TC" "C"; 1 1 NaN NaN NaN NaN NaN NaN NaN; 1 1 NaN NaN NaN NaN NaN NaN NaN] + C = elementify(D, importas=:Dict) + carbonateconversion!(C) + @test all(C["MgO"] .≈ (molarmass["Mg"]+molarmass["O"])/(molarmass["Mg"]+molarmass["C"]+3molarmass["O"])) + @test all(C["CaO"] .≈ (molarmass["Ca"]+molarmass["O"])/(molarmass["Ca"]+molarmass["C"]+3molarmass["O"])) + @test all(C["CO2"] .≈ (molarmass["C"]+2molarmass["O"])/(molarmass["Ca"]+molarmass["C"]+3molarmass["O"]) + (molarmass["C"]+2molarmass["O"])/(molarmass["Mg"]+molarmass["C"]+3molarmass["O"])) + @test all(C["TIC"] .≈ 0.9616817911685506*molarmass["C"]/(molarmass["C"] + 2molarmass["O"])) + @test all(C["C"] .≈ 1e4*0.9616817911685506*molarmass["C"]/(molarmass["C"] + 2molarmass["O"])) + # Weathering indices @test CIA(14.8577, 4.5611, 3.29641, 2.3992) ≈ 47.66582778067264 @test WIP(3.2964, 4.5611, 2.3992, 5.9121) ≈ 78.40320264846837