logo kso logo uni graz

20130620 - Filament data for 08 UTC
Available data for 20130620: »06 UTC   »07 UTC   »08 UTC   »09 UTC   »10 UTC   »11 UTC   »12 UTC   »13 UTC   »14 UTC   »15 UTC   »16 UTC  
Click on image to open sensitive map!
 
  Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1  405 1569 (N30E58 L=181)   972    104        1 ( 355/1534- 454/1604)  -3.4 E69-E52 N27-N31
      2 1669 1464 (N35W49 L=289)   665     79        1 (1634/1426-1697/1493) -68.2 W45-W52 N32-N37
      3  427 1227 (N09E42 L=197)   407    126        0 ( 374/1208- 496/1239)  11.3 E46-E36 N06-N09
      4 1636  805 (S07W43 L=282)   968    203        1 (1604/ 732-1658/ 899) -63.4 W39-W45 S11-S01
      5  541  833 (S14E30 L=209)   603    205        0 ( 458/ 790- 637/ 861)  -8.7 E36-E23 S16-S12
      6 1156  586 (S25W13 L=252)   266    106        0 (1106/ 572-1200/ 605)  -9.5 W09-W15 S25-S23
      7 1364  525 (S27W29 L=268)   302     45        0 (1334/ 512-1396/ 539)  14.0 W26-W31 S28-S26
      8  385  468 (S42E54 L=185)   689     61        1 ( 368/ 430- 408/ 503)  40.6 E60-E48 S45-S39
  
Download Binary data for this image

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