text: /*
   * Copyright (C) 2005-2019 Centre National d'Etudes Spatiales (CNES)
   *
   * This file is part of Orfeo Toolbox
   *
   *     https://www.orfeo-toolbox.org/
   *
   * Licensed under the Apache License, Version 2.0 (the "License");
   * you may not use this file except in compliance with the License.
   * You may obtain a copy of the License at
   *
   *     http://www.apache.org/licenses/LICENSE-2.0
   *
   * Unless required by applicable law or agreed to in writing, software
   * distributed under the License is distributed on an "AS IS" BASIS,
   * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
   * See the License for the specific language governing permissions and
   * limitations under the License.
   */
  
  
  #include "itkMacro.h"
  #include "otbImageFileReader.h"
  #include "otbImageFileWriter.h"
  #include "otbVectorImage.h"
  
  #include "otbSimpleRcsPanSharpeningFusionImageFilter.h"
  
  int otbSimpleRcsPanSharpeningFusionImageFilter(int itkNotUsed(argc), char* argv[])
  {
    const char* panchro    = argv[1];
    const char* multispect = argv[2];
    const char* output     = argv[3];
  
    const unsigned int Dimension = 2;
    typedef double     PixelType;
  
    typedef otb::VectorImage<PixelType, Dimension> VectorImageType;
    typedef otb::Image<PixelType, Dimension>       PanchroImageType;
    typedef otb::ImageFileReader<VectorImageType>  VectorReaderType;
    typedef otb::ImageFileReader<PanchroImageType> ImageReaderType;
    typedef otb::ImageFileWriter<VectorImageType>  VectorImageWriterType;
    typedef otb::SimpleRcsPanSharpeningFusionImageFilter<PanchroImageType, VectorImageType, VectorImageType, double> FilterType;
  
    VectorReaderType::Pointer      multiSpectReader = VectorReaderType::New();
    ImageReaderType::Pointer       panchroReader    = ImageReaderType::New();
    FilterType::Pointer            filter           = FilterType::New();
    VectorImageWriterType::Pointer writer           = VectorImageWriterType::New();
  
    multiSpectReader->SetFileName(multispect);
    panchroReader->SetFileName(panchro);
  
    PanchroImageType::SizeType radius;
    radius[0] = 3;
    radius[1] = 3;
    itk::Array<double> filterCoeffs;
    filterCoeffs.SetSize((2 * radius[0] + 1) * (2 * radius[1] + 1));
  
    //       double filterTmp[] = {
    //         0.00390625, 0.0078125, 0.0117188, 0.015625, 0.0117188, 0.0078125, 0.00390625,
    //         0.0078125, 0.015625, 0.0234375, 0.03125, 0.0234375, 0.015625, 0.0078125,
    //         0.0117188, 0.0234375, 0.0351562, 0.046875, 0.0351562, 0.0234375, 0.0117188,
    //         0.015625, 0.03125, 0.046875, 0.0625, 0.046875, 0.03125, 0.015625,
    //         0.0117188, 0.0234375, 0.0351562, 0.046875, 0.0351562, 0.0234375, 0.0117188,
    //         0.0078125, 0.015625, 0.0234375, 0.03125, 0.0234375, 0.015625, 0.0078125,
    //         0.00390625, 0.0078125, 0.0117188, 0.015625, 0.0117188, 0.0078125, 0.00390625  };
    //
    //       filterCoeffs.SetData(filterTmp);
  
    filterCoeffs.Fill(1);
  
    filter->SetXsInput(multiSpectReader->GetOutput());
    filter->SetPanInput(panchroReader->GetOutput());
    filter->SetRadius(radius);
    filter->SetFilter(filterCoeffs);
    writer->SetInput(filter->GetOutput());
    writer->SetFileName(output);
    writer->Update();
  
    return EXIT_SUCCESS;
  }
  