Skip to content

Commit

Permalink
Avoid unused variable warnings for parameters appearing only via Sign…
Browse files Browse the repository at this point in the history
…/Phase
  • Loading branch information
Dylan Harries committed Dec 16, 2016
1 parent c985ebd commit 3aedb75
Showing 1 changed file with 2 additions and 2 deletions.
4 changes: 2 additions & 2 deletions meta/EWSB.m
Original file line number Diff line number Diff line change
Expand Up @@ -896,13 +896,13 @@

ApplyEWSBSubstitutions[parametersFixedByEWSB_List, substitutions_List, class_String:"model."] :=
Module[{pars, subs = substitutions, result = ""},
pars = DeleteDuplicates[Parameters`FindAllParameters[#[[2]]& /@ substitutions]];
pars = Select[pars, !MemberQ[parametersFixedByEWSB, #]&];
subs = subs /. { RuleDelayed[Sign[p_] /; Parameters`IsInputParameter[Sign[p]],
Global`INPUT[CConversion`ToValidCSymbol[Sign[p]]]],
RuleDelayed[FlexibleSUSY`Phase[p_] /; Parameters`IsInputParameter[FlexibleSUSY`Phase[p]],
Global`INPUT[CConversion`ToValidCSymbol[FlexibleSUSY`Phase[p]]]] };
(result = result <> Parameters`SetParameter[#[[1]], #[[2]], class])& /@ subs;
pars = DeleteDuplicates[Parameters`FindAllParameters[#[[2]]& /@ subs]];
pars = Select[pars, !MemberQ[parametersFixedByEWSB, #]&];
Parameters`CreateLocalConstRefs[pars] <> result
];

Expand Down

0 comments on commit 3aedb75

Please sign in to comment.