Fwd: Re: [clubSmalltalk] refactorizacion

priceBeforeTax

| com p p2 |

com := self isBestSeller

ifTrue: [ price / 50 ]

ifFalse: [ price / 100 ].

p := self isBestSeller

ifTrue: [ price * 1.1 ]

ifFalse: [ price ].

p2 := p + com.

^ p2

Esto es equivalente a

priceBeforeTax
    ^self isBestSeller
                    ifTrue: [ price * 1.6 ]
                    ifFalse: [ price * 1.01 ]

y el otro, es

price
    ^self isBestSeller
                    ifTrue: [ price * ( 1.1 * 1.21 +  0.5 ) ]
                    ifFalse: [ price * 1.22  ]

Más que código repetido, es una forma de hacer las cuentas paso por paso, que si operas con un poco de álgebra se resuelve más corto.

Por supuesto, puede que me haya equivocado en alguna cuenta, lo hice rápido y de memoria, Pero un par de tests pueden despejar las dudas.

Ambos se pueden refactorizar, para dejar sólo el factor en dos me'todos, y multiplicar price por self factor o por self factorBeforeTax.

Saludos