blob: 301f95e1885cc84bccef6c5232728bff310800de (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
|
(* Mathematica Test File *)
(****************************************************************)
(* CreateThorn *)
(****************************************************************)
Test[
CreateKrancThornTT[{}, "TestThorns", "CreateThorn", Calculations -> {}]
,
Null
,
TestID->"CreateThorn"
]
|
