summary.spatial.design.r
# fields, Tools for spatial data
# Copyright 2004-2011, Institute for Mathematics Applied Geosciences
# University Corporation for Atmospheric Research
# Licensed under the GPL -- www.gpl.org/licenses/gpl.html
"summary.spatial.design" <- function(object, digits = 4,
...) {
x <- object
class(x) <- ("summary.spatial.design")
x
}