IPP Software Navigation Tools IPP Links Communication Pan-STARRS Links

Ignore:
Timestamp:
May 3, 2006, 12:01:09 PM (20 years ago)
Author:
eugene
Message:

converted fits_ to gfits_

File:
1 edited

Legend:

Unmodified
Added
Removed

  • trunk/Ohana/src/libfits/table/F_table_row.c

    r7039 r7054  
    33
    44/*********************** fits table column ****************************/
    5 int fits_add_rows (FTable *table, char *data, int Nrow, int Nbytes) {
     5int gfits_add_rows (FTable *table, char *data, int Nrow, int Nbytes) {
    66
    77  int Nx, Ny;
    … …  
    1111  header = table[0].header;
    1212
    13   fits_scan (header, "NAXIS1", "%d", 1, &Nx);
    14   fits_scan (header, "NAXIS2", "%d", 1, &Ny);
     13  gfits_scan (header, "NAXIS1", "%d", 1, &Nx);
     14  gfits_scan (header, "NAXIS2", "%d", 1, &Ny);
    1515 
    1616  if (header[0].Naxis[1] != Ny) return (FALSE);
    … …  
    2323  Ny += Nrow;
    2424  header[0].Naxis[1] = Ny;
    25   fits_modify (header, "NAXIS2",  "%d", 1, Ny);
     25  gfits_modify (header, "NAXIS2",  "%d", 1, Ny);
    2626
    27   nbytes = fits_matrix_size (header);
     27  nbytes = gfits_matrix_size (header);
    2828  REALLOCATE (table[0].buffer, char, MAX (nbytes, 1));
    2929  table[0].size = nbytes;
    … …  
    3535
    3636/*********************** fits add (real) rows to virtual table ****************************/
    37 int fits_vadd_rows (VTable *table, char *data, int Nrow, int Nbytes) {
     37int gfits_vadd_rows (VTable *table, char *data, int Nrow, int Nbytes) {
    3838
    3939  int i, Nx, Ny;
    … …  
    4343  header = table[0].header;
    4444
    45   fits_scan (header, "NAXIS1", "%d", 1, &Nx);
    46   fits_scan (header, "NAXIS2", "%d", 1, &Ny);
     45  gfits_scan (header, "NAXIS1", "%d", 1, &Nx);
     46  gfits_scan (header, "NAXIS2", "%d", 1, &Ny);
    4747 
    4848  if (header[0].Naxis[1] != Ny) return (FALSE);
    … …  
    6464  Ny += Nrow;
    6565  header[0].Naxis[1] = Ny;
    66   fits_modify (header, "NAXIS2",  "%d", 1, Ny);
     66  gfits_modify (header, "NAXIS2",  "%d", 1, Ny);
    6767
    68   table[0].size   = fits_matrix_size (table[0].header);
     68  table[0].size   = gfits_matrix_size (table[0].header);
    6969  table[0].pad    = table[0].size - Nx*Ny;
    7070
    … …  
    7373
    7474/*********************** fits table column ****************************/
    75 int fits_delete_rows (FTable *table, int Nstart, int Nrow) {
     75int gfits_delete_rows (FTable *table, int Nstart, int Nrow) {
    7676
    7777  int Nx, Ny, N0, N1, N2;
    … …  
    8181  header = table[0].header;
    8282
    83   fits_scan (header, "NAXIS1", "%d", 1, &Nx);
    84   fits_scan (header, "NAXIS2", "%d", 1, &Ny);
     83  gfits_scan (header, "NAXIS1", "%d", 1, &Nx);
     84  gfits_scan (header, "NAXIS2", "%d", 1, &Ny);
    8585 
    8686  if (header[0].Naxis[1] != Ny) return (FALSE);
    … …  
    9797  Ny -= Nrow;
    9898  header[0].Naxis[1] = Ny;
    99   fits_modify (header, "NAXIS2",  "%d", 1, Ny);
     99  gfits_modify (header, "NAXIS2",  "%d", 1, Ny);
    100100
    101   nbytes = fits_matrix_size (header);
     101  nbytes = gfits_matrix_size (header);
    102102  REALLOCATE (table[0].buffer, char, MAX (nbytes, 1));
    103103  table[0].size = nbytes;
Note: See TracChangeset for help on using the changeset viewer.