R/print.mpr.R

In ggrothendieck/rmathpiper: R interface to the mathpiper computer algebra system

Defines functions print.mpr

Documented in print.mpr

print.mpr <- function(x, ...) {
    msg <- attr(x, "msg")
	if (!is.null(msg) && nchar(msg) > 0) warning(msg)
    cat(x, ..., "\n", sep = "")
}