def get_r_e
      r_e = Hash.new

      begin
        @icrs_2.each do |k, v|
          next if k == :earth
          r_e[k] = calc_dist(@icrs_2[:earth][0, 3], v[0, 3])
        end
        return r_e
      rescue => e
        raise
      end
    end
def get_r_e
      r_e = Hash.new

      begin
        @icrs_2.each do |k, v|
          next if k == :earth
          r_e[k] = calc_dist(@icrs_2[:earth][0, 3], v[0, 3])
        end
        return r_e
      rescue => e
        raise
      end
    end
=========================================================================
 t2(= TDB) における地球と太陽・月の距離

 @param:  <none>
 @return: r_e  (地球と太陽・月の距離(Hash))
=========================================================================