Sneg

Sneg library by Rok Zitko has been added. It realizes second quantization technique.
vasilsaroka · Apr 10, 2021 · ff14e6f · ff14e6f
1 parent de9a6ba
commit ff14e6f
Show file tree

Hide file tree

Showing 7 changed files with 4,317 additions and 49 deletions.
diff --git a/PacletInfo.m b/PacletInfo.m
@@ -1,10 +1,10 @@
 (* Paclet Info File *)
 
-(* created 2021/03/04*)
+(* created 2021/04/08*)
 
 Paclet[
     Name -> "TBpack",
-    Version -> "0.3.0",
+    Version -> "0.4.0",
     MathematicaVersion -> "10.0+",
     Description -> "Tight-binding calculations in Mathematica.",
     Creator -> "Vasil Saroka <[email protected]>",
@@ -23,7 +23,7 @@
     Publisher -> "vasilsaroka",
     URL -> "https://github.com/vasilsaroka/TBpack",
     Support -> "https://t.me/vasilsaroka",
-    Icon -> "Logo_2.png",
+    Icon -> "Logo_3.png",
     UUID -> "MaTeX documentation embeded",
     Location -> "https://github.com/vasilsaroka/TBpack",
     Extensions -> 

diff --git a/TBpack/CustomTicks.m b/TBpack/CustomTicks.m
@@ -1,12 +1,16 @@
 (* ::Package:: *)
 
 (* :Title: CustomTicks *)
-(* :Context: CustomTicks` *)
 (* :Author: Mark A. Caprio, Department of Physics, University of Notre Dame *)
+(* :Context: CustomTicks` *)
+(* :Version: 2.1.0 *)
+(* :Date: 2016-03-12 *)
+
+(* :Mathematica Version: 6.0+ *)
+(* :Copyright: (c) 2016, Mark A. Caprio *)
+
+
 (* :Summary: Custom tick mark generation for linear, log, and general nonlinear axes. *)
-(* :Copyright: Copyright 2016, Mark A. Caprio *)
-(* :Package Version: 2.1.0 *)
-(* :Mathematica Version: 6.0 *)
 (* :History:
   MCAxes package, January 10, 2003.
   MCAxes and then MCTicks packages distributed as part of LevelScheme, 2004.

diff --git a/TBpack/Documentation/English/ReferencePages/Symbols/ElectronicStructure.nb b/TBpack/Documentation/English/ReferencePages/Symbols/ElectronicStructure.nb
@@ -10,10 +10,10 @@
 NotebookFileLineBreakTest
 NotebookFileLineBreakTest
 NotebookDataPosition[       158,          7]
-NotebookDataLength[  12110933,     219921]
-NotebookOptionsPosition[  11994842,     217724]
-NotebookOutlinePosition[  11995609,     217750]
-CellTagsIndexPosition[  11995524,     217745]
+NotebookDataLength[  12110600,     219912]
+NotebookOptionsPosition[  11994508,     217715]
+NotebookOutlinePosition[  11995275,     217741]
+CellTagsIndexPosition[  11995190,     217736]
 WindowFrame->Normal*)
 
 (* Beginning of Notebook Content *)
@@ -216476,25 +216476,16 @@ Cell[BoxData[
  CellLabel->"In[9]:=",
  CellID->472538745,ExpressionUUID->"8c315538-0ffe-481e-883a-2d4d9272f070"],
 
-Cell[TextData[{
- "Energy levels for several organic molecules which structures are invoked \
-with the built-in function ",
- Cell[BoxData[
-  ButtonBox["Molecule",
-   BaseStyle->"Link"]], "InlineFormula",ExpressionUUID->
-  "c8e21549-9797-49e2-b2ba-1cf51286106b"],
- " (built-in function ",
- Cell[BoxData[
-  ButtonBox["MoleculePlot",
-   BaseStyle->"Link"]], "InlineFormula",ExpressionUUID->
-  "cac57b12-50a1-4a13-892a-ec9851a41caf"],
- " is used for their structure visualization in the inset):"
-}], "ExampleText",
+Cell["\<\
+Energy levels for several organic molecules and their structure visualization \
+in the inset:\
+\>", "ExampleText",
  CellChangeTimes->{{3.807296519639682*^9, 3.807296578926073*^9}, {
   3.8072966132410355`*^9, 3.807296652813299*^9}, {3.8161814906090684`*^9, 
   3.8161815604261713`*^9}, {3.816181597990226*^9, 3.816181599741228*^9}, {
   3.8161816357252817`*^9, 3.8161816419722905`*^9}, {3.816182088673994*^9, 
-  3.8161820977590075`*^9}, {3.8161821388460665`*^9, 3.816182176278123*^9}},
+  3.8161820977590075`*^9}, {3.8161821388460665`*^9, 3.816182176278123*^9}, {
+  3.8259454422758574`*^9, 3.825945497609022*^9}},
  CellID->83758257,ExpressionUUID->"3ab175fe-838a-401f-8d67-d86abc5c72c3"],
 
 Cell[CellGroupData[{
@@ -217226,7 +217217,7 @@ AMy+5XY=
  CellLabel->"Out[10]=",
  CellID->42744818,ExpressionUUID->"1570f5f5-a5fd-48a7-bfa4-14be890d547c"]
 }, Open  ]]
-}, Closed]],
+}, Open  ]],
 
 Cell[CellGroupData[{
 
@@ -217744,7 +217735,7 @@ CellTagsIndex->{
 *)
 (*CellTagsIndex
 CellTagsIndex->{
- {"ExtendedExamples", 11995329, 217738}
+ {"ExtendedExamples", 11994995, 217729}
  }
 *)
 (*NotebookFileOutline
@@ -219885,41 +219876,41 @@ Cell[11928861, 216183, 12786, 275, 1446, "Output",ExpressionUUID->"a5d5f469-652c
 Cell[CellGroupData[{
 Cell[11941708, 216465, 327, 6, 26, "ExampleSection",ExpressionUUID->"dc8a62bd-acee-4765-bc19-53baa96a786f",
  CellID->1653164318],
-Cell[11942038, 216473, 170, 3, 37, "Input",ExpressionUUID->"8c315538-0ffe-481e-883a-2d4d9272f070",
+Cell[11942038, 216473, 170, 3, 39, "Input",ExpressionUUID->"8c315538-0ffe-481e-883a-2d4d9272f070",
  CellID->472538745],
-Cell[11942211, 216478, 951, 19, 52, "ExampleText",ExpressionUUID->"3ab175fe-838a-401f-8d67-d86abc5c72c3",
+Cell[11942211, 216478, 617, 10, 30, "ExampleText",ExpressionUUID->"3ab175fe-838a-401f-8d67-d86abc5c72c3",
  CellID->83758257],
 Cell[CellGroupData[{
-Cell[11943187, 216501, 19718, 479, 982, "Input",ExpressionUUID->"8849a9db-de1b-490c-89c1-42ac1773d038",
+Cell[11942853, 216492, 19718, 479, 1009, "Input",ExpressionUUID->"8849a9db-de1b-490c-89c1-42ac1773d038",
  CellID->66424741],
-Cell[11962908, 216982, 11259, 244, 428, "Output",ExpressionUUID->"1570f5f5-a5fd-48a7-bfa4-14be890d547c",
+Cell[11962574, 216973, 11259, 244, 428, "Output",ExpressionUUID->"1570f5f5-a5fd-48a7-bfa4-14be890d547c",
  CellID->42744818]
 }, Open  ]]
-}, Closed]],
+}, Open  ]],
 Cell[CellGroupData[{
-Cell[11974216, 217232, 249, 5, 26, "ExampleSection",ExpressionUUID->"98823c6f-0659-41a6-a97c-3dd905663f98",
+Cell[11973882, 217223, 249, 5, 46, "ExampleSection",ExpressionUUID->"98823c6f-0659-41a6-a97c-3dd905663f98",
  CellID->589267740],
-Cell[11974468, 217239, 335, 6, 45, "ExampleText",ExpressionUUID->"fc7b6cff-b06e-4d72-a2cf-5ac820df27a1",
+Cell[11974134, 217230, 335, 6, 45, "ExampleText",ExpressionUUID->"fc7b6cff-b06e-4d72-a2cf-5ac820df27a1",
  CellID->158555077],
-Cell[11974806, 217247, 169, 3, 55, "Input",ExpressionUUID->"6d1e7201-b832-456a-8fe4-d84b45a81fdb",
+Cell[11974472, 217238, 169, 3, 55, "Input",ExpressionUUID->"6d1e7201-b832-456a-8fe4-d84b45a81fdb",
  CellID->19388544],
-Cell[11974978, 217252, 288, 5, 45, "ExampleText",ExpressionUUID->"15d5ab26-c0c4-4483-b137-18af9b8251e3",
+Cell[11974644, 217243, 288, 5, 45, "ExampleText",ExpressionUUID->"15d5ab26-c0c4-4483-b137-18af9b8251e3",
  CellID->225468900],
-Cell[11975269, 217259, 2117, 53, 381, "Input",ExpressionUUID->"e89a2b79-ac05-4999-bfa8-75c375a2f297",
+Cell[11974935, 217250, 2117, 53, 381, "Input",ExpressionUUID->"e89a2b79-ac05-4999-bfa8-75c375a2f297",
  CellID->100735450],
-Cell[11977389, 217314, 418, 7, 75, "ExampleText",ExpressionUUID->"f8afc424-a463-45ab-8782-b24ac9b5014b",
+Cell[11977055, 217305, 418, 7, 75, "ExampleText",ExpressionUUID->"f8afc424-a463-45ab-8782-b24ac9b5014b",
  CellID->230233141],
-Cell[11977810, 217323, 1669, 38, 178, "Input",ExpressionUUID->"0effa785-0442-42cf-969e-5b939e650d6f",
+Cell[11977476, 217314, 1669, 38, 178, "Input",ExpressionUUID->"0effa785-0442-42cf-969e-5b939e650d6f",
  CellID->774095697],
-Cell[11979482, 217363, 765, 17, 109, "ExampleText",ExpressionUUID->"9f8e36ec-807c-44c8-86cb-72b03687f065",
+Cell[11979148, 217354, 765, 17, 109, "ExampleText",ExpressionUUID->"9f8e36ec-807c-44c8-86cb-72b03687f065",
  CellID->67501718],
 Cell[CellGroupData[{
-Cell[11980272, 217384, 5226, 132, 705, "Input",ExpressionUUID->"d04b97fc-928f-46bf-a350-a2397dedb4f2",
+Cell[11979938, 217375, 5226, 132, 705, "Input",ExpressionUUID->"d04b97fc-928f-46bf-a350-a2397dedb4f2",
  CellID->38364410],
-Cell[11985501, 217518, 7499, 160, 835, "Output",ExpressionUUID->"5c8da57b-5af4-4fd9-abfd-1fbbef8b41d8",
+Cell[11985167, 217509, 7499, 160, 835, "Output",ExpressionUUID->"5c8da57b-5af4-4fd9-abfd-1fbbef8b41d8",
  CellID->32333434]
 }, Open  ]],
-Cell[11993015, 217681, 1799, 39, 174, "ExampleText",ExpressionUUID->"29e836c5-9888-49ea-82bb-44a1273c1b93",
+Cell[11992681, 217672, 1799, 39, 174, "ExampleText",ExpressionUUID->"29e836c5-9888-49ea-82bb-44a1273c1b93",
  CellID->45530709]
 }, Closed]]
 }, Open  ]]

diff --git a/TBpack/Logo_3.png b/TBpack/Logo_3.png
diff --git a/TBpack/MaTeX.m b/TBpack/MaTeX.m
@@ -1,13 +1,15 @@
 (* Mathematica Package  *)
 (* Created by IntelliJ IDEA http://wlplugin.halirutan.de/ *)
 
+(* ::Package:: *)
+
 (* :Title: MaTeX *)
 (* :Author: Szabolcs Horvat <[email protected]> *)
 (* :Context: MaTeX` *)
 (* :Version: 1.7.8 *)
 (* :Date: 2015-03-04 *)
 
-(* :Mathematica Version: %%mathversion%% *)
+(* :Mathematica Version: 10.0+ *)
 (* :Copyright: (c) 2019 Szabolcs Horvat *)
 
 
@@ -246,7 +248,7 @@
 
     $configOK = pdflatexOK && gsOK && cacheSizeOK && workingDirectoryOK;
     If[Not[$configOK] && $Notebooks, 
-      Print@StringForm["`` for documentation on configuring MaTeX.", Hyperlink["Click here", "paclet:MaTeX/tutorial/ConfiguringMaTeX"]]
+      Print@StringForm["`` for documentation on configuring MaTeX.", Hyperlink["Click here", "paclet:TBpack/tutorial/ConfiguringMaTeX"]]
 	  ];
   ]