#declaramos nuestras variables
#T: tiempo en años
#N: periodos por años
T, N = var('T,N')

#fijamos el capital inicial c, la tasa de interes r y las cifras que se mostraran en pantalla
c=400
r=0.06
cifras=10

#fijamos el plazo en años
N=1
T=5

#imprimimos la información ingresada
show("capital inicial c=", c)
show("tasa de interés anual r=",r.n(digits=3))
show("plazo de inversión T=",T)
show("en este script usaremos ", cifras, " cifras para imprimir los números \n")

#True : se imprimen los plazos más comunes
#False: omitimos su impresión
imprimircomunes=True

#periodos más comunes
comunes = {"anual":1, "semestral":2, "trimestral":4, "mensual":12, "diario":360}

if imprimircomunes:
    for periodo in comunes:
        N=float(comunes[periodo])
        show(periodo, ": N=", N)
        show("C(", T, ")=",c,"(1+(", r.n(digits = 3), "/", N, "))^(", N,"*", T, ")=", (c*(1+(r/N))^(N*T)).n(digits=cifras))
        print "\n"

#False: no se imprimen los periodos de alta frecuencia
#True: sí se imprimen
imprimirextremos=False

extremos={"por hora": 360*24, "por minuto":360*24*60, "por segundo":360*24*60*60}

if imprimirextremos:
    for periodo in extremos:
        N=extremos[periodo]
        show(periodo, ": N=", N)
        show("C(",T, ")=",c,"(1+(", r.n(digits = 3), "/", N, "))^(", N,"*", T, ")=", (c*(1+(r/N))^(N*T)).n(digits=cifras))
        print "\n"


#imprimimos el interes compuesto        
show("Interes compuesto continuamente: ", LatexExpr("N \Rightarrow \infty"))
show("C(", T, ")=",c, "exp(", r.n(digits=3), "*", T, ")=", c*exp(r*T).n(digits=cifras))