MtkGCTPProjInfo.c

Go to the documentation of this file.

/*===========================================================================
=                                                                           =
=                          MtkGCTPProjInfo                                 =
=                                                                           =
=============================================================================

                         Jet Propulsion Laboratory
                                   MISR
                               MISR Toolkit

            Copyright 2008, California Institute of Technology.
                           ALL RIGHTS RESERVED.
                 U.S. Government Sponsorship acknowledged.

============================================================================*/

#include "MisrMapQuery.h"
#include "MisrUtil.h"
#include <stdlib.h>
#include <math.h>

MTKt_status MtkGCTPProjInfo(
  int Proj_code,  
  int Sphere_code, 
  int Zone_code,  
  double Proj_param[15], 
  MTKt_GCTPProjInfo *Proj_info 
)
{
  MTKt_status status_code;      /* Return status of this function */
  MTKt_GCTPProjInfo proj_info_tmp = MTKT_GCTPPROJINFO_INIT;
                /* Projection information */
  int i;

  /* ------------------------------------------------------------------ */
  /* Argument check: Proj_info == NULL                                  */
  /* ------------------------------------------------------------------ */
  
  if (Proj_info == NULL) {
    MTK_ERR_CODE_MSG_JUMP(MTK_NULLPTR,"Proj_info == NULL");
  }

  /* ------------------------------------------------------------------ */
  /* Initialize projection information.                                 */
  /* ------------------------------------------------------------------ */

  proj_info_tmp.proj_code = Proj_code;
  proj_info_tmp.sphere_code = Sphere_code;
  proj_info_tmp.zone_code = Zone_code;
  for (i = 0 ; i < 15; i++) {
    proj_info_tmp.proj_param[i] = Proj_param[i];
  }

  /* ------------------------------------------------------------------ */
  /* Return.                                                            */
  /* ------------------------------------------------------------------ */

  *Proj_info = proj_info_tmp;
  return MTK_SUCCESS;

ERROR_HANDLE:
  return status_code;
}