Text this: A structure-preserving doubling algorithm for the square root of regular M-matrix