Difference between revisions of "User:5849206328x"

m
m
Line 2: Line 2:
 
import slopefield;
 
import slopefield;
  
size(288);
+
//size(288);
  
 
real e  = 2.718281828459045235360287471352662497757247093699959574966967627724076630353;
 
real e  = 2.718281828459045235360287471352662497757247093699959574966967627724076630353;
Line 9: Line 9:
 
// Label f;
 
// Label f;
 
// f.p=fontsize(6);
 
// f.p=fontsize(6);
xaxis(0,5);
+
//xaxis(0,5);
yaxis(-2,3);
+
//yaxis(-2,3);
  
real f(real x) { return 3 * (-1/x + 1/(2*x^2)); }
+
//real f(real x) { return 3 * (-1/x + 1/(2*x^2)); }
 
//pair g(real t, real k) { return (1/k * 3/5 * (1 - e^(-k * t)), -t/k + 1/k * (4/5 + 1/k) * (1 - e^(-k * t))); }
 
//pair g(real t, real k) { return (1/k * 3/5 * (1 - e^(-k * t)), -t/k + 1/k * (4/5 + 1/k) * (1 - e^(-k * t))); }
  
draw(graph(f,0.0001,5)); draw((-0.2,-1.5)--(1,-1.5)--(1,0),dashed);
+
//draw(graph(f,0.0001,5));
  
label("$V$",(0,3),W); label("$0$",(0,0),W); label("$E_{min}$",(-0.2,-1.5),W);
+
pair A = (7, 4 * sqrt(141)/5);
label("$r_{*}$",(1,0),N); label("$r$",(5,0),E);
 
  
limits((-1,-2),(5.2,3.2),Crop);
+
draw(ellipse((-15,0),25,20)); draw((-50,0)--(20,0)); draw((-15,-25)--(-15,25)); draw((0,0)--(0,16),dashed);
 +
dot((0,0)); draw((0,0)--A--(A + (-3,4.1)),EndArrow); dot(A);
 +
 
 +
label("$O$",(0,0),S); label("$ea$",(-8,0),S); label("$a$",(-28,0),S); label("$b$",(-15,10),W); label("$l$",(0,8),W);
 +
label("$\mathbf{r}$",A/2,NW); label("$\theta$",(1,0),NE); label("$m$",A,NE);
 +
 
 +
//limits((-1,-2),(5.2,3.2),Crop);
 +
 
 +
// e = 3/5, l = 9, a = 25, b = 20
 +
// (x + 15)^2/25^5 + y^2/20^2 = 141 * 400/625 = 141 * 16/25
 
</asy>
 
</asy>

Revision as of 20:36, 19 July 2015

[asy] import slopefield;  //size(288);  real e  = 2.718281828459045235360287471352662497757247093699959574966967627724076630353; real pi = 3.141592653589793238462643383279502884197169399375105820974944592307816406286;  // Label f; // f.p=fontsize(6); //xaxis(0,5); //yaxis(-2,3);  //real f(real x) { return 3 * (-1/x + 1/(2*x^2)); } //pair g(real t, real k) { return (1/k * 3/5 * (1 - e^(-k * t)), -t/k + 1/k * (4/5 + 1/k) * (1 - e^(-k * t))); }  //draw(graph(f,0.0001,5));  pair A = (7, 4 * sqrt(141)/5);  draw(ellipse((-15,0),25,20)); draw((-50,0)--(20,0)); draw((-15,-25)--(-15,25)); draw((0,0)--(0,16),dashed); dot((0,0)); draw((0,0)--A--(A + (-3,4.1)),EndArrow); dot(A);   label("$O$",(0,0),S); label("$ea$",(-8,0),S); label("$a$",(-28,0),S); label("$b$",(-15,10),W); label("$l$",(0,8),W); label("$\mathbf{r}$",A/2,NW); label("$\theta$",(1,0),NE); label("$m$",A,NE);  //limits((-1,-2),(5.2,3.2),Crop);  // e = 3/5, l = 9, a = 25, b = 20 // (x + 15)^2/25^5 + y^2/20^2 = 141 * 400/625 = 141 * 16/25 [/asy]