Group Abstract Group Abstract

Message Boards Message Boards

Solution for equation that models a car on a banked curve?

POSTED BY: Peter Burbery
4 Replies

Try with fresh Kernel ?

$Version
(*"13.2.0 for Microsoft Windows (64-bit) (November 18, 2022)"*)

Remove["`*"];ClearAll["`*"];
Solve[m g Sin[\[Theta]] == m v^2/r && 0 <= \[Theta] <= \[Pi], \[Theta], Reals]

(*{{\[Theta] -> ConditionalExpression[\[Pi] - ArcSin[v^2/(g r)], Or[
And[
Inequality[-(g r)^Rational[1, 2], LessEqual, v, 
       LessEqual, (g r)^Rational[1, 2]], g > 0, r > 0], 
And[
Inequality[-(g r)^Rational[1, 2], LessEqual, v, 
       LessEqual, (g r)^Rational[1, 2]], g < 0, 
      r < 0]]]}, {\[Theta] -> 
   ConditionalExpression[ArcSin[v^2/(g r)], Or[
And[
Inequality[-(g r)^Rational[1, 2], LessEqual, v, 
       LessEqual, (g r)^Rational[1, 2]], g > 0, r > 0], 
And[
Inequality[-(g r)^Rational[1, 2], LessEqual, v, 
       LessEqual, (g r)^Rational[1, 2]], g < 0, r < 0]]]}}*)
POSTED BY: Mariusz Iwaniuk

I tried your solution, and it returned the input without solving it. This is the output I obtained

Solve[0.72934584563 g m == (m v^2)/r, 0.817365299581, Reals]

I entered Quit and it worked now.

POSTED BY: Peter Burbery

Try:

Solve[m g Sin[\[Theta]] == m v^2/r && 0 <= \[Theta] <= \[Pi], \[Theta], Reals]

(*Simple solution on MMA 13.2.0*)
POSTED BY: Mariusz Iwaniuk
Posted 2 years ago

Try

Reduce[m g Sin[θ]==m v^2/r&&0<=θ<=\[Pi]&&Element[m|g|r|v,Reals],θ]//Simplify

The result would be simpler if you tell it that m,g,r are positive,

POSTED BY: Bill Nelson
Reply to this discussion
Community posts can be styled and formatted using the Markdown syntax.
Reply Preview
Attachments
Remove
or Discard