Calculate pCap OAE and react silently if te_oae33 doesnt exist

pik-piam · Aug 10, 2024 · 3b74dbc · 3b74dbc
1 parent 424277d
commit 3b74dbc
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 1 deletion.
diff --git a/R/reportEmi.R b/R/reportEmi.R
@@ -204,7 +204,7 @@ reportEmi <- function(gdx, output = NULL, regionSubsetList = NULL,
   }
 
   s33_capture_rate <- readGDX(gdx, "s33_capture_rate", react = "silent")
-  te_oae33 <- readGDX(gdx, "te_oae33")
+  te_oae33 <- readGDX(gdx, "te_oae33", react = "silent")
   if (is.null(s33_capture_rate)) {
     s33_capture_rate <- 0.9
     te_oae33 <- c("oae_el", "oae_ng")

diff --git a/inst/compareScenarios/preprocessing.R b/inst/compareScenarios/preprocessing.R
@@ -80,6 +80,7 @@ pCapVariables <- tribble(
   "Emi|CO2|CDR|BECCS", "t CO2eq/yr/pCap", 1e6,
   "Emi|CO2|CDR|Industry CCS|Synthetic Fuels", "t CO2eq/yr/pCap", 1e6,
   "Emi|CO2|CDR|DACCS", "t CO2eq/yr/pCap", 1e6,
+  "Emi|CO2|CDR|OAE", "t CO2eq/yr/pCap", 1e6,
   "Emi|CO2|CDR|EW", "t CO2eq/yr/pCap", 1e6,
   "Emi|CO2", "t CO2eq/yr/pCap", 1e6,
   "Emi|CO2|Land-Use Change", "t CO2eq/yr/pCap", 1e6,