Skip to content

Commit

Permalink
CodeGenKranc.m: Remove some comments
Browse files Browse the repository at this point in the history
  • Loading branch information
ianhinder committed Mar 17, 2014
1 parent bc9d2a5 commit 0f022cd
Showing 1 changed file with 0 additions and 4 deletions.
4 changes: 0 additions & 4 deletions Tools/CodeGen/CodeGenKranc.m
Expand Up @@ -263,9 +263,6 @@
rhs = rhs //. ArcCsch[x_] -> asinh[1/x];
rhs = rhs //. ArcCoth[x_] -> atahn[1/x];

(* there have been some problems doing the Max/Min
replacement via the preprocessor for C, so we do it
here *)
(* Note: Mathematica simplifies Max[xx_] -> xx automatically *)
rhs = rhs //. Max[xx_, yy__] :> fmax[xx, Max[yy]];
rhs = rhs //. Min[xx_, yy__] :> fmin[xx, Min[yy]];
Expand All @@ -277,7 +274,6 @@
rhs = VectoriseExpression[rhs]];

rhs = rhs //. {Parameter[xx_] -> xx};
(* Print[rhs//FullForm];*)
rhs]];

CalculationMacros[vectorise_:False] :=
Expand Down

0 comments on commit 0f022cd

Please sign in to comment.