summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorEugeniy Mikhailov <evgmik@gmail.com>2012-11-16 10:59:18 -0500
committerEugeniy Mikhailov <evgmik@gmail.com>2012-11-16 10:59:18 -0500
commit7c69712371e73c078d49e1d50a0937975bf14ed2 (patch)
tree8f1dc642d0fa5cf6db8bd30928174dcd29093503
parent9aa57a91f8144ee292d0d1cce1336eb1704ba19d (diff)
downloadNresonances-7c69712371e73c078d49e1d50a0937975bf14ed2.tar.gz
Nresonances-7c69712371e73c078d49e1d50a0937975bf14ed2.zip
mathematica: Sqrt -> sqrt for C code generator
-rw-r--r--mathemathica_fwm/RbXMDSSetup1.nb5
1 files changed, 4 insertions, 1 deletions
diff --git a/mathemathica_fwm/RbXMDSSetup1.nb b/mathemathica_fwm/RbXMDSSetup1.nb
index 4bd48e2..d279721 100644
--- a/mathemathica_fwm/RbXMDSSetup1.nb
+++ b/mathemathica_fwm/RbXMDSSetup1.nb
@@ -2051,7 +2051,10 @@ Cell[BoxData[{
RowBox[{
RowBox[{"\"\<WL(\>\"", "~~", "a_", "~~", "\"\<)\>\""}],
"\[RuleDelayed]",
- RowBox[{"\"\<WL\>\"", "<>", "a"}]}]}], "}"}]}], "]"}]}], "Input"],
+ RowBox[{"\"\<WL\>\"", "<>", "a"}]}], ",", " ",
+ RowBox[{"\"\<Sqrt\>\"", "\[RuleDelayed]", " ", "\"\<sqrt\>\""}]}],
+ "}"}]}], "]"}]}], "Input",
+ CellChangeTimes->{{3.562070277693772*^9, 3.562070303169202*^9}}],
Cell[BoxData[
RowBox[{"Export", "[",