RosettaCodeData/Task/Map-range/11l/map-range.11l

6 lines
165 B
Text
Raw Permalink Normal View History

2023-07-01 11:58:00 -04:00
F maprange(a, b, s)
R b[0] + (Float(s - a[0]) * (b[1] - b[0]) / (a[1] - a[0]))
L(s) 0..10
print(#2 maps to #..format(s, maprange((0, 10), (-1, 0), s)))