lena

56 Reputation

4 Badges

9 years, 295 days

MaplePrimes Activity


These are replies submitted by lena

c1:=-0.8085238989343898204568122915507880218802631027013878149301235296393091113309060998321707769908693288e-1-0.3541636537259057978794222143910705809868079056418925373600185561630640335971284403175188428126394752e-1*I .. 0.5213348484201718361140740622400086436525142700691522583239502906542909106444721332750112938408514750e-1+0.9756950936286558586914641393997260845459694671286475358940552641305359883782497927896632280190813286e-1*I

a:= long fuctions of x

I make a sequence of points like this:

t0:=0:tN:=5: N1:=5000:th:=evalf((tN-t0)/N1):
t1:=array(0..N1,[]): e11:=array(0..N1,[]): e12:=array(0..N1,[]): e13:=array(0..N1,[]): e14:=array(0..N1,[]):pt1:=array(0..N1,[]):pt2:=array(0..N1,[]):pt3:=array(0..N1,[]):pt4:=array(0..N1,[]): 
for i from 0 to N1 do t1[i]:=evalf(th*i):e11[i]:=evalf(e1(t1[i]));e12[i]:=evalf(e2(t1[i])):e13[i]:=evalf(e3(t1[i])):pt1[i]:=[t1[i],e11[i]]:pt2[i]:=[t1[i],e12[i]]:pt3[i]:=[t1[i],e13[i]]:od:
pts:=50:tn:=900:
unassign('i'):mytab1:=[seq(pt1[i],i=0..N1)]:mytab2:=[seq(pt2[i],i=0..N1)]:mytab3:=[seq(pt3[i],i=0..N1)]:
 now I want to integrate e1(t)??? which  are know seq of points I get confused!

 

Thank you Dr. Robert.

I understand your code, but how can I get the values of e1..

proc(t)  ...  end;
proc(t)  ...  end;
proc(t)  ...  end;
proc(t)  ...  end;
 

I try to assign the solutions but i dont know?

I appreciated for more help

 

Page 1 of 1