diff options
| author | Simon Rochester <simon.rochester@gmail.com> | 2012-09-21 12:21:46 -0700 |
|---|---|---|
| committer | Simon Rochester <simon.rochester@gmail.com> | 2012-09-21 12:21:46 -0700 |
| commit | 67e33c25f224850e32abfcfc20069fa35a50d241 (patch) | |
| tree | 0f05137d2cfbe1979eb5c02e41cdb079bb27b9d0 | |
| parent | 519cadda67591cce5701257f0b0e1cef678f73f1 (diff) | |
| download | Nresonances-67e33c25f224850e32abfcfc20069fa35a50d241.tar.gz Nresonances-67e33c25f224850e32abfcfc20069fa35a50d241.zip | |
Fix bug in C code generation (2nd try).
| -rwxr-xr-x | mathemathica_fwm/RbXMDSSetup.nb | 12 |
1 files changed, 5 insertions, 7 deletions
diff --git a/mathemathica_fwm/RbXMDSSetup.nb b/mathemathica_fwm/RbXMDSSetup.nb index 359e36b..abe1982 100755 --- a/mathemathica_fwm/RbXMDSSetup.nb +++ b/mathemathica_fwm/RbXMDSSetup.nb @@ -1271,9 +1271,7 @@ Cell[BoxData[{ RowBox[{"All", ",", "2", ",", "2"}], "]"}], "]"}]}], "}"}], "]"}],
"]"}]}], "Input"],
-Cell["\<\
-Plot atomic populations for a given set of parameters.\
-\>", "Text"],
+Cell["Plot atomic populations for a given set of parameters.", "Text"],
Cell[BoxData[{
RowBox[{
@@ -2163,10 +2161,10 @@ Cell[BoxData[{ RowBox[{"ToString", "@",
RowBox[{"CForm", "[",
RowBox[{"%", "[",
- RowBox[{"[", "i", "]"}], "]"}], "]"}]}], "<>", "\"\< - Lt[E\>\"", "<>",
- RowBox[{"ToString", "@", "i"}], "<>", "\"\<];\\n\>\""}], ",",
+ RowBox[{"[", "j", "]"}], "]"}], "]"}]}], "<>", "\"\< - Lt[E\>\"", "<>",
+ RowBox[{"ToString", "@", "j"}], "<>", "\"\<];\\n\>\""}], ",",
RowBox[{"{",
- RowBox[{"i", ",", "4"}], "}"}]}], "]"}], "]"}], "\[IndentingNewLine]",
+ RowBox[{"j", ",", "4"}], "}"}]}], "]"}], "]"}], "\[IndentingNewLine]",
RowBox[{"StringReplace", "[",
RowBox[{"%", ",",
RowBox[{"{",
@@ -2220,7 +2218,7 @@ Cell[BoxData[{ "\"\<RbPropEquations.txt\>\""}], "]"}], ",", "%"}], "]"}]}], "Input"]
}, Open ]]
},
-WindowSize->{1032, 898},
+WindowSize->{974, 898},
WindowMargins->{{0, Automatic}, {Automatic, 3}},
PrivateNotebookOptions->{"FileOutlineCache"->False},
ShowSelection->True,
|