Changeset 24391 for trunk/extsrc/gpcsw/gpcsrc/fits/libfh/fh_table.c
- Timestamp:
- Jun 12, 2009, 3:53:07 PM (17 years ago)
- File:
-
- 1 edited
-
trunk/extsrc/gpcsw/gpcsrc/fits/libfh/fh_table.c (modified) (2 diffs)
Legend:
- Unmodified
- Added
- Removed
-
trunk/extsrc/gpcsw/gpcsrc/fits/libfh/fh_table.c
r23924 r24391 180 180 181 181 /* Write the format specifiers for each column. */ 182 for(i=0; i < table->num_cols; i++) 183 { 182 for (i=0; i < table->num_cols; i++) 183 { 184 int n; 185 184 186 idx = 5.0 + i/10.; 185 intn = i + 1; /* FITS numbering scheme starts from 1. */187 n = i + 1; /* FITS numbering scheme starts from 1. */ 186 188 snprintf(keyword, FH_NAME_SIZE + 1, "TFORM%d", n); 187 189 if((table->cols[i].format == FH_TABLE_FORMAT_FLOAT) || … … 214 216 * nice to have from a self-documenting perspective, isn't strictly 215 217 * necessary to interpret the actual table values. */ 216 for(i=0; i < table->num_cols; i++) 217 { 218 for (i=0; i < table->num_cols; i++) 219 { 220 int n; 221 218 222 idx = 7.0 + i/10.; 219 intn = i + 1; /* FITS numbering scheme starts from 1. */223 n = i + 1; /* FITS numbering scheme starts from 1. */ 220 224 snprintf(keyword, FH_NAME_SIZE + 1, "TTYPE%d", n); 221 225 fh_set_str(hu, idx, keyword, table->cols[i].name,
Note:
See TracChangeset
for help on using the changeset viewer.
