logo kso logo uni graz

20130823 - Filament data for 09 UTC
Available data for 20130823: »05 UTC   »06 UTC   »07 UTC   »08 UTC   »09 UTC   »10 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  613 1368 (N36E22 L= 90)   409    115        1 ( 562/1329- 660/1396) -35.5 E25-E18 N32-N38
      2 1864 1083 (S10W62 L=174)   884    125        4 (1829/1045-1900/1129)  45.0 W57-W67 S12-S07
      3 1783 1042 (S09W52 L=164)   634    101        2 (1753/ 996-1814/1082)  33.7 W47-W55 S11-S07
      4 1874  950 (S18W61 L=173)   975    191        1 (1843/ 912-1910/1005)  26.6 W57-W67 S20-S14
      5 1109  800 (S08W01 L=113)   621    212        1 (1076/ 710-1150/ 905)  59.0 E02-W04 S12-S02
      6 1273  730 (S16W09 L=121)   642    225        1 (1227/ 653-1354/ 783)  29.1 W05-W14 S19-S12
      7 1536  422 (S45W27 L=139)   357     52        0 (1516/ 403-1561/ 451) -45.0 W24-W29 S47-S42
      8  579  276 (S34E58 L= 54)  1206    117        0 ( 551/ 220- 612/ 328)  21.0 E75-E49 S39-S29
  
Download Binary data for this image

» All Filament Data of 20130823 ...
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