h/t Arnaud discussed in #265

James-Thorson-NOAA · Dec 10, 2020 · 19089e5 · 19089e5
1 parent e4c1f0a
commit 19089e5
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/make_model.R b/R/make_model.R
@@ -216,7 +216,7 @@ function( TmbData,
   }
   if( ("OverdispersionConfig"%in%names(TmbData)) ){
     if( TmbData[["OverdispersionConfig"]][1]==0 ) Bounds = boundsifpresent_fn( par=Obj$par, name="L1_z", lower=c(-Inf,-0.99), upper=c(Inf,0.99), bounds=Bounds)
-    if( TmbData[["OverdispersionConfig"]][1]==0 ) Bounds = boundsifpresent_fn( par=Obj$par, name="L2_z", lower=c(-Inf,-0.99), upper=c(Inf,0.99), bounds=Bounds)
+    if( TmbData[["OverdispersionConfig"]][2]==0 ) Bounds = boundsifpresent_fn( par=Obj$par, name="L2_z", lower=c(-Inf,-0.99), upper=c(Inf,0.99), bounds=Bounds)
   }
   #for(i in 1:4){
   #  if( TmbData[["FieldConfig"]][i]==0 ){