Changeset 1359 in Sophya for trunk/SophyaExt/FitsIOServer/fitsbntbllineRW.cc
- Timestamp:
- Dec 19, 2000, 12:27:39 PM (25 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/SophyaExt/FitsIOServer/fitsbntbllineRW.cc
r1351 r1359 50 50 vector<int> IfitsCol; 51 51 vector<int> SfitsCol; 52 vector<int> LfitsCol; 53 vector<int> BfitsCol; 52 54 for (k=0; k<nbcols;k++) 53 55 { 54 56 FitsFile::FitsDataType ss= inFits_->ColTypeFromFits(k); 57 55 58 if (ss == FitsFile::FitsDataType_double) DfitsCol.push_back(k); 56 59 else if (ss == FitsFile::FitsDataType_float) FfitsCol.push_back(k); 57 60 else if (ss == FitsFile::FitsDataType_int) IfitsCol.push_back(k); 61 else if (ss == FitsFile::FitsDataType_long) LfitsCol.push_back(k); 62 else if (ss == FitsFile::FitsDataType_byte) BfitsCol.push_back(k); 58 63 else if (ss == FitsFile::FitsDataType_char) SfitsCol.push_back(k); 59 64 else { … … 76 81 ColN[compt++] = inFits_->ColNameFromFits(IfitsCol[k]); 77 82 } 83 for (k=0; k<LfitsCol.size(); k++) 84 { 85 ColN[compt++] = inFits_->ColNameFromFits(LfitsCol[k]); 86 } 87 for (k=0; k<BfitsCol.size(); k++) 88 { 89 ColN[compt++] = inFits_->ColNameFromFits(BfitsCol[k]); 90 } 78 91 for (k=0; k<SfitsCol.size(); k++) 79 92 { … … 81 94 } 82 95 83 ligne_.setFormat(DfitsCol.size(), FfitsCol.size(), IfitsCol.size(), SfitsCol.size(),ColN);96 ligne_.setFormat(DfitsCol.size(), FfitsCol.size(), IfitsCol.size(), LfitsCol.size(), BfitsCol.size(),SfitsCol.size(), ColN); 84 97 } 85 98 … … 99 112 100 113 101 FITS_BntblLineWriter::FITS_BntblLineWriter(char inputfile[],int dc, int fc,int ic, int cc,vector<string> names,DVList* ptr_dvl, FitsFile::WriteMode wrm)114 FITS_BntblLineWriter::FITS_BntblLineWriter(char inputfile[],int dc, int fc,int ic, int lc, int bc, int cc, vector<string> names,DVList* ptr_dvl, FitsFile::WriteMode wrm) 102 115 { 103 116 int k; 104 int nbcols = dc+fc+ic+cc ;117 int nbcols = dc+fc+ic+cc+lc+bc; 105 118 if (nbcols != names.size()) 106 119 { … … 123 136 types+='I'; 124 137 } 138 for (k=0; k<lc;k++) 139 { 140 types+='J'; 141 } 142 for (k=0; k<bc;k++) 143 { 144 types+='B'; 145 } 125 146 for (k=0; k<cc;k++) 126 147 { 127 148 types+='A'; 128 StringSizes[k] = names[dc+fc+ic+ k].length();149 StringSizes[k] = names[dc+fc+ic+lc+bc+k].length(); 129 150 } 130 151 string extname("Lines_on_Binary_tbl"); 131 152 132 153 outFits_->makeHeaderBntblOnFits(types, names, 1, nbcols, ptr_dvl, extname,StringSizes); 133 ligne_.setFormat(dc, fc, ic, 154 ligne_.setFormat(dc, fc, ic,lc,bc,cc, names); 134 155 135 156 }
Note:
See TracChangeset
for help on using the changeset viewer.