Imports Leadtools
Imports Leadtools.Codecs
Imports Leadtools.ImageProcessing.Core
    
Public Sub CLAHECommandExample()
    Dim codecs As New RasterCodecs()
    codecs.ThrowExceptionsOnInvalidImages = True
    Dim leadImage As RasterImage = codecs.Load(Path.Combine(LEAD_VARS.ImagesDir, "IMAGE3.dcm"))
    ' Prepare the command
    Dim command As CLAHECommand = New CLAHECommand
    'Apply a CLAHE filter.
    command.Flags = CLAHECommandFlags.ApplyRayliehDistribution
    command.AlphaFactor = 0.65F
    command.TileHistClipLimit = 0.08F
    command.TilesNumber = 6
    command.BinNumber = 128
    command.Run(leadImage)
End Sub
Public NotInheritable Class LEAD_VARS
Public Const ImagesDir As String = "C:\Users\Public\Documents\LEADTOOLS Images"
End Class
             
   
     
            using Leadtools;
using Leadtools.Codecs;
using Leadtools.ImageProcessing.Core;
      
public void CLAHECommandExample()
{
   // Load an image
   RasterCodecs codecs = new RasterCodecs() ;
   codecs.ThrowExceptionsOnInvalidImages = true ;
   RasterImage image = codecs.Load(Path.Combine(LEAD_VARS.ImagesDir, "IMAGE3.dcm")) ;
   string destFileName = Path.Combine(LEAD_VARS.ImagesDir, "CLAHERes.Tif") ;
   // Prepare the command
   CLAHECommand command = new CLAHECommand() ;
   //Apply a CLAHE filter.
   command.Flags = CLAHECommandFlags.ApplyRayliehDistribution;
   command.AlphaFactor = 0.65f ;
   command.TileHistClipLimit = 0.08f ;
   command.TilesNumber = 6 ;
   command.BinNumber = 128 ;
   command.Run(image);
   // Save it to disk
   codecs.Save(image, destFileName, RasterImageFormat.Tif, 16);
}
static class LEAD_VARS
{
public const string ImagesDir = @"C:\Users\Public\Documents\LEADTOOLS Images";
}