(o <- kform_general(5,2,1:10))
hodge(o)
Faraday <- kform_general(4,2,runif(6)) # Faraday electromagnetic tensor
minsk <- c(-1,1,1,1) # Minkowski metric
hodge(Faraday,g=minsk)
Faraday==Faraday|>hodge(g=minsk)|>hodge(g=minsk)|>hodge(g=minsk)|>hodge(g=minsk)
hodge(dx,3) == dy^dz
## Some edge-cases:
hodge(scalar(1),2)
hodge(zero(5),9)
hodge(volume(5))
hodge(volume(5),lose=TRUE)
hodge(scalar(7),n=9)
Run the code above in your browser using DataLab