Public Class IccParametricCurveTagType 
   Inherits IccTagTypeBase

Dim instance As IccParametricCurveTagType

public class IccParametricCurveTagType : IccTagTypeBase 

public ref class IccParametricCurveTagType : public IccTagTypeBase 

Public Sub IccParametricCurveTagTypeExample()
      ' load an Icc Profile
      Dim iccProfile As New IccProfileExtended(Path.Combine(LEAD_VARS.ImagesDir, "EmptyIcc.icc"))

      ' we know that we will have 1 parameter for our function,
      ' we knoe that from the specification page 56, table 47
      ' we will fill it directly, define the function parameters
      Dim parameters() As Integer = {IccTools.FromDoubleTo2bFixed2bNumber(5.0)}

      ' create the IccParametricCurve class
      Dim parametricCurve As New IccParametricCurve(IccFunctionsType.Function4Bytes, parameters)

      ' define the tag type
      Dim parametricCurveTagType As New IccParametricCurveTagType(parametricCurve)

      ' add the new tag to the ICC Profile
      iccProfile.AddTag(parametricCurveTagType, IccTag.GrayTRCTag, IccTagTypeBase.ParametricCurveTypeSignature)

      ' generate the new profile id
      iccProfile.GenerateProfileId()

      ' update the icc array with the new changes
      iccProfile.UpdateDataArray()

      ' write the Icc Profile into a new file
      iccProfile.GenerateIccFile(Path.Combine(LEAD_VARS.ImagesDir, "IccParametricCurveTagTypeVB.icc"))
   End Sub

Public NotInheritable Class LEAD_VARS
   Public Const ImagesDir As String = "C:\Users\Public\Documents\LEADTOOLS Images"
End Class

public void IccParametricCurveTagTypeExample()
   {
      // load an Icc Profile
      string fileName = Path.Combine(LEAD_VARS.ImagesDir, "EmptyIcc.icc");
      IccProfileExtended iccProfile = new IccProfileExtended(fileName);

      // we know that we will have 1 parameter for our function,
      // we knoe that from the specification page 56, table 47
      // we will fill it directly, define the function parameters
      int[] parameters = new int[1];
      parameters[0] = IccTools.FromDoubleTo2bFixed2bNumber(5.0);

      // to read the number back
      double myDoubleValue = IccTools.From2bFixed2bNumberToDouble(parameters[0]);

      // create the IccParametricCurve class
      IccParametricCurve parametricCurve = new IccParametricCurve(IccFunctionsType.Function4Bytes, parameters);

      // define the tag type
      IccParametricCurveTagType parametricCurveTagType = new IccParametricCurveTagType(parametricCurve);

      // add the new tag to the ICC Profile
      iccProfile.AddTag(parametricCurveTagType, IccTag.GrayTRCTag, IccTagTypeBase.ParametricCurveTypeSignature);

      // generate the new profile id
      iccProfile.GenerateProfileId();

      // update the icc array with the new changes
      iccProfile.UpdateDataArray();

      // write the Icc Profile into a new file
      string IccfileName = Path.Combine(LEAD_VARS.ImagesDir, "IccParametricCurveTagTypeCS.icc");
      iccProfile.GenerateIccFile(IccfileName);
   }

static class LEAD_VARS
{
   public const string ImagesDir = @"C:\Users\Public\Documents\LEADTOOLS Images";
}