R/initModellist.R

"initModellist" <-
  function(m) {
    m@parnames <- sort(intersect(
      setdiff(slotNames(theta()), c("prel", "drel")),
      slotNames(m)
    ))
    m <- initOneModel(m)
  }
glotaran/TIMP documentation built on Feb. 11, 2023, 4:11 a.m.