Is a form zero to within numerical precision?

Given a \(k\)-form, return TRUE if it is “small”

issmall(M, tol=1e-8)

Arguments

M

Object of class kform or ktensor

tol

Small tolerance, defaulting to 1e-8

Value

Returns a logical

Author

Robin K. S. Hankin

Examples

o <- kform_general(3,2,runif(3))
M <- matrix(rnorm(9),3,3)

discrepancy <- o - pullback(pullback(o,M),solve(M))

discrepancy # print method might imply coefficients are zeros
#> An alternating linear map from V^2 to R with V=R^3:
#>                   val
#>  1 2  =  2.498002e-16
#>  1 3  =  1.110223e-16
#>  2 3  =  5.551115e-17

issmall(discrepancy)  # should be TRUE
#> [1] TRUE
is.zero(discrepancy)  # might be FALSE
#> [1] FALSE