ecuacion mathemática

• To: mathgroup at smc.vnet.net
• Subject: [mg7493] ecuacion mathemática
• From: ANA CARMEN LUNA DOBADO <diacld at ARRAKIS.ES>
• Date: Sat, 7 Jun 1997 03:48:09 -0400 (EDT)
• Sender: owner-wri-mathgroup at wolfram.com

```Hello.
Does anyone on this list can help out of the following problem ?

varsepar[eqi_,yx_,x_]:=(
yx
eqi
eqnormales=Solve[eq,y']
Solve::eqf: eqi is not a well-formed equation.
Solve::eqf: eqi is not a well-formed equation.
Solve[eqi, yx']
expr=Factor[(y'/.#)]
lisfactor=(lisfactor//.{{in___,base_^(a_+b_),fin___}->
{in,base^a,base^b,fin}})
lisx=(lisfactor//.
{in___,a_/;(Position[a,y]!={} && Position[a,x]=={},fin___}->
{in,fin})
lisx=Apply[Times,lisx]
f(X)=lisx
g(y)=expr/lisx
miembroizquierdo=Integrate[lisx/expr,y]
miembroderecho=Integrate[Lisx,x]+C[1],y]
miembroizquierdo==miembroderecho
solucion=Solve[Integrate[lisx/expr,y]==Integrate[lisx,x]+C[1],y]
Syntax::newl:
The newline character after "expr=Factor[(y'/.#)]"
is understood as a multiplication operator.
Syntax::newl:
The newline character after
is understood as a multiplication operator.
Syntax::newl:
The newline character after
is understood as a multiplication operator.
Syntax::newl:
The newline character after
"              {in,base^a,base^b,fin}})"
is understood as a multiplication operator.
Syntax::comma:
Invalid input "(Position[a,y]!={} && Position[a,x]=={},fin___}";
commas are not allowed between parentheses.
Syntax::sntxi: Incomplete expression.
reglas={_?NumberQ+C[1]->C[1],_?NumberQ C[1]->C[1],
a_^(b_+C[1]->C[1] a^b,(a_+C[1]) b_?NumberQ->b a+C[1]};
Syntax::comma:
Invalid input "(b_+C[1]->C[1] a^b,(a_+C[1]) b_?NumberQ->b a+C[1]}";
commas are not allowed between parentheses.
Map[
If[Length[Position[#,C[1]]]==1,(#//.reglas),#]&
,
]