SCM

SCM Repository

[matrix] View of /pkg/R/ssclme.R
ViewVC logotype

View of /pkg/R/ssclme.R

Parent Directory Parent Directory | Revision Log Revision Log


Revision 40 - (download) (annotate)
Tue Mar 30 23:21:34 2004 UTC (16 years, 2 months ago) by bates
File size: 621 byte(s)
Change coersions to R code only
setReplaceMethod("coef", signature(object = "ssclme", value = "numeric"),
                 function(object, unconst = FALSE, ..., value)
                 .Call(ifelse(unconst, "ssclme_coefGetsUnc",
                              "ssclme_coefGets"),
                       object, as.double(value), PACKAGE = "Matrix"))

setAs("ssclme", "sscMatrix",
      function(from)
      new("sscMatrix", i = from@i, p = from@p, Dim = from@Dim, x = from@x,
          uplo = "U"))

setAs("ssclme", "tscMatrix",
      function(from)
      new("sscMatrix", i = from@Li, p = from@Lp, Dim = from@Dim, x = from@Lx,
          uplo = "L"))



root@r-forge.r-project.org
ViewVC Help
Powered by ViewVC 1.0.0  
Thanks to:
Vienna University of Economics and Business Powered By FusionForge