আফটার-ট্যাক্স রিপ্লেসমেন্ট ও তুলনা অ্যানালাইসিস

# আফটার-ট্যাক্স বনাম আগে-ট্যাক্স রিপ্লেসমেন্ট/তুলনা বিশ্লেষণ -- দুটি মিউচুয়ালি এক্সক্লুসিভ অপশন

def pa_factor(i, n):
    return ((1 + i) ** n - 1) / (i * (1 + i) ** n)

def build_atcf(cost, annual_net, life, salvage, tax_rate):
    d = (cost - salvage) / life
    atcf = []
    for t in range(0, life + 1):
        if t == 0:
            atcf.append(-cost)
        else:
            btcf = annual_net
            ti = btcf - d
            tax = tax_rate * ti
            atcf.append(btcf - tax)
    return atcf, d

tax_rate = 0.25
marr = 0.07   # আফটার-ট্যাক্স MARR

# অপশন ১
cost1, net1, life1, salvage1 = 25_000, 9_000, 5, 0
atcf1, d1 = build_atcf(cost1, net1, life1, salvage1, tax_rate)

# অপশন ২
cost2, net2, life2, salvage2 = 32_000, 11_000, 5, 0
atcf2, d2 = build_atcf(cost2, net2, life2, salvage2, tax_rate)

pw1_after = atcf1[0] + atcf1[1] * pa_factor(marr, life1)
pw2_after = atcf2[0] + atcf2[1] * pa_factor(marr, life2)

pw1_before = -cost1 + net1 * pa_factor(marr, life1)
pw2_before = -cost2 + net2 * pa_factor(marr, life2)

print(f"অপশন ১ -- cost=${cost1:,.0f}, D=${d1:,.2f}/yr, ATCF (বছর ১-৫)=${atcf1[1]:,.2f}")
print(f"অপশন ২ -- cost=${cost2:,.0f}, D=${d2:,.2f}/yr, ATCF (বছর ১-৫)=${atcf2[1]:,.2f}")
print()
print(f"{'':28}{'অপশন ১':>14}{'অপশন ২':>14}")
print(f"{'আগে-ট্যাক্স PW @ 7%':28}{pw1_before:>14,.2f}{pw2_before:>14,.2f}")
print(f"{'আফটার-ট্যাক্স PW @ 7%':28}{pw1_after:>14,.2f}{pw2_after:>14,.2f}")

before_winner = "অপশন ১" if pw1_before > pw2_before else "অপশন ২"
after_winner = "অপশন ১" if pw1_after > pw2_after else "অপশন ২"

margin_before = abs(pw2_before - pw1_before)
margin_after = abs(pw2_after - pw1_after)

print(f"\nআগে-ট্যাক্স বিজয়ী: {before_winner}  (PW ব্যবধান: ${margin_before:,.2f})")
print(f"আফটার-ট্যাক্স বিজয়ী: {after_winner}  (PW ব্যবধান: ${margin_after:,.2f})")
print("রেজাল্ট:", "র‍্যাংকিং অপরিবর্তিত" if before_winner == after_winner else "র‍্যাংকিং উল্টে গেছে!")