function chorEffect ([int]$lvl)
{
    if ($lvl -gt 0)
    {
        Write-Output (0.05 / ([Math]::Floor(($lvl - 1) / 10) + 1))
    }
    else
    {
        Write-Output 1
    }
}

function ponyEffect ([int]$lvl)
{
    $lvl++
    if ($lvl -gt 0)
    {
        Write-Output (((1 + $lvl) / $lvl) - 1)
    }
    else
    {
        Write-Output 1
    }
}

$outsiders = [System.Collections.ArrayList]@()
$chorLvl = 0
$ponyLvl = 0

$outsiderObject = [PSCustomObject]@{
    ponyLvl = 0
    chorLvl = 0
    ponyEffect = 0
    chorEffect = 0
}

While ($chorLvl -lt 150)
{
    $outsider = $outsiderObject.PSObject.Copy()

    if ((ponyEffect $ponyLvl) -ge (chorEffect $chorLvl))
    {
        $ponyLvl++
    }
    else
    {
        $chorLvl++
    }

    $outsider.ponyLvl = $ponyLvl
    $outsider.chorLvl = $chorLvl
    $outsider.ponyEffect = ponyEffect $ponyLvl
    $outsider.chorEffect = (0.05 / (chorCost $chorLvl) )

    $null = $outsiders.Add($outsider)
}

$outsiders | sort chorLvl -Unique | ft