RosettaCodeData/Task/Temperature-conversion/Mathematica/temperature-conversion.math

3 lines
146 B
Plaintext

tempConvert[t_] := # -> Thread@UnitConvert[#,{"DegreesFahrenheit", "DegreesCelsius", "DegreesRankine"}]&@Quantity[N@t, "Kelvins"]
tempConvert[21]