IPP Software Navigation Tools IPP Links Communication Pan-STARRS Links

Ignore:
Timestamp:
Dec 7, 2008, 3:31:01 PM (18 years ago)
Author:
eugene
Message:

big update from eam_branch_20081124 with updates to Opihi math

File:
1 edited

Legend:

Unmodified
Added
Removed

  • trunk/Ohana/src/opihi/cmd.data/grid.c

    r13479 r20936  
    2323
    2424  N = 0;
    25   Xvec.Nelements = 200;
    26   Yvec.Nelements = 200;
    27   ALLOCATE (Xvec.elements, float, Xvec.Nelements);
    28   ALLOCATE (Yvec.elements, float, Yvec.Nelements);
     25  SetVector (&Xvec, OPIHI_FLT, 200);
     26  SetVector (&Yvec, OPIHI_FLT, 200);
    2927
    3028  major = minor = 1;
    … …  
    6462      if (MajorTick) {
    6563        /* major tick */
    66         Xvec.elements[N] = next;
    67         Yvec.elements[N] = graphmode.ymin;
    68         N++;
    69         if (N == Xvec.Nelements) {
    70           Xvec.Nelements += 200;
    71           Yvec.Nelements += 200;
    72           REALLOCATE (Xvec.elements, float, Xvec.Nelements);
    73           REALLOCATE (Yvec.elements, float, Yvec.Nelements);
    74         }
    75         Xvec.elements[N] = next;
    76         Yvec.elements[N] = graphmode.ymax;
    77         N++;
    78         if (N == Xvec.Nelements) {
    79           Xvec.Nelements += 200;
    80           Yvec.Nelements += 200;
    81           REALLOCATE (Xvec.elements, float, Xvec.Nelements);
    82           REALLOCATE (Yvec.elements, float, Yvec.Nelements);
     64        Xvec.elements.Flt[N] = next;
     65        Yvec.elements.Flt[N] = graphmode.ymin;
     66        N++;
     67        if (N == Xvec.Nelements) {
     68          Xvec.Nelements += 200;
     69          Yvec.Nelements += 200;
     70          REALLOCATE (Xvec.elements.Flt, opihi_flt, Xvec.Nelements);
     71          REALLOCATE (Yvec.elements.Flt, opihi_flt, Yvec.Nelements);
     72        }
     73        Xvec.elements.Flt[N] = next;
     74        Yvec.elements.Flt[N] = graphmode.ymax;
     75        N++;
     76        if (N == Xvec.Nelements) {
     77          Xvec.Nelements += 200;
     78          Yvec.Nelements += 200;
     79          REALLOCATE (Xvec.elements.Flt, opihi_flt, Xvec.Nelements);
     80          REALLOCATE (Yvec.elements.Flt, opihi_flt, Yvec.Nelements);
    8381        }
    8482      }
    … …  
    8684      if (MinorTick) {
    8785        /* minor tick */
    88         Xvec.elements[N] = next;
    89         Yvec.elements[N] = graphmode.ymin;
    90         N++;
    91         if (N == Xvec.Nelements) {
    92           Xvec.Nelements += 200;
    93           Yvec.Nelements += 200;
    94           REALLOCATE (Xvec.elements, float, Xvec.Nelements);
    95           REALLOCATE (Yvec.elements, float, Yvec.Nelements);
    96         }
    97         Xvec.elements[N] = next;
    98         Yvec.elements[N] = graphmode.ymax;
    99         N++;
    100         if (N == Xvec.Nelements) {
    101           Xvec.Nelements += 200;
    102           Yvec.Nelements += 200;
    103           REALLOCATE (Xvec.elements, float, Xvec.Nelements);
    104           REALLOCATE (Yvec.elements, float, Yvec.Nelements);
     86        Xvec.elements.Flt[N] = next;
     87        Yvec.elements.Flt[N] = graphmode.ymin;
     88        N++;
     89        if (N == Xvec.Nelements) {
     90          Xvec.Nelements += 200;
     91          Yvec.Nelements += 200;
     92          REALLOCATE (Xvec.elements.Flt, opihi_flt, Xvec.Nelements);
     93          REALLOCATE (Yvec.elements.Flt, opihi_flt, Yvec.Nelements);
     94        }
     95        Xvec.elements.Flt[N] = next;
     96        Yvec.elements.Flt[N] = graphmode.ymax;
     97        N++;
     98        if (N == Xvec.Nelements) {
     99          Xvec.Nelements += 200;
     100          Yvec.Nelements += 200;
     101          REALLOCATE (Xvec.elements.Flt, opihi_flt, Xvec.Nelements);
     102          REALLOCATE (Yvec.elements.Flt, opihi_flt, Yvec.Nelements);
    105103        }
    106104      }
    … …  
    144142      if (MajorTick) {
    145143        /* major tick */
    146         Xvec.elements[N] = graphmode.xmin;
    147         Yvec.elements[N] = next;
    148         N++;
    149         if (N == Xvec.Nelements) {
    150           Xvec.Nelements += 200;
    151           Yvec.Nelements += 200;
    152           REALLOCATE (Xvec.elements, float, Xvec.Nelements);
    153           REALLOCATE (Yvec.elements, float, Yvec.Nelements);
    154         }
    155         Xvec.elements[N] = graphmode.xmax;
    156         Yvec.elements[N] = next;
    157         N++;
    158         if (N == Xvec.Nelements) {
    159           Xvec.Nelements += 200;
    160           Yvec.Nelements += 200;
    161           REALLOCATE (Xvec.elements, float, Xvec.Nelements);
    162           REALLOCATE (Yvec.elements, float, Yvec.Nelements);
     144        Xvec.elements.Flt[N] = graphmode.xmin;
     145        Yvec.elements.Flt[N] = next;
     146        N++;
     147        if (N == Xvec.Nelements) {
     148          Xvec.Nelements += 200;
     149          Yvec.Nelements += 200;
     150          REALLOCATE (Xvec.elements.Flt, opihi_flt, Xvec.Nelements);
     151          REALLOCATE (Yvec.elements.Flt, opihi_flt, Yvec.Nelements);
     152        }
     153        Xvec.elements.Flt[N] = graphmode.xmax;
     154        Yvec.elements.Flt[N] = next;
     155        N++;
     156        if (N == Xvec.Nelements) {
     157          Xvec.Nelements += 200;
     158          Yvec.Nelements += 200;
     159          REALLOCATE (Xvec.elements.Flt, opihi_flt, Xvec.Nelements);
     160          REALLOCATE (Yvec.elements.Flt, opihi_flt, Yvec.Nelements);
    163161        }
    164162      }
    … …  
    166164      if (MinorTick) {
    167165        /* minor tick */
    168         Xvec.elements[N] = graphmode.xmin;
    169         Yvec.elements[N] = next;
    170         N++;
    171         if (N == Xvec.Nelements) {
    172           Xvec.Nelements += 200;
    173           Yvec.Nelements += 200;
    174           REALLOCATE (Xvec.elements, float, Xvec.Nelements);
    175           REALLOCATE (Yvec.elements, float, Yvec.Nelements);
    176         }
    177         Xvec.elements[N] = graphmode.xmax;
    178         Yvec.elements[N] = next;
    179         N++;
    180         if (N == Xvec.Nelements) {
    181           Xvec.Nelements += 200;
    182           Yvec.Nelements += 200;
    183           REALLOCATE (Xvec.elements, float, Xvec.Nelements);
    184           REALLOCATE (Yvec.elements, float, Yvec.Nelements);
     166        Xvec.elements.Flt[N] = graphmode.xmin;
     167        Yvec.elements.Flt[N] = next;
     168        N++;
     169        if (N == Xvec.Nelements) {
     170          Xvec.Nelements += 200;
     171          Yvec.Nelements += 200;
     172          REALLOCATE (Xvec.elements.Flt, opihi_flt, Xvec.Nelements);
     173          REALLOCATE (Yvec.elements.Flt, opihi_flt, Yvec.Nelements);
     174        }
     175        Xvec.elements.Flt[N] = graphmode.xmax;
     176        Yvec.elements.Flt[N] = next;
     177        N++;
     178        if (N == Xvec.Nelements) {
     179          Xvec.Nelements += 200;
     180          Yvec.Nelements += 200;
     181          REALLOCATE (Xvec.elements.Flt, opihi_flt, Xvec.Nelements);
     182          REALLOCATE (Yvec.elements.Flt, opihi_flt, Yvec.Nelements);
    185183        }
    186184      }
    … …  
    193191  graphmode.ptype = 100; /* connect a pair */
    194192  graphmode.etype = 0;
    195   PlotVectorPair (kapa, N, Xvec.elements, Yvec.elements, &graphmode);
    196 
    197   free (Xvec.elements);
    198   free (Yvec.elements);
     193  PlotVectorPair (kapa, &Xvec, &Yvec, &graphmode);
     194
     195  free (Xvec.elements.Flt);
     196  free (Yvec.elements.Flt);
    199197
    200198  return (TRUE);
Note: See TracChangeset for help on using the changeset viewer.