Commits

Takayuki Muranushi  committed 4dd1318

modify the derived types.

  • Participants
  • Parent commits daf476e

Comments (0)

Files changed (1)

File src/UnitTyped/SI/Derived.hs

 --
 
 -- |Density.  @Length^-3 Mass^1@.
-type Density = '[ '(Mass, POne), '(Length, NThree) ]
+type Density = '[ '(Length, NThree), '(Mass, POne) ]
 
 
 --
 
 -- | Gravitational potential.  @Length^2 Time^-2@.
 
-type GravitationalPotential = '[ '(Length, PTwo), '(Time, NTwo) ]
+type GravitationalPotential = '[ '(Time, NTwo),  '(Length, PTwo) ]