aboutsummaryrefslogtreecommitdiff
path: root/R/mkinmod.R
diff options
context:
space:
mode:
Diffstat (limited to 'R/mkinmod.R')
-rw-r--r--R/mkinmod.R3
1 files changed, 3 insertions, 0 deletions
diff --git a/R/mkinmod.R b/R/mkinmod.R
index 7f7f8587..491b3d0a 100644
--- a/R/mkinmod.R
+++ b/R/mkinmod.R
@@ -370,5 +370,8 @@ print.mkinmod <- function(x, ...) {
}
if (is.matrix(x$coefmat)) cat("Coefficient matrix $coefmat available\n")
if (!is.null(x$cf)) cat("Compiled model $cf available\n")
+ cat("Differential equations:\n")
+ nice_diffs <- gsub("^(d.*) =", "\\1/dt =", x[["diffs"]])
+ writeLines(strwrap(nice_diffs, exdent = 11))
}
# vim: set foldmethod=marker ts=2 sw=2 expandtab:

Contact - Imprint