add simplify() for GreyNumber

CHANGELOG.md

@@ -1,9 +1,13 @@
-### 0.7.8 (Upcoming release)
+### 0.7.9 (Upcoming release)
+
+
+### 0.7.8
 
 - Add normalization option to WPM method
 - XYZMethod() now defines the default normalization for the possible copeland calls.
 - Test code coverage increased.
 - Added isfinite(), isnan(), one() for GreyNumber.
+- Added simplify() for GreyNumber.
 
 ### 0.7.7
 

Project.toml

@@ -1,7 +1,7 @@
 name = "JMcDM"
 uuid = "358108f5-d052-4d0a-8344-d5384e00c0e5"
 authors = ["Mehmet Hakan Satman (jbytecode) <[email protected]>", "Bahadir Fatih Yildirim <[email protected]>", "Ersagun Kuruca"]
-version = "0.7.7"
+version = "0.7.8"
 
 [deps]
 Requires = "ae029012-a4dd-5104-9daa-d747884805df"

src/JMcDM.jl

@@ -168,7 +168,7 @@ import .SCDM: SavageResult, HurwiczResult, MLEResult, ExpectedRegretResult
 import .SCDM:
     laplace, maximax, maximin, minimax, minimin, savage, hurwicz, mle, expectedregret
 
-import .GreyNumbers: GreyNumber, kernel, whitenizate
+import .GreyNumbers: GreyNumber, kernel, whitenizate, simplify
 
 import .Utilities: *
 using .Utilities
@@ -316,7 +316,7 @@ import JMcDM.Copeland: copeland
 export copeland
 
 # export Grey Number elements
-export GreyNumber, kernel, whitenizate
+export GreyNumber, kernel, whitenizate, simplify
 
 export Normalizations
 

src/greynumber.jl

@@ -363,10 +363,22 @@ function Base.isfinite(g::GreyNumber)::Bool
 	return isfinite(g.a) || isfinite(g.b)
 end
 
+function simplify(n::Number)
+	return n
+end 
+
+function simplify(g::GreyNumber)::Union{Number, GreyNumber}
+	if g.a == g.b 
+		return simplify(g.a)
+	else 
+		return g
+	end 
+end 
+
 
 export GreyNumber
 export kernel
 export whitenizate
-
+export simplify
 
 end # module

test/testgreynumber.jl

@@ -181,4 +181,19 @@
 			GreyNumber(GreyNumber(-5.0, -5.0), GreyNumber(-5.0, -5.0)),
 			GreyNumber(GreyNumber(15.0, 15.0), GreyNumber(15.0, 15.0))]
 	end
+
+	@testset "Simplify" begin 
+		@testset "Simplify matrix" begin 
+		v = GreyNumber[
+			GreyNumber(GreyNumber(-5.0, -5.0), GreyNumber(-5.0, -5.0)),
+			GreyNumber(GreyNumber(15.0, 15.0), GreyNumber(15.0, 15.0))]
+		result = simplify.(v)
+
+		@test result == [-5.0, 15.0]
+		end 
+
+		@testset "Simplify basic" begin 
+			@test simplify(GreyNumber(5.0, 5.0)) == 5.0
+		end 
+	end 
 end