Add function to check for extra parameter

FlexibleSUSY · Dec 7, 2016 · a5afded · a5afded
1 parent 8e66431
commit a5afded
Showing 1 changed file with 2 additions and 0 deletions.
diff --git a/meta/Parameters.m b/meta/Parameters.m
@@ -303,6 +303,8 @@
 IsOutputParameter[lst_List] := And @@ (IsOutputParameter /@ lst);
 IsOutputParameter[sym_]     := MemberQ[GetOutputParameters[],sym];
 
+IsExtraParameter[parameter_] := MemberQ[GetExtraParameters[], parameter];
+
 IsRealParameter[Re[sym_]] := True;
 IsRealParameter[Im[sym_]] := True;
 IsRealParameter[FlexibleSUSY`M[_]] := True;