-> [Float]
                  
                  
                  multRandomNumbers (rand:otherRands) prev = curRand : multRandomNumbers otherRands curRand
                  
                  
                      where curRand = prev * ( 0.995 + ( rand * 0.0126315789473684 ) )
                  
                  
                            realRand = case curRand of
                  
                  
                              <0.8 -> 0.8
                  
                  
                              >1.2 -> 1.2
                  
                  
                              _    -> curRand
                  
                  
                
ты кстати ссылочку-то посмотри всё же мою поймешь, как надо оформить эти <0.8 и >1.2
Обсуждают сегодня