From ddaa35ff58c8dcb04ef86723dccba0bfa97cf053 Mon Sep 17 00:00:00 2001
From: Johannes Ranke <jranke@uni-bremen.de>
Date: Tue, 1 Jul 2014 08:34:01 +0200
Subject: One more source code comment

---
 R/mkinfit.R | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/R/mkinfit.R b/R/mkinfit.R
index 661dfda4..f1a3e6bb 100644
--- a/R/mkinfit.R
+++ b/R/mkinfit.R
@@ -59,6 +59,8 @@ mkinfit <- function(mkinmod, observed,
          " not used in the model")
   }
 
+  # Set initial parameter values, including a small increment (salt)
+  # to avoid linear dependencies (singular matrix) in Eigenvalue based solutions
   k_salt = 0
   defaultpar.names <- setdiff(mkinmod$parms, names(parms.ini))
   for (parmname in defaultpar.names) {
-- 
cgit v1.2.1