zap function

Zap small values in $k$-forms and $k$-tensors