{-# LANGUAGE TypeApplications #-}
{-# LANGUAGE AllowAmbiguousTypes #-}
{-# LANGUAGE QuantifiedConstraints #-}
{-# LANGUAGE InstanceSigs #-}
{-# LANGUAGE TemplateHaskell #-}
module Data.Units.SI.Prefixes
( Quecto (..)
, Ronto (..)
, Yocto (..)
, Zepto (..)
, Atto (..)
, Femto (..)
, Pico (..)
, Nano (..)
, Micro (..)
, Milli (..)
, Centi (..)
, Deci (..)
, Deca (..)
, Hecto (..)
, Kilo (..)
, Mega (..)
, Giga (..)
, Tera (..)
, Peta (..)
, Exa (..)
, Zetta (..)
, Yotta (..)
, Ronna (..)
, Quecca (..)
) where
import Data.Units.Base
$(mkPrefix "Quecto" "q" 1e-30)
$(mkPrefix "Ronto" "r" 1e-27)
$(mkPrefix "Yocto" "y" 1e-24)
$(mkPrefix "Zepto" "z" 1e-21)
$(mkPrefix "Atto" "a" 1e-18)
$(mkPrefix "Femto" "f" 1e-15)
$(mkPrefix "Pico" "p" 1e-12)
$(mkPrefix "Nano" "n" 1e-9)
$(mkPrefix "Micro" "µ" 1e-6)
$(mkPrefix "Milli" "m" 1e-3)
$(mkPrefix "Centi" "c" 1e-2)
$(mkPrefix "Deci" "d" 1e-1)
$(mkPrefix "Deca" "da" 1e1)
$(mkPrefix "Hecto" "h" 1e2)
$(mkPrefix "Kilo" "k" 1e3)
$(mkPrefix "Mega" "M" 1e6)
$(mkPrefix "Giga" "G" 1e9)
$(mkPrefix "Tera" "T" 1e12)
$(mkPrefix "Peta" "P" 1e15)
$(mkPrefix "Exa" "E" 1e18)
$(mkPrefix "Zetta" "Z" 1e21)
$(mkPrefix "Yotta" "Y" 1e24)
$(mkPrefix "Ronna" "R" 1e27)
$(mkPrefix "Quecca" "Q" 1e30)