Modern analytical electromagnetic homogenization with mathematica. (2020)