Bending line
- To: mathgroup at smc.vnet.net
- Subject: [mg37432] Bending line
- From: Stefan Sollerer <solli at sbox.tugraz.at>
- Date: Tue, 29 Oct 2002 00:09:30 -0500 (EST)
- Sender: owner-wri-mathgroup at wolfram.com
Hi!
The following function (for 3 arrays) is given:
q[x_] :=
{
{
{q1*x/l1}, {x, 0, l1}
}, {
{-q2}, {x, l1, l2}
}, {
{(-q2)*(x^2/l3^2 - 2*x/l3 + 1)}, {x, l2, l3}
}
}
as an example, in the array x=l1->l2 the function q[x]=-q2.
The number of arrays can change.
I have to find out the function for w[x] where
w''''[x]=q[x].
The transition condition are
w_1[x]=w_2[x];
w_1'[x]=w_2'[x];
w_1'[x]=w_2'[x];
where 1 and 2 indicate the arrays. Arrays 2 and 3 (and 3-4, 4-5,...)
have to satisfy the same conditions.
How can I solve the problem? I first thought that a combination of
'DSolve' and 'Do' can do it, but I was wrong.
Thanks for any hint,
Stefan