Changeset 42585

Timestamp:

Jan 13, 2024, 2:40:18 PM (3 years ago)

Author:

eugene

Message:

add RA---CAR (Plat-Carre) projection

Location:

branches/eam_branches/ipp-20230313/Ohana/src

Files:

• libdvo/include/libdvo_astro.h (modified) (1 diff)
• libdvo/src/coordops.c (modified) (3 diffs)
• opihi/cmd.astro/region.c (modified) (1 diff)
• opihi/test/cdensify.sh (added)

branches/eam_branches/ipp-20230313/Ohana/src/libdvo/include/libdvo_astro.h

@@ -20 +20 @@
   PROJ_TNX, // zenithal
   PROJ_DIS, // zenithal (TAN + polyterms)
+  PROJ_CAR, // cartesian (Plat-Carre)
   PROJ_LIN, // cartesian
   PROJ_PLY, // cartesian (allow polyterms)

branches/eam_branches/ipp-20230313/Ohana/src/libdvo/src/coordops.c

@@ -1072 +1072 @@
   if (!strncmp(&ctype[4], "-TNX", 4)) return PROJ_TNX;
   if (!strncmp(&ctype[4], "-DIS", 4)) return PROJ_DIS;
+  if (!strncmp(&ctype[4], "-CAR", 4)) return PROJ_CAR;
   if (!strncmp(&ctype[4], "-LIN", 4)) return PROJ_LIN;
   if (!strncmp(&ctype[0], "GENE", 4)) return PROJ_LIN; // note ctype[0]
@@ -1094 +1095 @@
     case PROJ_TNX: strcpy(&ctype[4], "-TNX"); return TRUE;
     case PROJ_DIS: strcpy(&ctype[4], "-DIS"); return TRUE;
+    case PROJ_CAR: strcpy(&ctype[4], "-CAR"); return TRUE;
     case PROJ_LIN: strcpy(&ctype[4], "-LIN"); return TRUE;
     case PROJ_PLY: strcpy(&ctype[4], "-PLY"); return TRUE;
@@ -1118 +1120 @@
     case PROJ_DIS:
       return PROJ_MODE_ZENITHAL;
+    case PROJ_CAR: 
     case PROJ_LIN: 
     case PROJ_PLY: 

branches/eam_branches/ipp-20230313/Ohana/src/opihi/cmd.astro/region.c

@@ -160 +160 @@
     if (!strcasecmp (argv[CtypeArg], "PAR")) { strcpy (graphmode.coords.ctype, "DEC--PAR"); goto got_ctype; }
     if (!strcasecmp (argv[CtypeArg], "MOL")) { strcpy (graphmode.coords.ctype, "DEC--MOL"); goto got_ctype; }
+    if (!strcasecmp (argv[CtypeArg], "LIN")) { strcpy (graphmode.coords.ctype, "DEC--LIN"); goto got_ctype; }
+    if (!strcasecmp (argv[CtypeArg], "CAR")) { strcpy (graphmode.coords.ctype, "DEC--CAT"); goto got_ctype; }
     gprint (GP_ERR, "ERROR: invalid projection type %s\n", argv[CtypeArg]);
-    gprint (GP_ERR, "allowed values: TAN, SIN, ARC, STG, ZEA, AIT, GLS, PAR, MOL\n");
+    gprint (GP_ERR, "allowed values: TAN, SIN, ARC, STG, ZEA, AIT, GLS, PAR, MOL, LIN, CAR\n");
     return FALSE;
   }