@@ -227,6 +227,7 @@ siUnitMap = M.fromList
227227 , ("pF", str "pF")
228228 , ("K", str "K")
229229 , ("dB", str "dB")
230+ , ("ampere", str "A")
230231 , ("angstrom", str "Å")
231232 , ("arcmin", str "′")
232233 , ("arcminute", str "′")
@@ -238,9 +239,11 @@ siUnitMap = M.fromList
238239 , ("barn", str "b")
239240 , ("becquerel", str "Bq")
240241 , ("bel", str "B")
242+ , ("bohr", emph (str "a") <> subscript (str "0"))
241243 , ("candela", str "cd")
242244 , ("celsius", str "°C")
243245 , ("centi", str "c")
246+ , ("clight", emph (str "c") <> subscript (str "0"))
244247 , ("coulomb", str "C")
245248 , ("dalton", str "Da")
246249 , ("day", str "d")
@@ -250,12 +253,16 @@ siUnitMap = M.fromList
250253 , ("degreeCelsius",str "°C")
251254 , ("degree", str "°")
252255 , ("deka", str "d")
256+ , ("electronmass", emph (str "m") <> subscript (str "e"))
253257 , ("electronvolt", str "eV")
258+ , ("elementarycharge", emph (str "e"))
254259 , ("exa", str "E")
255260 , ("farad", str "F")
256261 , ("femto", str "f")
257262 , ("giga", str "G")
258263 , ("gram", str "g")
264+ , ("gray", str "Gy")
265+ , ("hartree", emph (str "E") <> subscript (str "h"))
259266 , ("hectare", str "ha")
260267 , ("hecto", str "h")
261268 , ("henry", str "H")
@@ -290,6 +297,7 @@ siUnitMap = M.fromList
290297 , ("per", str "/")
291298 , ("peta", str "P")
292299 , ("pico", str "p")
300+ , ("planckbar", emph (str "\x210f"))
293301 , ("radian", str "rad")
294302 , ("second", str "s")
295303 , ("siemens", str "S")