83525fb9-9ed8-4d6a-a08a-a58423c36cc3 11 4 5 decimal

&[DATE] &[TIME] - &[FILENAME]

R L Pe * Po / (Ma M / (12 /^(* (1 e L t1 * V Po * / (Ma M / (12 /^(* (-^- (* e L t2 * V Po * / (Ma M / (12 /^(* ((-^(* ≡

R L Pe * Po / (Ma M / (12 /^(* (1 e L t1 * V Po * / (Ma M / (12 /^(* (-^- (* e L t2 * V Po * / (Ma M / (12 /^(* ((-^(* ≡ L Solve L Po R * e t2 t1 + (L * Ma M / sqrt * Po V * /^* Pe Ma M / sqrt * 1 - e t1 L * Ma M / sqrt * Po V * /^+ (* / ≡

S R L Pe * Po / (Ma M / (12 /^(* (1 e L t1 * V Po * / (Ma M / (12 /^(* (-^- (* e L t2 * V Po * / (Ma M / (12 /^(* ((-^(* ≡ L Solve :

S Assign Po R * e t2 t1 + (L * Ma M / sqrt * Po V * /^* Pe Ma M / sqrt * 1 - e t1 L * Ma M / sqrt * Po V * /^+ (* /

L Po R * e t2 t1 + (L * Ma M / sqrt * Po V * /^* Pe Ma M / sqrt * 1 - e t1 L * Ma M / sqrt * Po V * /^+ (* /

R 3.4 109 -^* :

Ma 28.7 :

t2 3600 :

Pe 4.401 :

M 4 :

V 2.52 :

Po 1 :

t1 86400 :

L f Po R * e t2 t1 + (L * Ma M / sqrt * Po V * /^* Pe Ma M / sqrt * 1 - e t1 L * Ma M / sqrt * Po V * /^+ (* / L - :

guess 0.005 :

x f

res1 x f guess 1010 -^FindRoot :

res1 0.0043176022

res1 f 7.0047 107 -^*

L fR L Pe * Po / Ma M / sqrt * 1 e L t1 * V Po * / Ma M / sqrt * -^- (* e L t2 * V Po * / Ma M / sqrt * -^(* R - :

L fR L Pe * Po / (Ma M / (12 /^(* (1 e L t1 * V Po * / (Ma M / (12 /^(* (-^- (* e L t2 * V Po * / (Ma M / (12 /^(* ((-^(* R - :

x fR

guess 0.005 :

res2 x fR guess 1010 -^FindRoot :

res2 0.0043163079

res2 f 1.9341 105 -^* -

res1 f 7.0047 107 -^*