Changeset 3887 in Sophya for trunk/SophyaExt

Timestamp:

Sep 24, 2010, 11:18:24 AM (15 years ago)

Author:

ansari

Message:

forcage NAXIS=1 lors ecriture TVector + retag en V2_2, Reza 24/09/2010

File:

• trunk/SophyaExt/FitsIOServer/fitsarrhand.h (modified) (1 diff)

trunk/SophyaExt/FitsIOServer/fitsarrhand.h

@@ -78 +78 @@
       for(int_4 id=0; id<dobj->NbDimensions(); id++) 
         naxes[id] = dobj->Size(id);
+      int naxis=dobj->NbDimensions();
       T x = 0;
-      os.CreateImageHDU(FitsTypes::ImageType(x), dobj->NbDimensions(), naxes);
+      TVector<T> * pvec = dynamic_cast< TVector<T> * >(dobj); 
+      if (pvec!=NULL) {  naxis=1;  naxes[0]=pvec->NElts(); }
+      os.CreateImageHDU(FitsTypes::ImageType(x), naxis, naxes);
       os.WriteHeaderRecords(dobj->Info());
       MuTyV mtv;