There are quite a number of temperature scales. For this task we will concentrate on four of the perhaps best-known ones:
Kelvin, Celsius, Fahrenheit, and Rankine.

The Celsius and Kelvin scales have the same magnitude, but different null points.

 0 degrees Celsius corresponds to 273.15 kelvin.
 0 kelvin is absolute zero.
The Fahrenheit and Rankine scales also have the same magnitude, but different null points.

 0 degrees Fahrenheit corresponds to 459.67 degrees Rankine.
 0 degrees Rankine is absolute zero.
The Celsius/Kelvin and Fahrenheit/Rankine scales have a ratio of 5 : 9.



Task
Write code that accepts a value of kelvin, converts it to values of the three other scales, and prints the result.



Example

K  21.00

C  -252.15

F  -421.87

R  37.80



: KtoC \ n -- n
    273.15 n:- 
;
 
: KtoF \ n -- n
    1.8 n:* 459.67 n:-
;
 
: KtoR \ n -- n
    1.8 n:*
;
 
: KtoCFR \ n --
    dup dup dup
    . " degrees Kelvin" . cr
    KtoC
    . " degrees Celcius" . cr
    KtoF
    . " degrees Fahrenheit" . cr
    KtoR
    . " degrees Rankine" . cr
;
 
: app:main \ 
    argc 0 n:= 
    if
        "Syntax" . cr "    temp.8th number" . cr
    else
        0 args >n KtoCFR 
    then 
    bye
;
 