presentations/highlight-js/test/detect/mathematica/default.txt

15 lines
233 B
Text
Raw Normal View History

2018-12-07 08:48:05 -06:00
(* ::Package:: *)
(* Mathematica Package *)
BeginPackage["SomePkg`"]
Begin["`Private`"]
SomeFn[ns_List] := Fold[Function[{x, y}, x + y], 0, Map[# * 2 &, ns]];
Print[$ActivationKey];
End[] (* End Private Context *)
EndPackage[]