anchor.diff:          j = index(tag,',')
           tag(j:j) = ' '
           read(tag,*) light1,light2
  -    elseif (tag(1:7).eq.'-chroma') then
  +    elseif (tag.eq.'-chroma') then
           i = i + 1
           call getarg(i,tag)
           j = index(tag,',')
           tag(j:j) = ' '
           read(tag,*) chroma1,chroma2
  +    elseif (tag.eq.'-chroma:exp') then
  +        i = i + 1
  +        call getarg(i,tag)
  +        read(tag,*) chroma_exp
       elseif (tag(1:8).eq.'-convert') then
           i = i + 1
           call getarg(i,convert1)
  
positive.code: double precision :: hue(2)
  double precision :: lightness(2)
  double precision :: chroma(2)
  character(len=16) :: color_path_type
  character(len=8) :: convert(2)
  double precision :: gmt_cpt_lims(2)
  
  integer :: verbose
  
  
negative.code: integer :: i
  integer :: uout
  double precision :: lcheck,ccheck,hcheck
  double precision :: hsv1,hsv2,hsv3
  
  ! Parse command line
  call gcmdln(option,hue1,hue2,light1,light2,chroma1,chroma2,ncolors,convert1,convert2,&
  