Skip to content

Commit

Permalink
make LogRange[] function nicer
Browse files Browse the repository at this point in the history
  • Loading branch information
Alexander Voigt authored and Alexander Voigt committed Oct 11, 2017
1 parent 0974f57 commit dbefe23
Show file tree
Hide file tree
Showing 3 changed files with 6 additions and 24 deletions.
8 changes: 2 additions & 6 deletions doc/examples-2.0/scan_FlexibleEFTHiggs_uncertainty.m
View file
Expand Up @@ -4,12 +4,8 @@

(* generate logarithmically spaced range [start, stop] *)
LogRange[start_, stop_, steps_] :=
Module[{i, result = {}},
For[i = 0, i <= steps, i++,
result = AppendTo[result, Exp[Log[start] + (Log[stop] - Log[start]) i / steps]];
];
result
];
Exp /@ Range[Log[start], Log[stop],
(Log[stop] - Log[start])/steps];

(* generate logarithmically spaced range [2 Q, Q / 2] *)
GenerateScales[Q_] := LogRange[Q/2, 2 Q, 10];
Expand Down
11 changes: 2 additions & 9 deletions doc/examples-2.0/scan_HSSUSY_EFT_uncertainty.m
View file
Expand Up @@ -2,15 +2,8 @@

(* generate logarithmically spaced range [start, stop] *)
LogRange[start_, stop_, steps_] :=
Module[{i, result = {}},
For[i = 0, i <= steps, i++,
result = AppendTo[
result,
Exp[Log[start] + (Log[stop] - Log[start]) i/steps]
];
];
result
];
Exp /@ Range[Log[start], Log[stop],
(Log[stop] - Log[start])/steps];

CalcMh[MS_, TB_, Xt_, deltaEFT_] :=
Module[{handle, spec},
Expand Down
11 changes: 2 additions & 9 deletions doc/examples-2.0/scan_HSSUSY_SM_uncertainty.m
View file
Expand Up @@ -2,15 +2,8 @@

(* generate logarithmically spaced range [start, stop] *)
LogRange[start_, stop_, steps_] :=
Module[{i, result = {}},
For[i = 0, i <= steps, i++,
result = AppendTo[
result,
Exp[Log[start] + (Log[stop] - Log[start]) i/steps]
];
];
result
];
Exp /@ Range[Log[start], Log[stop],
(Log[stop] - Log[start])/steps];

(* generate logarithmically spaced range [2 Q, Q / 2] *)
GenerateScales[Q_] := LogRange[Q/2, 2 Q, 10];
Expand Down

0 comments on commit dbefe23

Please sign in to comment.