#<- avg, regression                              #<- avg, regression

(@ +-                                            (@ +-
    (expect avg s (@ +-                              (expect avg s (@ +-
                      (// ([= 2] x) 1 0 -                              (// ([= -0.7] x) 1 0 -
                          (# avg (' 1 2 3) .x)                             (# avg (' -1 2.2 -3.3) .x)
                      )                                                )
                  )                                                )
    -                                                -
        ('works with integer numbers' .s)                ('works with float+- numbers' .s)
    )                                                )
)                                                )



