quote.kt

fun quote(pricePerSqrMtr: Double, roundUp: Boolean, area: () -> Double): Double {
    return carpetPrice(pricePerSqrMtr, roundUp, area())(area())
}

fun carpetPrice(pricePerSqrMtr: Double, roundUp: Boolean, area: Double): (Double)->Double {
    fun price(area: Double): Double {
        val areaToPrice = if (roundUp) {
            Math.ceil(area)
        } else {
            area
        }

        return pricePerSqrMtr * areaToPrice
    }

    return ::price
}