logo kso logo uni graz

20130620 - Filament data for 12 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  413 1582 (N31E59 L=178)  1218    125        4 ( 369/1545- 470/1623)  -9.0 E69-E50 N28-N33
      2 1691 1435 (N33W51 L=288)  1092    136        2 (1653/1361-1715/1499)  71.6 W47-W54 N28-N37
      3  443 1222 (N09E41 L=196)   255    102        0 ( 404/1205- 496/1233)  15.9 E43-E36 N07-N09
      4  287  868 (S15E52 L=185)   537    103        1 ( 260/ 824- 308/ 918)  50.2 E55-E49 S17-S11
      5 1665  799 (S07W46 L=283)   974    211        2 (1622/ 731-1691/ 898) -78.7 W42-W48 S11-S01
      6  596  821 (S15E26 L=211)   612    195        0 ( 512/ 775- 681/ 852)  -9.5 E32-E20 S16-S13
      7 1183  581 (S25W15 L=252)   216    103        0 (1140/ 568-1232/ 601)   0.0 W11-W18 S25-S23
      8 1387  516 (S28W31 L=268)   322     50        0 (1355/ 498-1416/ 533)  26.6 W29-W33 S29-S26
      9  403  448 (S44E53 L=184)   899     90        2 ( 384/ 402- 431/ 491)  32.7 E62-E47 S48-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