logo kso logo uni graz

20130729 - Filament data for 05 UTC
Available data for 20130729: »05 UTC   »06 UTC   »07 UTC   »08 UTC   »09 UTC   »10 UTC   »11 UTC   »12 UTC   »13 UTC  
Click on image to open sensitive map!
 
  Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1  818 1718 (N56E10 L= 75)   332     44        1 ( 800/1691- 838/1744)  45.0 E11-E07 N53-N58
      2 1775 1318 (N13W60 L=145)  1231    217        2 (1714/1239-1828/1413) -67.4 W55-W64 N07-N19
      3 1382 1347 (N21W28 L=112)   574    224        0 (1285/1331-1473/1370)  -4.4 W21-W34 N19-N23
      4  137 1123 (N17E74 L= 10)   744     73        2 ( 113/1093- 160/1151) -14.0 E82-E69 N14-N18
      5 1890 1013 (S07W67 L=152)  2288    152        4 (1851/ 941-1927/1078) -55.0 W61-W74 S12-S02
      6 1823  899 (S13W58 L=142)   570     73        0 (1799/ 865-1844/ 943)  53.1 W54-W60 S14-S10
      7  209  916 (N04E62 L= 22)   463     45        0 ( 188/ 892- 232/ 940)  31.0 E65-E58 N02-N05
      8 1337  720 (S17W17 L=101)   480    147        1 (1297/ 657-1370/ 776)  49.4 W13-W19 S20-S13
  
Download Binary data for this image

» All Filament Data of 20130729 ...
IDL code for reading binary data:
    OPENR, u, binfile, /COMP, /GET_LUN
    head = FLTARR(6) ;[xsize,ysize,radius,hh,mm,ss]
    READU, u, head
    data = INTARR(FIX(head[0]),FIX(head[1]))
    READU, u, data
    FREE_LUN, u
    
  • each filament has the value of Fil_ID
  • all values are in pixel
to get the area of a filament:
  c = WHERE(data EQ Fil_ID, area)
  f = '(2(A,I6))'
  PRINT, FORM=f, "Area of Fil_ID", Fil_ID," =", area 
be careful: y-origin is upper left! you can transpose the data:
  data = ROTATE(data,7)
  Solar_y = 2048-Solar_y