Changeset 25027 for branches/pap/extsrc/gpcsw/gpcsrc/fits/libfh/fh_table.c
- Timestamp:
- Aug 7, 2009, 4:08:25 PM (17 years ago)
- Location:
- branches/pap
- Files:
-
- 3 edited
-
. (modified) (1 prop)
-
extsrc/gpcsw (modified) (1 prop)
-
extsrc/gpcsw/gpcsrc/fits/libfh/fh_table.c (modified) (2 diffs)
Legend:
- Unmodified
- Added
- Removed
-
branches/pap
- Property svn:mergeinfo changed
-
branches/pap/extsrc/gpcsw
- Property svn:ignore
-
old new 5 5 man 6 6 Makefile 7 Makefile.bak
-
- Property svn:ignore
-
branches/pap/extsrc/gpcsw/gpcsrc/fits/libfh/fh_table.c
r23924 r25027 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.
