From bb1c5cb31e58e893d33d5185d7e0b4947d6ea44a Mon Sep 17 00:00:00 2001
From: ivar <amvdw95@gmail.com>
Date: Wed, 19 Aug 2015 17:47:48 +0000
Subject: [PATCH] removed '-1' factor to calculate BC. BC parameter is already
 relative to 0.0

---
 da/stilt/stilt.co2.simu.2015.Aug.bc.r | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/da/stilt/stilt.co2.simu.2015.Aug.bc.r b/da/stilt/stilt.co2.simu.2015.Aug.bc.r
index 8b5041c..c988a9d 100755
--- a/da/stilt/stilt.co2.simu.2015.Aug.bc.r
+++ b/da/stilt/stilt.co2.simu.2015.Aug.bc.r
@@ -25,7 +25,7 @@ procs= as.integer(args[1])
 #inputs and outputs
 stiltfile = paste("stilt_",procs,".rc", sep="")
 
-curdir="/Storage/CO2/wei/ctdas-stilt-parallel-bc-f-newcov-bugfix-updatedfoot/exec/da/stilt/"
+curdir="/Storage/ivar/ctdas-stilt-moresites-aircraft-final/exec/da/stilt/"
 fn=paste(curdir, stiltfile,sep="")
 conf=as.matrix(read.table(fn,header=FALSE))
 
@@ -694,12 +694,12 @@ for(mm in 1:length(pfbfns))
     {
       if(xxleft<b2)  #flux with scaling factors
       {
-        fbouarr[i] = fbou + (scalefacarr_bc1[i]-1.)
+        fbouarr[i] = fbou + (scalefacarr_bc1[i])
         
       }
       else
       {
-        fbouarr[i] = fbou + (scalefacarr_bc2[i]-1.)
+        fbouarr[i] = fbou + (scalefacarr_bc2[i])
         
       }
     }
-- 
GitLab