ГТ
Size: a a a
ГТ
I
ГТ
I
ГТ
ГТ
AN
ГТ
ГТ
AN
ГТ
ГТ
I
let round (width : int) : int =
let n = 1.199 // волшебное число, основание (подбором нашел)
Math.Log(float width, n) // считаем логариф по основанию 1.199
|> Math.Floor // округляем к целому
|> fun p -> Math.Pow(n, p) // 1.199 возводим в степень
|> int // переводим в целое число
[32 .. 1000]
дает такие результаты (20 классов)[31; 37; 45; 54; 64; 77; 93; 112; 134; 161; 193; 231; 277; 332; 399; 478; 573; 687; 824; 988]
I
I
AN
AN
AN
I