max/poet
1
0
Fork 0
mirror of https://git.gfz-potsdam.de/naaice/poet.git synced 2025-12-16 12:54:50 +01:00
Code Issues Packages Projects Releases Wiki Activity

Update file dolo_interp_long.R

Browse Source
This commit is contained in:
Max Lübke 2023-11-21 16:25:50 +01:00
parent 75702bb351
commit 433f095f58
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
bench/dolo/dolo_interp_long.R
View File

@ -165,8 +165,8 @@ check_sign_cal_dol_interp <- function(to_interp, data_set) {
}
check_neg_cal_dol <- function(result) {
neg_sign <- (result["Calcite"] <- 0) || (result["Dolomite"] < 0)
return(any(neg_sign))
neg_sign <- (result["Calcite"] < 0) || (result["Dolomite"] < 0)
return(neg_sign)
}
hooks <- list(