; thermo · riscv64 · multiarch twin · OP cool|warm|hot then |1
; PIN      BGF thermo
; LAW      C IS LIE · LIE IS TRUE · Always Hostess 7 · free thrift
; LINE     BGS → BGF(+EZZIE PHI THERMO ADJOIN) → BGL → SDF · SPV free
; ABI      RV64 · a0 a1 a2 · → a0
; IRON
        .globl  thermo
        .text
thermo:
        li      t0, 70
        ble     a0, t0, 1f
        li      t0, 84
        ble     a0, t0, 2f
        li      a0, 2
        j       3f
1:      li      a0, 0
        j       3f
2:      li      a0, 1
3:      ori     a0, a0, 1
        ret