logo kso logo uni graz

20130821 - Filament data for 11 UTC
Available data for 20130821: »05 UTC   »06 UTC   »07 UTC   »08 UTC   »09 UTC   »10 UTC   »11 UTC   »12 UTC   »13 UTC   »14 UTC   »15 UTC  
Click on image to open sensitive map!
 
  Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1 1644 1516 (N21W58 L=195)   378     80        0 (1604/1501-1682/1535) -23.2 W54-W61 N19-N22
      2 1861 1204 (S02W66 L=203)  1875    301        2 (1818/1062-1903/1349)  76.8 W63-W72 S11-N06
      3 1802  890 (S19W52 L=189)   837    200        1 (1762/ 818-1828/ 999)  59.0 W47-W55 S22-S12
      4 1625  824 (S18W35 L=172)   553    168        0 (1576/ 793-1679/ 859)   0.0 W31-W39 S19-S14
      5  887  607 (S16E17 L=121)   638    236        1 ( 843/ 524- 973/ 652)  31.0 E20-E10 S20-S13
      6 1417  447 (S39W16 L=153)   456     56        1 (1385/ 422-1447/ 472)  21.8 W13-W18 S41-S37
  
Download Binary data for this image

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