IPP Software Navigation Tools IPP Links Communication Pan-STARRS Links

Ignore:
Timestamp:
Nov 25, 2008, 4:51:39 PM (18 years ago)
Author:
eugene
Message:

convert opihi vectors to double type, add option for int type as well

File:
1 edited

Legend:

Unmodified
Added
Removed

  • branches/eam_branch_20081124/Ohana/src/opihi/cmd.data/grid.c

    r13479 r20839  
    2525  Xvec.Nelements = 200;
    2626  Yvec.Nelements = 200;
    27   ALLOCATE (Xvec.elements, float, Xvec.Nelements);
    28   ALLOCATE (Yvec.elements, float, Yvec.Nelements);
     27  ALLOCATE (Xvec.elements.Flt, opihi_flt, Xvec.Nelements);
     28  ALLOCATE (Yvec.elements.Flt, opihi_flt, Yvec.Nelements);
    2929
    3030  major = minor = 1;
    … …  
    6464      if (MajorTick) {
    6565        /* 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);
     66        Xvec.elements.Flt[N] = next;
     67        Yvec.elements.Flt[N] = graphmode.ymin;
     68        N++;
     69        if (N == Xvec.Nelements) {
     70          Xvec.Nelements += 200;
     71          Yvec.Nelements += 200;
     72          REALLOCATE (Xvec.elements.Flt, opihi_flt, Xvec.Nelements);
     73          REALLOCATE (Yvec.elements.Flt, opihi_flt, Yvec.Nelements);
     74        }
     75        Xvec.elements.Flt[N] = next;
     76        Yvec.elements.Flt[N] = graphmode.ymax;
     77        N++;
     78        if (N == Xvec.Nelements) {
     79          Xvec.Nelements += 200;
     80          Yvec.Nelements += 200;
     81          REALLOCATE (Xvec.elements.Flt, opihi_flt, Xvec.Nelements);
     82          REALLOCATE (Yvec.elements.Flt, opihi_flt, Yvec.Nelements);
    8383        }
    8484      }
    … …  
    8686      if (MinorTick) {
    8787        /* 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);
     88        Xvec.elements.Flt[N] = next;
     89        Yvec.elements.Flt[N] = graphmode.ymin;
     90        N++;
     91        if (N == Xvec.Nelements) {
     92          Xvec.Nelements += 200;
     93          Yvec.Nelements += 200;
     94          REALLOCATE (Xvec.elements.Flt, opihi_flt, Xvec.Nelements);
     95          REALLOCATE (Yvec.elements.Flt, opihi_flt, Yvec.Nelements);
     96        }
     97        Xvec.elements.Flt[N] = next;
     98        Yvec.elements.Flt[N] = graphmode.ymax;
     99        N++;
     100        if (N == Xvec.Nelements) {
     101          Xvec.Nelements += 200;
     102          Yvec.Nelements += 200;
     103          REALLOCATE (Xvec.elements.Flt, opihi_flt, Xvec.Nelements);
     104          REALLOCATE (Yvec.elements.Flt, opihi_flt, Yvec.Nelements);
    105105        }
    106106      }
    … …  
    144144      if (MajorTick) {
    145145        /* 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);
     146        Xvec.elements.Flt[N] = graphmode.xmin;
     147        Yvec.elements.Flt[N] = next;
     148        N++;
     149        if (N == Xvec.Nelements) {
     150          Xvec.Nelements += 200;
     151          Yvec.Nelements += 200;
     152          REALLOCATE (Xvec.elements.Flt, opihi_flt, Xvec.Nelements);
     153          REALLOCATE (Yvec.elements.Flt, opihi_flt, Yvec.Nelements);
     154        }
     155        Xvec.elements.Flt[N] = graphmode.xmax;
     156        Yvec.elements.Flt[N] = next;
     157        N++;
     158        if (N == Xvec.Nelements) {
     159          Xvec.Nelements += 200;
     160          Yvec.Nelements += 200;
     161          REALLOCATE (Xvec.elements.Flt, opihi_flt, Xvec.Nelements);
     162          REALLOCATE (Yvec.elements.Flt, opihi_flt, Yvec.Nelements);
    163163        }
    164164      }
    … …  
    166166      if (MinorTick) {
    167167        /* 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);
     168        Xvec.elements.Flt[N] = graphmode.xmin;
     169        Yvec.elements.Flt[N] = next;
     170        N++;
     171        if (N == Xvec.Nelements) {
     172          Xvec.Nelements += 200;
     173          Yvec.Nelements += 200;
     174          REALLOCATE (Xvec.elements.Flt, opihi_flt, Xvec.Nelements);
     175          REALLOCATE (Yvec.elements.Flt, opihi_flt, Yvec.Nelements);
     176        }
     177        Xvec.elements.Flt[N] = graphmode.xmax;
     178        Yvec.elements.Flt[N] = next;
     179        N++;
     180        if (N == Xvec.Nelements) {
     181          Xvec.Nelements += 200;
     182          Yvec.Nelements += 200;
     183          REALLOCATE (Xvec.elements.Flt, opihi_flt, Xvec.Nelements);
     184          REALLOCATE (Yvec.elements.Flt, opihi_flt, Yvec.Nelements);
    185185        }
    186186      }
    … …  
    193193  graphmode.ptype = 100; /* connect a pair */
    194194  graphmode.etype = 0;
    195   PlotVectorPair (kapa, N, Xvec.elements, Yvec.elements, &graphmode);
    196 
    197   free (Xvec.elements);
    198   free (Yvec.elements);
     195  PlotVectorPair (kapa, N, Xvec.elements.Flt, Yvec.elements.Flt, &graphmode);
     196
     197  free (Xvec.elements.Flt);
     198  free (Yvec.elements.Flt);
    199199
    200200  return (TRUE);
Note: See TracChangeset for help on using the changeset viewer.