V3.1.1

himeinhardt · Apr 22, 2023 · ded898e · ded898e
1 parent 2c0685e
commit ded898e
Show file tree

Hide file tree

Showing 8 changed files with 1,192 additions and 651 deletions.
diff --git a/ChangeLog b/ChangeLog
@@ -342,3 +342,9 @@
     1. Revision
 
       Update of the Documentation references pages and adjustment to the paclet system of Mathematica Version 13.0.
+
+    Version 3.1.1
+
+    Adding the new functions:
+
+    ProductGame, ProbabilityGame, HarsanyiValue, ShapAirProb, TauValAirProb, NucAirProb.
diff --git a/ChangeLog.md b/ChangeLog.md
@@ -346,3 +346,16 @@ Some minor bug fixes and code revision.
 #### 1. Revision
 
 Update of the Documentation references pages and adjustment to the paclet system of Mathematica Version 13.0.
+
+### Version 3.1.1
+
+####  1. Modification
+
+Adding the new functions:
+
+* `ProductGame[]` computes from a weight vector the product game and Harsanyi dividends.
+* `ProbabilityGame[]` computes from a weight vector the probability game.
+* `HarsanyiValue[]` the Harsanyi value of the game.
+* `ShapAirProb[]` calculates the Shapley value from an airport cost allocation problem.
+* `TauValAirProb[]` calculates the Tau value from an airport cost allocation problem.
+* `NucAirProb[]` calculates the nucleolus from an airport cost allocation problem.
diff --git a/LICENSE.md b/LICENSE.md
@@ -1,6 +1,6 @@
 # MIT License
 
-## Copyright (c) 2019-22, Holger I. Meinhardt
+## Copyright (c) 2019-23, Holger I. Meinhardt
 
 Permission is hereby granted, free of charge, to any person obtaining a copy of this software and associated documentation files (the "Software"), to deal in the Software without restriction, including without limitation the rights to use, copy, modify, merge, publish, distribute, sublicense, and/or sell copies of the Software, and to permit persons to whom the Software is furnished to do so, subject to the following conditions:
 

diff --git a/PacletInfo.m b/PacletInfo.m
@@ -1,6 +1,6 @@
 Paclet[ 
         Name -> "TUG",
-        Version -> "3.1.0",
+        Version -> "3.1.1",
         MathematicaVersion -> "12+",
         Description -> "A Mathematica Package for Cooperative Game Theory",
         Creator -> "Holger Ingmar Meinhardt <holger.meinhardt@partner.kit.edu>",

diff --git a/ParaTuGames.wl b/ParaTuGames.wl
@@ -1,7 +1,7 @@
 (* ::Package:: *)
 
 (* :Title: ParaTuGames.m
-    : Release Date : 15.03.2022
+    : Release Date : 18.04.2023
 
 
 *)
@@ -21,7 +21,7 @@ Off[Needs::nocont]
     holger.meinhardt@wiwi.uni-karlsruhe.de
 *)
 
-(* :Package Version: 1.0.3 *)
+(* :Package Version: 1.0.4 *)
 
 (* 
    :Mathematica Version: 12.x, 13.x
@@ -779,7 +779,7 @@ ParaMaxSurplus[game_, pi_, pj_, payoff_List] :=
 
 
 ParaMaxSijSurplus[game_,sij_List, payass_List] := 
-	Block[{},
+	Block[{z0},
           Max[ReplaceAll[Map[v[#] - x[#] &, sij],payass]]
       ];
 
@@ -795,7 +795,7 @@ ParaAntiSurplus[game_, pi_, pj_, payoff_List] :=
       ];
 
 ParaAntiSijSurplus[game_,sij_List, payass_List] := 
-	Block[{},
+	Block[{z0},
           Min[ReplaceAll[Map[v[#] - x[#] &, sij],payass]]
       ];
 
@@ -942,7 +942,7 @@ ParaMinExc[mg_List, asspay_List] := Min[ReplaceAll[(v[#] - x[#]) & /@ mg, asspay
 (* Deriving a game from unanimity coordinates. *)
 
 ParaCharacteristicValues[args___]:=(Message[ParaCharacteristicValues::argerr];$Failed);
-ParaCharacteristicValues[coord_List,T_,opts:OptionsPattern[]]:= Block[{},
+ParaCharacteristicValues[coord_List,T_,opts:OptionsPattern[]]:= Block[{z0},
       Which[ Length[coord] === 2^Length[T] , ParaDetWorth[coord,T] ,
                     True, ParaWrongCoordDimension[coord, T]]
 ];
@@ -1043,11 +1043,11 @@ ParaSupAddQ[teilmg_List] := Block[{tpws, valsubg, duval, leq},
 
 ParaWrongDimension:=(Print["Payoff vector has not the correct dimension!"]); 
 
-ParaWrongCoordDimension[T_]:= Block[{},
+ParaWrongCoordDimension[T_]:= Block[{z0},
       Print["List of unanimity coordinates of size 2 has not the correct length!"];
       Print["The correct dimension is: ", Binomial[Length[T],2]];
 ];
-ParaWrongCoordDimension[coord_List,T_]:= Block[{},
+ParaWrongCoordDimension[coord_List,T_]:= Block[{z0},
       Print["List of unanimity coordinates of length ", Length[coord]];
       Print["is not correct!"];
       Print["The correct dimension is: ", 2^Length[T]];

diff --git a/README b/README
@@ -1,4 +1,4 @@
-Mathematica Package: TuGames Version 3.1.0
+Mathematica Package: TuGames Version 3.1.1
 ==============================
 Contents:
  1. Introduction
@@ -117,10 +117,10 @@ the command
 
 In[1]:= PacletInformation["TUG"]
 
-Out[1]= {Name -> TUG, Version -> 3.1.0, BuildNumber -> , Qualifier -> , WolframVersion -> 12+,
+Out[1]= {Name -> TUG, Version -> 3.1.1, BuildNumber -> , Qualifier -> , WolframVersion -> 12+,
          SystemID -> All, Description -> A Mathematica Package for Cooperative Game Theory,
 	 Category -> , Creator -> Holger Ingmar Meinhardt <holger.meinhardt@partner.kit.edu>,
-	 Publisher -> , Support -> , Internal -> False, Location -> /home/kit/xxx/xxxx/.Mathematica/Paclets/Repository/TUG-3.1.0
+	 Publisher -> , Support -> , Internal -> False, Location -> /home/kit/xxx/xxxx/.Mathematica/Paclets/Repository/TUG-3.1.1
 	 Context -> {TUG`coop`, TUG`vertex`, TUG`}, Enabled -> True, Loading -> Manual}
 
 
@@ -130,7 +130,7 @@ To get the same information and beyond that under Mathematica version 12.1, it i
 In[1]:= PacletObject["TUG"][All]
 
 
-Out[1]=  {"Name" -> "TUG", "Version" -> "3.1.0", "WolframVersion" -> "12+", 
+Out[1]=  {"Name" -> "TUG", "Version" -> "3.1.1", "WolframVersion" -> "12+", 
           "Qualifier" -> "", "SystemID" -> All, "Description" -> "A Mathematica Package for Cooperative Game Theory",
           "Category" -> Missing["NotAvailable"], "Keywords" -> Missing["NotAvailable"], 
           "UUID" -> Missing["NotAvailable"], 
@@ -140,7 +140,7 @@ Out[1]=  {"Name" -> "TUG", "Version" -> "3.1.0", "WolframVersion" -> "12+",
           "Internal" -> False, 
           "Context" -> {"TUG`coop`", "TUG`vertex`", "TUG`"}, 
           "Loading" -> Manual, "AutoUpdating" -> False, "Enabled" -> True, 
-          "Location" -> "/home/kit/xxx/xxxx/.Mathematica/Paclets/Repository/TUG-3.1.0"}
+          "Location" -> "/home/kit/xxx/xxxx/.Mathematica/Paclets/Repository/TUG-3.1.1"}
 
 or alternatively/
 
@@ -265,8 +265,8 @@ In[1]:=  Needs["TUG`"]
 ===================================================
 Loading Package 'TuGames' for Unix
 ===================================================
-TuGames V3.1.0 by Holger I. Meinhardt
-Release Date: 15.03.2022
+TuGames V3.1.1 by Holger I. Meinhardt
+Release Date: 18.04.2023
 Program runs under Mathematica Version 12.0 or later
 Version 12.x or higher is recommended
 ===================================================

diff --git a/README.md b/README.md
@@ -1,8 +1,8 @@
 [![GitHub (pre-)release](https://img.shields.io/github/release/himeinhardt/TuGames/all.svg)](https://github.com/himeinhardt/TuGames/releases)
-[![Mathematica 12.0 - 13.0.1](https://img.shields.io/badge/Mathematica-12.0_--_13.0.1-brightgreen.svg)](#compatibility)
+[![Mathematica 12.0 - 13.2.0](https://img.shields.io/badge/Mathematica-12.0_--_13.2.0-brightgreen.svg)](#compatibility)
 [![license MIT](https://img.shields.io/badge/license-MIT-blue.svg)](https://github.com/himeinhardt/TuGames/blob/master/LICENSE.md)
 
-# *Mathematica* Package: *TuGames* Version 3.1.0
+# *Mathematica* Package: *TuGames* Version 3.1.1
 
 ```
 Contents:
@@ -130,10 +130,10 @@ In order check for *Mathematica* versions smaller than 12.1 the paths where you
 ```
 In[1]:= PacletInformation["TUG"]
 
-Out[1]= {Name -> TUG, Version -> 3.1.0, BuildNumber -> , Qualifier -> , WolframVersion -> 12+,
+Out[1]= {Name -> TUG, Version -> 3.1.1 BuildNumber -> , Qualifier -> , WolframVersion -> 12+,
          SystemID -> All, Description -> A Mathematica Package for Cooperative Game Theory,
 	 Category -> , Creator -> Holger Ingmar Meinhardt <holger.meinhardt@partner.kit.edu>,
-	 Publisher -> , Support -> , Internal -> False, Location -> /home/kit/xxx/xxxx/.Mathematica/Paclets/Repository/TUG-3.1.0
+	 Publisher -> , Support -> , Internal -> False, Location -> /home/kit/xxx/xxxx/.Mathematica/Paclets/Repository/TUG-3.1.1
 	 Context -> {TUG`coop`, TUG`vertex`, TUG`}, Enabled -> True, Loading -> Manual}
 ```
 
@@ -143,7 +143,7 @@ To get the same information and beyond that under *Mathematica* version 12.1, it
 In[1]:= PacletObject["TUG"][All]
 ```
 ```
-Out[1]=  {"Name" -> "TUG", "Version" -> "3.1.0", "WolframVersion" -> "12+", 
+Out[1]=  {"Name" -> "TUG", "Version" -> "3.1.1", "WolframVersion" -> "12+", 
           "Qualifier" -> "", "SystemID" -> All, "Description" -> "A Mathematica Package for Cooperative Game Theory",
           "Category" -> Missing["NotAvailable"], "Keywords" -> Missing["NotAvailable"], 
           "UUID" -> Missing["NotAvailable"], 
@@ -153,7 +153,7 @@ Out[1]=  {"Name" -> "TUG", "Version" -> "3.1.0", "WolframVersion" -> "12+",
           "Internal" -> False, 
           "Context" -> {"TUG`coop`", "TUG`vertex`", "TUG`"}, 
           "Loading" -> Manual, "AutoUpdating" -> False, "Enabled" -> True, 
-          "Location" -> "/home/kit/xxx/xxxx/.Mathematica/Paclets/Repository/TUG-3.1.0"}
+          "Location" -> "/home/kit/xxx/xxxx/.Mathematica/Paclets/Repository/TUG-3.1.1"}
 ```
 or alternatively
 
@@ -186,7 +186,7 @@ occur on these operating systems to run the basic functions of the package.
 
 ## 2. Custom Installation
 
-Since `Version 2.5.1` the package is distributed as a `Paclet`, which allows a custom installation. The latest version is `TUG-3.1.0`, which is only compatible for Mathematica version 12.0 or higher. This version is not anymore usable for versions that are smaller than 12.0. Notice that `TUG-2.6.2` is the latest version that is compatible with Mathematica versions smaller than 12.0, and will remain compatible with the most recent Mathematica version as long as `ConstrainedMax/ConstrainedMin` and `LinearProgramming/DualLinearProgramming` are supported by Wolfram Research, otherwise one has to update to `TUG-3.0.0` or later.  The installation of the package requires about 90 MB free hard-disk space, and the Mathematica version should not be smaller than 10 while installing Version `TUG-2.6.2`. For Mathematica versions smaller than Version 10, a manual installation is requested. In that case one has to follow the guidelines related to the associated operating system that can be found from the Mathematica documentation. 
+Since `Version 2.5.1` the package is distributed as a `Paclet`, which allows a custom installation. The latest version is `TUG-3.1.1`, which is only compatible for Mathematica version 12.0 or higher. This version is not anymore usable for versions that are smaller than 12.0. Notice that `TUG-2.6.2` is the latest version that is compatible with Mathematica versions smaller than 12.0, and will remain compatible with the most recent Mathematica version as long as `ConstrainedMax/ConstrainedMin` and `LinearProgramming/DualLinearProgramming` are supported by Wolfram Research, otherwise one has to update to `TUG-3.0.0` or later.  The installation of the package requires about 90 MB free hard-disk space, and the Mathematica version should not be smaller than 10 while installing Version `TUG-2.6.2`. For Mathematica versions smaller than Version 10, a manual installation is requested. In that case one has to follow the guidelines related to the associated operating system that can be found from the Mathematica documentation. 
 
 The most simplest method is to install the `Paclet` directly from GitHub under Mathematica V12.0 or later while executing   
 
@@ -275,8 +275,8 @@ In[1]:=  Needs["TUG`"]
 ===================================================
 Loading Package 'TuGames' for Unix
 ===================================================
-TuGames V3.1.0 by Holger I. Meinhardt
-Release Date: 15.03.2022
+TuGames V3.1.1 by Holger I. Meinhardt
+Release Date: 18.04.2023
 Program runs under Mathematica Version 12.0 or later
 Version 12.x or higher is recommended
 ===================================================