Help solving complicated polynomial equation
I am trying to solve the following two equations, but I am having troubles doing so.
Equation 1 :
eq1[n_] :=
2.21355*10^(-16)/((1 - n)^2)*(1024/5 + 3*7133.17 n^2) -
4.42709*10^(-16)/((1 - n)^3)*(1024/5*n + 7133.17 n^3) ;
Solve[eq1[n] == 0, n]
If I can find an "n", I would then plug it into the following equation and solve for V.
eq2[n_] := 1024/5*n + 7133.17 n^3 -
0.06287*V^2*2.21355*10^(-16)/((1 - n)^2);
Solve[eq2[nFound] == 0, V]
equation-solving
add a comment |
I am trying to solve the following two equations, but I am having troubles doing so.
Equation 1 :
eq1[n_] :=
2.21355*10^(-16)/((1 - n)^2)*(1024/5 + 3*7133.17 n^2) -
4.42709*10^(-16)/((1 - n)^3)*(1024/5*n + 7133.17 n^3) ;
Solve[eq1[n] == 0, n]
If I can find an "n", I would then plug it into the following equation and solve for V.
eq2[n_] := 1024/5*n + 7133.17 n^3 -
0.06287*V^2*2.21355*10^(-16)/((1 - n)^2);
Solve[eq2[nFound] == 0, V]
equation-solving
add a comment |
I am trying to solve the following two equations, but I am having troubles doing so.
Equation 1 :
eq1[n_] :=
2.21355*10^(-16)/((1 - n)^2)*(1024/5 + 3*7133.17 n^2) -
4.42709*10^(-16)/((1 - n)^3)*(1024/5*n + 7133.17 n^3) ;
Solve[eq1[n] == 0, n]
If I can find an "n", I would then plug it into the following equation and solve for V.
eq2[n_] := 1024/5*n + 7133.17 n^3 -
0.06287*V^2*2.21355*10^(-16)/((1 - n)^2);
Solve[eq2[nFound] == 0, V]
equation-solving
I am trying to solve the following two equations, but I am having troubles doing so.
Equation 1 :
eq1[n_] :=
2.21355*10^(-16)/((1 - n)^2)*(1024/5 + 3*7133.17 n^2) -
4.42709*10^(-16)/((1 - n)^3)*(1024/5*n + 7133.17 n^3) ;
Solve[eq1[n] == 0, n]
If I can find an "n", I would then plug it into the following equation and solve for V.
eq2[n_] := 1024/5*n + 7133.17 n^3 -
0.06287*V^2*2.21355*10^(-16)/((1 - n)^2);
Solve[eq2[nFound] == 0, V]
equation-solving
equation-solving
asked Dec 16 at 8:25
james
778519
778519
add a comment |
add a comment |
2 Answers
2
active
oldest
votes
Sorry, I am not very sure what you want to ask. Maybe you want to substitute the solution of the first equation into the second equation? Then you can do this.
eq1[n_] :=
2.21355*10^(-16)/((1 - n)^2)*(1024/5 + 3*7133.17 n^2) -
4.42709*10^(-16)/((1 - n)^3)*(1024/5*n + 7133.17 n^3);
ansList = Values@Solve[eq1[n] == 0, n]
eq2[n_] :=
1024/5*n + 7133.17 n^3 - 0.06287*V^2*2.21355*10^(-16)/((1 - n)^2);
Solve[eq2[#] == 0, V] & /@ ansList
You also can use the following code to get the value of n.
sol=Solve[eq1[n] == 0, n]
nList=n/.sol
That's all. Please enjoy the fun of Mathematica.
Thanks ! This was exactly what I was looking for.
– james
Dec 16 at 9:13
Never thought about using theValuesfunction in this context. Thanks for the new idea!
– Thies Heidecke
Dec 16 at 14:02
add a comment |
Solve can handle simultaneous equations. Solve is an exact solver so use Rationalze to provide exact numbers as input. Solve will work without doing this but will provide a warning that it did it internally. Or use NSolve.
eq1[n_] :=
Evaluate[2.21355*10^(-16)/((1 - n)^2)*(1024/5 + 3*7133.17 n^2) -
4.42709*10^(-16)/((1 - n)^3)*(1024/5*n + 7133.17 n^3) //
Rationalize[#, 0] & // Simplify];
eq2[n_] := Evaluate[1024/5*n + 7133.17 n^3 -
0.06287*V^2*2.21355*10^(-16)/((1 - n)^2) // Rationalize[#, 0] &];
Solve[{eq1[n] == 0, eq2[n] == 0}, {n, V}] // N
(* {{n -> 0.00634203 + 0.0986751 I,
V -> -7.58581*10^8 - 6.22509*10^8 I}, {n -> 0.00634203 + 0.0986751 I,
V -> 7.58581*10^8 + 6.22509*10^8 I}, {n -> 0.00634203 - 0.0986751 I,
V -> 7.58581*10^8 - 6.22509*10^8 I}, {n -> 0.00634203 - 0.0986751 I,
V -> -7.58581*10^8 + 6.22509*10^8 I}, {n -> 0.587316,
V -> -4.37685*10^9}, {n -> 0.587316, V -> 4.37685*10^9}} *)
For real solutions
Solve[{eq1[n] == 0, eq2[n] == 0}, {n, V}, Reals] // N
(* {{n -> 0.587316, V -> -4.37685*10^9}, {n -> 0.587316, V -> 4.37685*10^9}} *)
For real, positive solutions
Solve[{eq1[n] == 0, eq2[n] == 0, V > 0}, {n, V}] // N
(* {{n -> 0.587316, V -> 4.37685*10^9}} *)
This is a great answer ! Thank you very much !
– james
Dec 17 at 14:24
How would you do it with Rationalize ?
– james
Dec 17 at 14:42
Look at the definition ofeq1above. At the end you will see thatRationalizeandSimplifyare used. SinceSetDelayed ( := )is used in the definition rather thanSet ( = ),Evaluateis used to have these evaluated at the time of definition rather than for each use of the functioneq1. Similarly foreq2exceptSimplifywasn't needed. Read the documentation for each of these functions.
– Bob Hanlon
Dec 17 at 15:52
add a comment |
Your Answer
StackExchange.ifUsing("editor", function () {
return StackExchange.using("mathjaxEditing", function () {
StackExchange.MarkdownEditor.creationCallbacks.add(function (editor, postfix) {
StackExchange.mathjaxEditing.prepareWmdForMathJax(editor, postfix, [["$", "$"], ["\\(","\\)"]]);
});
});
}, "mathjax-editing");
StackExchange.ready(function() {
var channelOptions = {
tags: "".split(" "),
id: "387"
};
initTagRenderer("".split(" "), "".split(" "), channelOptions);
StackExchange.using("externalEditor", function() {
// Have to fire editor after snippets, if snippets enabled
if (StackExchange.settings.snippets.snippetsEnabled) {
StackExchange.using("snippets", function() {
createEditor();
});
}
else {
createEditor();
}
});
function createEditor() {
StackExchange.prepareEditor({
heartbeatType: 'answer',
autoActivateHeartbeat: false,
convertImagesToLinks: false,
noModals: true,
showLowRepImageUploadWarning: true,
reputationToPostImages: null,
bindNavPrevention: true,
postfix: "",
imageUploader: {
brandingHtml: "Powered by u003ca class="icon-imgur-white" href="https://imgur.com/"u003eu003c/au003e",
contentPolicyHtml: "User contributions licensed under u003ca href="https://creativecommons.org/licenses/by-sa/3.0/"u003ecc by-sa 3.0 with attribution requiredu003c/au003e u003ca href="https://stackoverflow.com/legal/content-policy"u003e(content policy)u003c/au003e",
allowUrls: true
},
onDemand: true,
discardSelector: ".discard-answer"
,immediatelyShowMarkdownHelp:true
});
}
});
Sign up or log in
StackExchange.ready(function () {
StackExchange.helpers.onClickDraftSave('#login-link');
});
Sign up using Google
Sign up using Facebook
Sign up using Email and Password
Post as a guest
Required, but never shown
StackExchange.ready(
function () {
StackExchange.openid.initPostLogin('.new-post-login', 'https%3a%2f%2fmathematica.stackexchange.com%2fquestions%2f187974%2fhelp-solving-complicated-polynomial-equation%23new-answer', 'question_page');
}
);
Post as a guest
Required, but never shown
2 Answers
2
active
oldest
votes
2 Answers
2
active
oldest
votes
active
oldest
votes
active
oldest
votes
Sorry, I am not very sure what you want to ask. Maybe you want to substitute the solution of the first equation into the second equation? Then you can do this.
eq1[n_] :=
2.21355*10^(-16)/((1 - n)^2)*(1024/5 + 3*7133.17 n^2) -
4.42709*10^(-16)/((1 - n)^3)*(1024/5*n + 7133.17 n^3);
ansList = Values@Solve[eq1[n] == 0, n]
eq2[n_] :=
1024/5*n + 7133.17 n^3 - 0.06287*V^2*2.21355*10^(-16)/((1 - n)^2);
Solve[eq2[#] == 0, V] & /@ ansList
You also can use the following code to get the value of n.
sol=Solve[eq1[n] == 0, n]
nList=n/.sol
That's all. Please enjoy the fun of Mathematica.
Thanks ! This was exactly what I was looking for.
– james
Dec 16 at 9:13
Never thought about using theValuesfunction in this context. Thanks for the new idea!
– Thies Heidecke
Dec 16 at 14:02
add a comment |
Sorry, I am not very sure what you want to ask. Maybe you want to substitute the solution of the first equation into the second equation? Then you can do this.
eq1[n_] :=
2.21355*10^(-16)/((1 - n)^2)*(1024/5 + 3*7133.17 n^2) -
4.42709*10^(-16)/((1 - n)^3)*(1024/5*n + 7133.17 n^3);
ansList = Values@Solve[eq1[n] == 0, n]
eq2[n_] :=
1024/5*n + 7133.17 n^3 - 0.06287*V^2*2.21355*10^(-16)/((1 - n)^2);
Solve[eq2[#] == 0, V] & /@ ansList
You also can use the following code to get the value of n.
sol=Solve[eq1[n] == 0, n]
nList=n/.sol
That's all. Please enjoy the fun of Mathematica.
Thanks ! This was exactly what I was looking for.
– james
Dec 16 at 9:13
Never thought about using theValuesfunction in this context. Thanks for the new idea!
– Thies Heidecke
Dec 16 at 14:02
add a comment |
Sorry, I am not very sure what you want to ask. Maybe you want to substitute the solution of the first equation into the second equation? Then you can do this.
eq1[n_] :=
2.21355*10^(-16)/((1 - n)^2)*(1024/5 + 3*7133.17 n^2) -
4.42709*10^(-16)/((1 - n)^3)*(1024/5*n + 7133.17 n^3);
ansList = Values@Solve[eq1[n] == 0, n]
eq2[n_] :=
1024/5*n + 7133.17 n^3 - 0.06287*V^2*2.21355*10^(-16)/((1 - n)^2);
Solve[eq2[#] == 0, V] & /@ ansList
You also can use the following code to get the value of n.
sol=Solve[eq1[n] == 0, n]
nList=n/.sol
That's all. Please enjoy the fun of Mathematica.
Sorry, I am not very sure what you want to ask. Maybe you want to substitute the solution of the first equation into the second equation? Then you can do this.
eq1[n_] :=
2.21355*10^(-16)/((1 - n)^2)*(1024/5 + 3*7133.17 n^2) -
4.42709*10^(-16)/((1 - n)^3)*(1024/5*n + 7133.17 n^3);
ansList = Values@Solve[eq1[n] == 0, n]
eq2[n_] :=
1024/5*n + 7133.17 n^3 - 0.06287*V^2*2.21355*10^(-16)/((1 - n)^2);
Solve[eq2[#] == 0, V] & /@ ansList
You also can use the following code to get the value of n.
sol=Solve[eq1[n] == 0, n]
nList=n/.sol
That's all. Please enjoy the fun of Mathematica.
answered Dec 16 at 9:10
J.W Kang
835
835
Thanks ! This was exactly what I was looking for.
– james
Dec 16 at 9:13
Never thought about using theValuesfunction in this context. Thanks for the new idea!
– Thies Heidecke
Dec 16 at 14:02
add a comment |
Thanks ! This was exactly what I was looking for.
– james
Dec 16 at 9:13
Never thought about using theValuesfunction in this context. Thanks for the new idea!
– Thies Heidecke
Dec 16 at 14:02
Thanks ! This was exactly what I was looking for.
– james
Dec 16 at 9:13
Thanks ! This was exactly what I was looking for.
– james
Dec 16 at 9:13
Never thought about using the
Values function in this context. Thanks for the new idea!– Thies Heidecke
Dec 16 at 14:02
Never thought about using the
Values function in this context. Thanks for the new idea!– Thies Heidecke
Dec 16 at 14:02
add a comment |
Solve can handle simultaneous equations. Solve is an exact solver so use Rationalze to provide exact numbers as input. Solve will work without doing this but will provide a warning that it did it internally. Or use NSolve.
eq1[n_] :=
Evaluate[2.21355*10^(-16)/((1 - n)^2)*(1024/5 + 3*7133.17 n^2) -
4.42709*10^(-16)/((1 - n)^3)*(1024/5*n + 7133.17 n^3) //
Rationalize[#, 0] & // Simplify];
eq2[n_] := Evaluate[1024/5*n + 7133.17 n^3 -
0.06287*V^2*2.21355*10^(-16)/((1 - n)^2) // Rationalize[#, 0] &];
Solve[{eq1[n] == 0, eq2[n] == 0}, {n, V}] // N
(* {{n -> 0.00634203 + 0.0986751 I,
V -> -7.58581*10^8 - 6.22509*10^8 I}, {n -> 0.00634203 + 0.0986751 I,
V -> 7.58581*10^8 + 6.22509*10^8 I}, {n -> 0.00634203 - 0.0986751 I,
V -> 7.58581*10^8 - 6.22509*10^8 I}, {n -> 0.00634203 - 0.0986751 I,
V -> -7.58581*10^8 + 6.22509*10^8 I}, {n -> 0.587316,
V -> -4.37685*10^9}, {n -> 0.587316, V -> 4.37685*10^9}} *)
For real solutions
Solve[{eq1[n] == 0, eq2[n] == 0}, {n, V}, Reals] // N
(* {{n -> 0.587316, V -> -4.37685*10^9}, {n -> 0.587316, V -> 4.37685*10^9}} *)
For real, positive solutions
Solve[{eq1[n] == 0, eq2[n] == 0, V > 0}, {n, V}] // N
(* {{n -> 0.587316, V -> 4.37685*10^9}} *)
This is a great answer ! Thank you very much !
– james
Dec 17 at 14:24
How would you do it with Rationalize ?
– james
Dec 17 at 14:42
Look at the definition ofeq1above. At the end you will see thatRationalizeandSimplifyare used. SinceSetDelayed ( := )is used in the definition rather thanSet ( = ),Evaluateis used to have these evaluated at the time of definition rather than for each use of the functioneq1. Similarly foreq2exceptSimplifywasn't needed. Read the documentation for each of these functions.
– Bob Hanlon
Dec 17 at 15:52
add a comment |
Solve can handle simultaneous equations. Solve is an exact solver so use Rationalze to provide exact numbers as input. Solve will work without doing this but will provide a warning that it did it internally. Or use NSolve.
eq1[n_] :=
Evaluate[2.21355*10^(-16)/((1 - n)^2)*(1024/5 + 3*7133.17 n^2) -
4.42709*10^(-16)/((1 - n)^3)*(1024/5*n + 7133.17 n^3) //
Rationalize[#, 0] & // Simplify];
eq2[n_] := Evaluate[1024/5*n + 7133.17 n^3 -
0.06287*V^2*2.21355*10^(-16)/((1 - n)^2) // Rationalize[#, 0] &];
Solve[{eq1[n] == 0, eq2[n] == 0}, {n, V}] // N
(* {{n -> 0.00634203 + 0.0986751 I,
V -> -7.58581*10^8 - 6.22509*10^8 I}, {n -> 0.00634203 + 0.0986751 I,
V -> 7.58581*10^8 + 6.22509*10^8 I}, {n -> 0.00634203 - 0.0986751 I,
V -> 7.58581*10^8 - 6.22509*10^8 I}, {n -> 0.00634203 - 0.0986751 I,
V -> -7.58581*10^8 + 6.22509*10^8 I}, {n -> 0.587316,
V -> -4.37685*10^9}, {n -> 0.587316, V -> 4.37685*10^9}} *)
For real solutions
Solve[{eq1[n] == 0, eq2[n] == 0}, {n, V}, Reals] // N
(* {{n -> 0.587316, V -> -4.37685*10^9}, {n -> 0.587316, V -> 4.37685*10^9}} *)
For real, positive solutions
Solve[{eq1[n] == 0, eq2[n] == 0, V > 0}, {n, V}] // N
(* {{n -> 0.587316, V -> 4.37685*10^9}} *)
This is a great answer ! Thank you very much !
– james
Dec 17 at 14:24
How would you do it with Rationalize ?
– james
Dec 17 at 14:42
Look at the definition ofeq1above. At the end you will see thatRationalizeandSimplifyare used. SinceSetDelayed ( := )is used in the definition rather thanSet ( = ),Evaluateis used to have these evaluated at the time of definition rather than for each use of the functioneq1. Similarly foreq2exceptSimplifywasn't needed. Read the documentation for each of these functions.
– Bob Hanlon
Dec 17 at 15:52
add a comment |
Solve can handle simultaneous equations. Solve is an exact solver so use Rationalze to provide exact numbers as input. Solve will work without doing this but will provide a warning that it did it internally. Or use NSolve.
eq1[n_] :=
Evaluate[2.21355*10^(-16)/((1 - n)^2)*(1024/5 + 3*7133.17 n^2) -
4.42709*10^(-16)/((1 - n)^3)*(1024/5*n + 7133.17 n^3) //
Rationalize[#, 0] & // Simplify];
eq2[n_] := Evaluate[1024/5*n + 7133.17 n^3 -
0.06287*V^2*2.21355*10^(-16)/((1 - n)^2) // Rationalize[#, 0] &];
Solve[{eq1[n] == 0, eq2[n] == 0}, {n, V}] // N
(* {{n -> 0.00634203 + 0.0986751 I,
V -> -7.58581*10^8 - 6.22509*10^8 I}, {n -> 0.00634203 + 0.0986751 I,
V -> 7.58581*10^8 + 6.22509*10^8 I}, {n -> 0.00634203 - 0.0986751 I,
V -> 7.58581*10^8 - 6.22509*10^8 I}, {n -> 0.00634203 - 0.0986751 I,
V -> -7.58581*10^8 + 6.22509*10^8 I}, {n -> 0.587316,
V -> -4.37685*10^9}, {n -> 0.587316, V -> 4.37685*10^9}} *)
For real solutions
Solve[{eq1[n] == 0, eq2[n] == 0}, {n, V}, Reals] // N
(* {{n -> 0.587316, V -> -4.37685*10^9}, {n -> 0.587316, V -> 4.37685*10^9}} *)
For real, positive solutions
Solve[{eq1[n] == 0, eq2[n] == 0, V > 0}, {n, V}] // N
(* {{n -> 0.587316, V -> 4.37685*10^9}} *)
Solve can handle simultaneous equations. Solve is an exact solver so use Rationalze to provide exact numbers as input. Solve will work without doing this but will provide a warning that it did it internally. Or use NSolve.
eq1[n_] :=
Evaluate[2.21355*10^(-16)/((1 - n)^2)*(1024/5 + 3*7133.17 n^2) -
4.42709*10^(-16)/((1 - n)^3)*(1024/5*n + 7133.17 n^3) //
Rationalize[#, 0] & // Simplify];
eq2[n_] := Evaluate[1024/5*n + 7133.17 n^3 -
0.06287*V^2*2.21355*10^(-16)/((1 - n)^2) // Rationalize[#, 0] &];
Solve[{eq1[n] == 0, eq2[n] == 0}, {n, V}] // N
(* {{n -> 0.00634203 + 0.0986751 I,
V -> -7.58581*10^8 - 6.22509*10^8 I}, {n -> 0.00634203 + 0.0986751 I,
V -> 7.58581*10^8 + 6.22509*10^8 I}, {n -> 0.00634203 - 0.0986751 I,
V -> 7.58581*10^8 - 6.22509*10^8 I}, {n -> 0.00634203 - 0.0986751 I,
V -> -7.58581*10^8 + 6.22509*10^8 I}, {n -> 0.587316,
V -> -4.37685*10^9}, {n -> 0.587316, V -> 4.37685*10^9}} *)
For real solutions
Solve[{eq1[n] == 0, eq2[n] == 0}, {n, V}, Reals] // N
(* {{n -> 0.587316, V -> -4.37685*10^9}, {n -> 0.587316, V -> 4.37685*10^9}} *)
For real, positive solutions
Solve[{eq1[n] == 0, eq2[n] == 0, V > 0}, {n, V}] // N
(* {{n -> 0.587316, V -> 4.37685*10^9}} *)
answered Dec 16 at 18:26
Bob Hanlon
58.7k23595
58.7k23595
This is a great answer ! Thank you very much !
– james
Dec 17 at 14:24
How would you do it with Rationalize ?
– james
Dec 17 at 14:42
Look at the definition ofeq1above. At the end you will see thatRationalizeandSimplifyare used. SinceSetDelayed ( := )is used in the definition rather thanSet ( = ),Evaluateis used to have these evaluated at the time of definition rather than for each use of the functioneq1. Similarly foreq2exceptSimplifywasn't needed. Read the documentation for each of these functions.
– Bob Hanlon
Dec 17 at 15:52
add a comment |
This is a great answer ! Thank you very much !
– james
Dec 17 at 14:24
How would you do it with Rationalize ?
– james
Dec 17 at 14:42
Look at the definition ofeq1above. At the end you will see thatRationalizeandSimplifyare used. SinceSetDelayed ( := )is used in the definition rather thanSet ( = ),Evaluateis used to have these evaluated at the time of definition rather than for each use of the functioneq1. Similarly foreq2exceptSimplifywasn't needed. Read the documentation for each of these functions.
– Bob Hanlon
Dec 17 at 15:52
This is a great answer ! Thank you very much !
– james
Dec 17 at 14:24
This is a great answer ! Thank you very much !
– james
Dec 17 at 14:24
How would you do it with Rationalize ?
– james
Dec 17 at 14:42
How would you do it with Rationalize ?
– james
Dec 17 at 14:42
Look at the definition of
eq1 above. At the end you will see that Rationalize and Simplify are used. Since SetDelayed ( := ) is used in the definition rather than Set ( = ), Evaluate is used to have these evaluated at the time of definition rather than for each use of the function eq1. Similarly for eq2 except Simplify wasn't needed. Read the documentation for each of these functions.– Bob Hanlon
Dec 17 at 15:52
Look at the definition of
eq1 above. At the end you will see that Rationalize and Simplify are used. Since SetDelayed ( := ) is used in the definition rather than Set ( = ), Evaluate is used to have these evaluated at the time of definition rather than for each use of the function eq1. Similarly for eq2 except Simplify wasn't needed. Read the documentation for each of these functions.– Bob Hanlon
Dec 17 at 15:52
add a comment |
Thanks for contributing an answer to Mathematica Stack Exchange!
- Please be sure to answer the question. Provide details and share your research!
But avoid …
- Asking for help, clarification, or responding to other answers.
- Making statements based on opinion; back them up with references or personal experience.
Use MathJax to format equations. MathJax reference.
To learn more, see our tips on writing great answers.
Some of your past answers have not been well-received, and you're in danger of being blocked from answering.
Please pay close attention to the following guidance:
- Please be sure to answer the question. Provide details and share your research!
But avoid …
- Asking for help, clarification, or responding to other answers.
- Making statements based on opinion; back them up with references or personal experience.
To learn more, see our tips on writing great answers.
Sign up or log in
StackExchange.ready(function () {
StackExchange.helpers.onClickDraftSave('#login-link');
});
Sign up using Google
Sign up using Facebook
Sign up using Email and Password
Post as a guest
Required, but never shown
StackExchange.ready(
function () {
StackExchange.openid.initPostLogin('.new-post-login', 'https%3a%2f%2fmathematica.stackexchange.com%2fquestions%2f187974%2fhelp-solving-complicated-polynomial-equation%23new-answer', 'question_page');
}
);
Post as a guest
Required, but never shown
Sign up or log in
StackExchange.ready(function () {
StackExchange.helpers.onClickDraftSave('#login-link');
});
Sign up using Google
Sign up using Facebook
Sign up using Email and Password
Post as a guest
Required, but never shown
Sign up or log in
StackExchange.ready(function () {
StackExchange.helpers.onClickDraftSave('#login-link');
});
Sign up using Google
Sign up using Facebook
Sign up using Email and Password
Post as a guest
Required, but never shown
Sign up or log in
StackExchange.ready(function () {
StackExchange.helpers.onClickDraftSave('#login-link');
});
Sign up using Google
Sign up using Facebook
Sign up using Email and Password
Sign up using Google
Sign up using Facebook
Sign up using Email and Password
Post as a guest
Required, but never shown
Required, but never shown
Required, but never shown
Required, but never shown
Required, but never shown
Required, but never shown
Required, but never shown
Required, but never shown
Required, but never shown