Changeset 35103 for trunk/Ohana/src/uniphot/src/initialize_setphot.c

Timestamp:

Feb 6, 2013, 3:24:03 PM (13 years ago)

Author:

eugene

Message:

add setastrom program (apply koppenhoefer effect correction); add region (and cpt) option to setphot & setposangle

File:

• trunk/Ohana/src/uniphot/src/initialize_setphot.c (modified) (1 diff)

trunk/Ohana/src/uniphot/src/initialize_setphot.c

@@ -49 +49 @@
   if ((N = get_argument (argc, argv, "-reset"))) {
     RESET = TRUE;
+    remove_argument (N, &argc, argv);
+  }
+
+  SINGLE_CPT = NULL;
+  if ((N = get_argument (argc, argv, "-cpt"))) {
+    remove_argument (N, &argc, argv);
+    SINGLE_CPT = strcreate (argv[N]);
+    remove_argument (N, &argc, argv);
+  }
+
+  // region of interest
+  UserPatch.Rmin = 0;
+  UserPatch.Rmax = 360;
+  UserPatch.Dmin = -90;
+  UserPatch.Dmax = +90;
+  if ((N = get_argument (argc, argv, "-region"))) {
+    remove_argument (N, &argc, argv);
+    UserPatch.Rmin = atof (argv[N]);
+    remove_argument (N, &argc, argv);
+    UserPatch.Rmax = atof (argv[N]);
+    remove_argument (N, &argc, argv);
+    UserPatch.Dmin = atof (argv[N]);
+    remove_argument (N, &argc, argv);
+    UserPatch.Dmax = atof (argv[N]);
     remove_argument (N, &argc, argv);
   }