1#@!#!123s

: / home / tattooscyy / api / vendor / scrivo / highlight.php / test / detect / mathematica /

Filename : default.txt

back

(* ::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[]