done with TPointDimN::Dimension