update

JerryI · Oct 12, 2024 · 65c4184 · 65c4184
1 parent b64fe3c
commit 65c4184
Show file tree

Hide file tree

Showing 7 changed files with 15,188 additions and 20,190 deletions.
diff --git a/Examples/.wl_timestamp b/Examples/.wl_timestamp
diff --git a/Examples/Basic.html b/Examples/Basic.html
diff --git a/Examples/Basic.wln b/Examples/Basic.wln
diff --git a/Kernel/Material.wl b/Kernel/Material.wl
@@ -358,7 +358,7 @@ materialParameters[list: List[__TransmissionObject], destCl_, srcCl_, metaCl_, {
 
   clRun[destCl, srcCl, metaCl, itemSize, groupSize, NKCycles, MovingAverageFilter,  FabryPerotCycles, groupSize 256];
 
-  Print[StringTemplate["Group size: ``"][groupSize] ];
+
 
   With[{
     dest = destCl,

diff --git a/Kernel/Trace.wl b/Kernel/Trace.wl
@@ -65,7 +65,7 @@ TDTrace[n_NumericArray]["FrequencyDomainConfidenceInterval"] := Module[{model, x
   With[{d = TDTrace[n]["PowerSpectrum"]//QuantityMagnitude}, 
     model = NonlinearModelFit[Drop[d,10], A Exp[-(*FB[*)(((*SpB[*)Power[(x0 - x)(*|*),(*|*)2](*]SpB*))(*,*)/(*,*)((*SpB[*)Power[\[Sigma](*|*),(*|*)2](*]SpB*)))(*]FB*)], {\[Sigma], A, x0}, x, ConfidenceLevel->0.5, Method->"NMinimize"];
     model = Association[model[[1]]["Model"]["FittedParameterRules"]];
-    Quantity[#, 1/"Centimeters"] &/@ {Clip[model[x0] - Abs[model[\[Sigma]]], {0, Infinity}], 1.2 Clip[model[x0] + Abs[model[\[Sigma]]], {0, Infinity}]}
+    Quantity[#, 1/"Centimeters"] &/@ {Clip[model[x0] - Abs[model[\[Sigma]]], {5.0, Infinity}], 1.2 Clip[model[x0] + Abs[model[\[Sigma]]], {30.0, Infinity}]}
   ]
 ]
 TDTrace[n_NumericArray]["FDCI"] := TDTrace[n]["FrequencyDomainConfidenceInterval"]

diff --git a/PacletInfo.wl b/PacletInfo.wl
@@ -7,7 +7,7 @@ PacletObject[
     "Creator" -> "Kirill Vasin",
     "License" -> "MIT",
     "PublisherID" -> "JerryI",
-    "Version" -> "0.0.4",
+    "Version" -> "0.0.2",
     "WolframVersion" -> "13+",
     "PrimaryContext" -> "JerryI`TDSTools`",
     "Extensions" -> {

diff --git a/README.md b/README.md
@@ -1,7 +1,7 @@
 # Time-Domain Spectroscopy Tools 🧰
 A small library for high-precision material parameter extraction from time-domain THz signals, written in Wolfram Language 🐺 and OpenCL 🏎️
 
-*Developed at University of Augsburg, Germany 🇩🇪*
+*Developed at Augsburg University, Germany 🇩🇪*
 
 <h4>Beta testing ♲</h4>
-Original file line number
+Diff line change
@@ Expand Up @@
       clRun[destCl, srcCl, metaCl, itemSize, groupSize, NKCycles, MovingAverageFilter,  FabryPerotCycles, groupSize 256];
-      Print[StringTemplate["Group size: ``"][groupSize] ];
       With[{
         dest = destCl,
@@ Expand Down @@