import(stats)
exportPattern("^to\\.tensor.*")
exportPattern("\\.tensor$")
export("norm")
export("opnorm")
exportPattern("mark.*")
export("untensor")
#export("slice.tensor<-")
exportPattern("as\\..*")
exportPattern("^%")
exportPattern("contraname")
exportPattern("^is\\.")
S3method(to.tensor,default)
S3method(ftable,tensor)
S3method(names,tensor)
S3method("names<-",tensor)
S3method(dimnames,tensor)
S3method("dimnames<-",tensor)
S3method(norm,tensor)
S3method(opnorm,tensor)
S3method(reorder,tensor)
S3method(rep,tensor)
S3method(solve,tensor)
S3method("[[",tensor)
S3method("[[<-",tensor)
S3method("[",tensor)
S3method("%e%",tensor)
S3method("%r%",tensor)
S3method("+",tensor)
S3method("-",tensor)
S3method("*",tensor)
S3method("/",tensor)
S3method(mark,tensor)
S3method(mark,numeric)
S3method(mark,character)
S3method("dim<-",tensor)
useDynLib(tensorA,tensoraCmulhelper,tensoramulhelper)

S3method("$", tensor)
S3method("^", tensor)
S3method("|", tensor)
S3method(mean, tensor)

S3method(as.contravariate, character)
S3method(as.covariate, character)
S3method(as.tensor, default)
S3method(as.tensor, tensor)
S3method(is.contravariate, character)
S3method(is.contravariate, numeric)
S3method(is.contravariate, tensor)
S3method(is.covariate, character)
S3method(is.covariate, numeric)
S3method(is.covariate, tensor)
     
