An object-oriented-like package for tensor calculation in Mathematica