Imports System.Numerics
Module Example
Public Sub Main()
Dim value As New Complex(Double.MinValue/2, Double.MinValue/2)
Dim value2 As Complex = Complex.Exp(Complex.Log(value))
Console.WriteLine(value)
Console.WriteLine(value2)
Console.WriteLine(value = value2)
End Sub
End Module