Merge pull request #1248 from metrumresearchgroup/fix-evtools-model

Slight refactor of REG 3
metrumresearchgroup · Oct 15, 2024 · a231402 · a231402
2 parents 5abecfb + 54563f0
commit a231402
Showing 1 changed file with 1 addition and 5 deletions.
diff --git a/inst/models/evtools.cpp b/inst/models/evtools.cpp
@@ -21,11 +21,8 @@ REG = 1, Until = 24*8
 
 $PKMODEL cmt = "DEPOT CENT", depot = TRUE
 
-$PREAMBLE
-reg.init(self);
-
 $PK 
-if(NEWIND < 1) reg.init(self);
+if(REG==3 && NEWIND <= 1) reg.init(self);
 
 double CL = exp(log(TVCL) + 0.75*log(WT/70) + ETA(1));
 double V  = exp(log(TVV)  +      log(WT/70) + ETA(2));
@@ -53,7 +50,6 @@ if(REG==2) {
 }
 
 if(REG==3) {
-  reg.init(self); 
   reg.amt(Amt); 
   reg.cmt(1);
   reg.rate(Rate);