logo kso logo uni graz

20130413 - Filament data for 13 UTC
Available data for 20130413: »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  749 1654 (N23E37 L= 19)   615    166        1 ( 680/1630- 830/1682)  15.3 E42-E31 N21-N24
      2 1402 1594 (N40W07 L= 63)   375     76        1 (1375/1569-1437/1622) -21.8 W04-W09 N38-N42
      3 1604 1372 (N32W27 L= 83)   350    140        0 (1558/1315-1636/1408) -20.6 W22-W30 N29-N33
      4  468 1081 (S17E35 L= 21)   534    217        2 ( 385/1033- 544/1157)  54.0 E40-E31 S21-S10
      5 1388 1100 (N09W18 L= 74)   222     57        1 (1366/1078-1416/1122)  45.0 W16-W19 N06-N09
      6 1789 1008 (N17W50 L=106)   472     96        3 (1766/ 955-1811/1042) -26.6 W47-W53 N14-N19
      7 1554  673 (S09W43 L= 98)   266     52        2 (1531/ 646-1579/ 699) -33.7 W40-W44 S10-S07
      8 1415  345 (S31W54 L=110)   422     76        0 (1394/ 326-1447/ 375)  -7.1 W49-W57 S31-S29
  
Download Binary data for this image

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