RF: common dtype for squash_ without result_type

``squash_`` used ``np.result_type`` to work out a common dtype for the
passed arrays, but ``result_type`` is a 1.6.0 innovation   Simulate
``result_type`` for numpies < 1.6.0.  Test.