Chris@16: // Boost.Units - A C++ library for zero-overhead dimensional analysis and 
Chris@16: // unit/quantity manipulation and conversion
Chris@16: //
Chris@16: // Copyright (C) 2003-2008 Matthias Christian Schabel
Chris@16: // Copyright (C) 2007-2008 Steven Watanabe
Chris@16: //
Chris@16: // Distributed under the Boost Software License, Version 1.0. (See
Chris@16: // accompanying file LICENSE_1_0.txt or copy at
Chris@16: // http://www.boost.org/LICENSE_1_0.txt)
Chris@16: 
Chris@16: #ifndef BOOST_UNITS_MAKE_SCALED_UNIT_HPP_INCLUDED
Chris@16: #define BOOST_UNITS_MAKE_SCALED_UNIT_HPP_INCLUDED
Chris@16: 
Chris@16: #include <boost/units/units_fwd.hpp>
Chris@16: #include <boost/units/heterogeneous_system.hpp>
Chris@16: #include <boost/units/unit.hpp>
Chris@16: 
Chris@16: namespace boost {
Chris@16: namespace units {
Chris@16: 
Chris@16: template<class Unit, class Scale>
Chris@16: struct make_scaled_unit {
Chris@16:     typedef typename make_scaled_unit<typename reduce_unit<Unit>::type, Scale>::type type;
Chris@16: };
Chris@16: 
Chris@16: template<class Dimension, class UnitList, class OldScale, class Scale>
Chris@16: struct make_scaled_unit<unit<Dimension, heterogeneous_system<heterogeneous_system_impl<UnitList, Dimension, OldScale> > >, Scale> {
Chris@16:     typedef unit<
Chris@16:         Dimension,
Chris@16:         heterogeneous_system<
Chris@16:             heterogeneous_system_impl<
Chris@16:                 UnitList,
Chris@16:                 Dimension,
Chris@16:                 typename mpl::times<
Chris@16:                     OldScale,
Chris@16:                     list<scale_list_dim<Scale>, dimensionless_type>
Chris@16:                 >::type
Chris@16:             >
Chris@16:         >
Chris@16:     > type;
Chris@16: };
Chris@16: 
Chris@16: template<class Dimension, class UnitList, class OldScale, long Base>
Chris@16: struct make_scaled_unit<unit<Dimension, heterogeneous_system<heterogeneous_system_impl<UnitList, Dimension, OldScale> > >, scale<Base, static_rational<0> > > {
Chris@16:     typedef unit<
Chris@16:         Dimension,
Chris@16:         heterogeneous_system<
Chris@16:             heterogeneous_system_impl<
Chris@16:                 UnitList,
Chris@16:                 Dimension,
Chris@16:                 OldScale
Chris@16:             >
Chris@16:         >
Chris@16:     > type;
Chris@16: };
Chris@16: 
Chris@16: }
Chris@16: }
Chris@16: 
Chris@16: #endif