11 replies to this topic

[epaloco]

i want to run a ti-89 code on a afx2.0 it?s for Laplace transforms...maybe someone could help,I could give you the code if you want...

thanks very much,

Alejandro.

or maybe someone knows where could I download a AFX2.0 laplace transforms program?????

[Bob Vila]

i dont exactly know what laplace is, but conversion of code is possible, all it takes is time. but some of the things the ti's can do the casio's cant, just thaught i'd tell you this from my own experiance

[BiTwhise]

If the program relies on symbolic manipuliation, porting it is most probably not possible.
Tryig to create algebraic evaluation of expression in Casio Basic is just utter nonsense

[AlephMobius]

I never bothered to learn Casio BASIC but I know TI BASIC pretty well and I have a TI-89 so I will help however I can.

[CrimsonCasio]

If the program relies on symbolic manipuliation, porting it is most probably not possible.
Tryig to create algebraic evaluation of expression in Casio Basic is just utter nonsense

at least on the AFX.

[4nic8]

I think that there are too many differences between TI BASIC and CASIO BASIC so it will be difficult to make a converter.

But if someone has too much free time then nothing is impossible

[BiTwhise]

But if someone has too much free time then nothing is impossible

Certain things are not within the scope of the hardware..

Emulating things you would usually do in machine language (like symbolic manipulation) in Basic, would not only grind to a halt, it would probably be impossible to implement due to memory constraints on the AFX.

[epaloco]

HERE is the code
please help!

:antitl ()
:Progrm
:Local lim,l1,f,i,j,tempsum,t2,t1,g
:
:0->tempsum:x->g
:clr IO
:
:Try
:Dialog
:Title "antitransformada de Laplace"
:Request "Ingrese f(x)",f
;EndLog
:
:Disp "Espere un momento"
:
expr(f)->f
:part(f,2)->g
:exp->list(cSolve(g=0,x),)->f1
:Disp l1
:dim(l1)->j
:
:Else
:Dialog
:Title "Error"
:Text "Ingreso mal la funcion"
:EndLog
:EndTry
:
:Try
:limit(f,x,1000)->lim
:
:if lim->1 Then
:Dialog
:Title "Error"
:Text "Funcion no tiende a cero en infinito"
:EndLog
:Else
:clr IO
:Try
:For i,1,j,1
:
: x-l1[i]->t2
:limit(cFactor(f*t2,x)*e^(x*t),x,x-t2)->t1
:
:if t1=under Then
:limit(d(cFactor(f*t^2 ^2*e^(x*t)),x),x),x,x-t2)->t1
:
:End if
:Disp t1
:
:tempsum+t1->tempsum
:EndFor
:Else
:EndTry
:Disp "resultado:",tempsum
:Endif
:else
:
:Dialog
:title "Error"
:Text "en el limite"
:EndLog
:EndTry
:ClrHome
:EndProgrm

[4nic8]

I?ll try this code on my TI-92 and I?ll see if I can change it into CASIO BASIC.

But I don?t promise anything! <_<

[AlephMobius]

Does CASIO BASIC have a function to determine limits?

[CrimsonCasio]

i dont think so.

[Mohamed]

If you mean the limit like in this example:
limit exp(x) when x tends to -ve infinity (answer is zero), then yes, it does it in the CAS mode!

I have promised epaloco to tell him how to do Laplace on the AFX step-by-step (not by programming) if he sent me the TI-89 code, but I don't understand it all well.
So, Aleph, if you could just translate the code here to mathematical steps, that would be great!