anchor.diff:                  let efin = e.[gcvminIndex]
                   let afin = a.[gcvminIndex]
                   let cfin = c.[gcvminIndex]
  -                let lambdafin = 0.01*(1.2**(float gcvminIndex))
  +                let lambdafin = lambd
                   ((efin,gcvmin),afin,lambdafin,cfin)
                       )
           |> unzip4List
  
positive.code:                     if maxs.[0] < mins.[0] then 3
                      else -3
  
          createHermiteResult fit.TraceA fit.TraceC fit.Error fit.GCV fit.Lambda mins maxs clNew
  
          
  
  
negative.code:         Error    : float
          GCV      : float
          Lambda   : float
          Ctemp    : float [,]
          Variance : float
          }
      
      let createHermiteResultSimple a c e gcv lambda ctemp var= {
          TraceA   = a
          TraceC   = c
          Error    = e
          GCV      = gcv
          Lambda   = lambda
          Ctemp    = ctemp
          Variance = var
          }
      
      type HermiteResult = {
  