Skip to content

Commit

Permalink
simplify CreateMassCalculationFunction[] a bit
Browse files Browse the repository at this point in the history
  • Loading branch information
Alexander Voigt committed Mar 25, 2015
1 parent a8b4a75 commit 22e2db1
Showing 1 changed file with 1 addition and 3 deletions.
4 changes: 1 addition & 3 deletions meta/TreeMasses.m
Expand Up @@ -918,17 +918,15 @@ the fundamental representation of SU(3) in SARAH.
phase = Parameters`GetPhase[massESSymbol];
If[IsFermion[massESSymbol] && phase =!= Null &&
!IsMassless[massESSymbol],
particle = ToValidCSymbolString[FlexibleSUSY`M[massESSymbol]];
body = body <> "\n" <> "if (" <> ev <> " < 0.) {\n" <>
IndentText[particle <> " *= -1;\n" <>
IndentText[ev <> " *= -1;\n" <>
CConversion`ToValidCSymbolString[phase] <> " = " <>
CConversion`CreateCType[CConversion`ScalarType[complexScalarCType]] <>
"(0., 1.);"] <> "\n}\n";
];
(* check for tachyons *)
If[(IsVector[massESSymbol] || IsScalar[massESSymbol]) &&
!IsMassless[massESSymbol],
particle = ToValidCSymbolString[massESSymbol];
body = body <> "\n" <>
"if (" <> ev <> If[dim == 1, "", ".minCoeff()"] <> " < 0.)\n" <>
IndentText[
Expand Down

0 comments on commit 22e2db1

Please sign in to comment.