logo kso logo uni graz

20130812 - Filament data for 10 UTC
Available data for 20130812: »04 UTC   »05 UTC   »06 UTC   »07 UTC   »08 UTC   »09 UTC   »10 UTC   »11 UTC   »12 UTC   »13 UTC   »14 UTC   »15 UTC   »16 UTC   »17 UTC  
Click on image to open sensitive map!
 
  Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1  882 1582 (N44W00 L=257)   240     72        0 ( 860/1553- 910/1610)  45.0 E01-W03 N42-N46
      2 1768 1322 (N09W59 L=316)   363     75        1 (1741/1295-1796/1352) -53.1 W57-W61 N07-N11
      3  206 1076 (N19E62 L=195)  1007    175        0 ( 160/1048- 271/1112)   3.8 E69-E53 N17-N21
      4 1206  901 (S04W09 L=266)   332     78        1 (1156/ 883-1252/ 914) -18.4 W05-W11 S05-S02
      5 1585  823 (S16W33 L=290)   298    123        0 (1573/ 763-1596/ 879)  74.1 W32-W34 S19-S12
      6 1331  517 (S31W12 L=269)  2933    564        4 (1108/ 380-1512/ 701)  23.6 E06-W26 S37-S21
      7  768  398 (S30E30 L=227)   556    161        0 ( 753/ 341- 798/ 477)  70.0 E32-E26 S34-S23
      8  548  354 (S30E51 L=205)   801    163        0 ( 525/ 294- 595/ 419)  30.5 E59-E42 S35-S25
      9  828  266 (S42E33 L=224)   388     45        0 ( 804/ 245- 860/ 291)  14.0 E36-E28 S43-S39
  
Download Binary data for this image

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