## 56 Reputation

13 years, 38 days

## c1:=-0.808523898934389820456812291550788...

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...

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...

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
﻿