Question: HELP !! Maple doesn t want to give me the integral expression


Hi

I have to create a function "I(epsilonc)" by integrating a function "sigma(y)"  from 0 to the variable "epsilonc"

but maple doesn t give me the actual formula of the integrated function, it only gives me equation 4 which is utterly useless to me.

 

How do I get Maple to actually calculate and give me the integrated function ??

Any help will be greatly appreciated

> 

restart


#data

> 

`ϵc1` := 2.1*10^(-3);

0.2100000000e-2

(1)
> 

`ϵcu1` := 3.5*10^(-3):

> 

Ecm := 31000:

> 

fcm := 25:

> 

Fy := 500:

> 

Es := 200000:

#geometry

> 

As := 1885:

> 

b = 250:

> 

d := 450:


#coefficients

> 

eta := epsilon/`ϵc1`:

> 

k := 1.05*Ecm*`ϵc1`/fcm:

> 

``


#formula

 

> 

``

> 

`σc` := proc (epsilon) options operator, arrow; fcm*(k*epsilon/`ϵc1`-epsilon^2/`ϵc1`^2)/(1+(k-2)*epsilon/`ϵc1`) end proc;

proc (epsilon) options operator, arrow; fcm*(k*epsilon/`ϵc1`-epsilon^2/`ϵc1`^2)/(1+(k-2)*epsilon/`ϵc1`) end proc

(2)
> 

plot(`σc`, 0 .. `ϵcu1`);

 
> 

``

#Pressure as a function of y (y=`ϵc`*y/x) :

> 

`σc` := proc (y) options operator, arrow; fcm*(k*`ϵc`*y/(x*`ϵc1`)-`ϵc`^2*y^2/(x^2*`ϵc1`^2))/(1+(k-2)*`ϵc`*y/(x*`ϵc1`)) end proc;

proc (y) options operator, arrow; fcm*(k*`ϵc`*y/(x*`ϵc1`)-`ϵc`^2*y^2/(x^2*`ϵc1`^2))/(1+(k-2)*`ϵc`*y/(x*`ϵc1`)) end proc

(3)
> 

Iy := proc (y) options operator, arrow; int(fcm*(k*`ϵc`*y/(x*`ϵc1`)-`ϵc`^2*y^2/(x^2*`ϵc1`^2))/(1+(k-2)*`ϵc`*y/(x*`ϵc1`)), y = 0 .. `ϵc`/(`ϵc`+Fy/Es)) end proc;

proc (y) options operator, arrow; int(fcm*(k*`ϵc`*y/(x*`ϵc1`)-`ϵc`^2*y^2/(x^2*`ϵc1`^2))/(1+(k-2)*`ϵc`*y/(x*`ϵc1`)), y = 0 .. `ϵc`/(`ϵc`+Fy/Es)) end proc

(4)
> 

Iy(`ϵc`/(`ϵc`+Fy/Es))

Error, (in int) integration range or variable must be specified in the second argument, got `ϵc`/(`ϵc`+1/400) = 0 .. `ϵc`/(`ϵc`+1/400)

 
> 

solve(Iyy*b = Fy*As, `ϵc`);

> 

``

``


 

Download HW1_-_EC2_strain-pressure_graph.mw
 

> 

restart


#data

> 

`ϵc1` := 2.1*10^(-3);

0.2100000000e-2

(1)
> 

`ϵcu1` := 3.5*10^(-3):

> 

Ecm := 31000:

> 

fcm := 25:

> 

Fy := 500:

> 

Es := 200000:

#geometry

> 

As := 1885:

> 

b = 250:

> 

d := 450:


#coefficients

> 

eta := epsilon/`ϵc1`:

> 

k := 1.05*Ecm*`ϵc1`/fcm:

> 

``


#formula

 

> 

``

> 

`σc` := proc (epsilon) options operator, arrow; fcm*(k*epsilon/`ϵc1`-epsilon^2/`ϵc1`^2)/(1+(k-2)*epsilon/`ϵc1`) end proc;

proc (epsilon) options operator, arrow; fcm*(k*epsilon/`ϵc1`-epsilon^2/`ϵc1`^2)/(1+(k-2)*epsilon/`ϵc1`) end proc

(2)
> 

plot(`σc`, 0 .. `ϵcu1`);

 
> 

``

#Pressure as a function of y (y=`ϵc`*y/x) :

> 

`σc` := proc (y) options operator, arrow; fcm*(k*`ϵc`*y/(x*`ϵc1`)-`ϵc`^2*y^2/(x^2*`ϵc1`^2))/(1+(k-2)*`ϵc`*y/(x*`ϵc1`)) end proc;

proc (y) options operator, arrow; fcm*(k*`ϵc`*y/(x*`ϵc1`)-`ϵc`^2*y^2/(x^2*`ϵc1`^2))/(1+(k-2)*`ϵc`*y/(x*`ϵc1`)) end proc

(3)
> 

Iy := proc (y) options operator, arrow; int(fcm*(k*`ϵc`*y/(x*`ϵc1`)-`ϵc`^2*y^2/(x^2*`ϵc1`^2))/(1+(k-2)*`ϵc`*y/(x*`ϵc1`)), y = 0 .. `ϵc`/(`ϵc`+Fy/Es)) end proc;

proc (y) options operator, arrow; int(fcm*(k*`ϵc`*y/(x*`ϵc1`)-`ϵc`^2*y^2/(x^2*`ϵc1`^2))/(1+(k-2)*`ϵc`*y/(x*`ϵc1`)), y = 0 .. `ϵc`/(`ϵc`+Fy/Es)) end proc

(4)
> 

Iy(`ϵc`/(`ϵc`+Fy/Es))

Error, (in int) integration range or variable must be specified in the second argument, got `ϵc`/(`ϵc`+1/400) = 0 .. `ϵc`/(`ϵc`+1/400)

 
> 

solve(Iyy*b = Fy*As, `ϵc`);

> 

``

``


 

Download HW1_-_EC2_strain-pressure_graph.mw

 

Please Wait...