logo kso logo uni graz

20130515 - Filament data for 07 UTC
Available data for 20130515: »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  353 1556 (N14E64 L=292)   710    108        0 ( 332/1502- 380/1603) -66.8 E67-E61 N10-N17
      2  823 1574 (N26E27 L=329)   600    117        0 ( 765/1541- 868/1595)   0.0 E31-E23 N23-N27
      3 1697 1492 (N45W43 L= 40)   377     46        0 (1667/1475-1724/1504)  14.0 W39-W47 N43-N45
      4 1437 1427 (N32W17 L= 13)   327    138        0 (1411/1354-1464/1480) -49.4 W14-W20 N27-N34
      5  791 1277 (N07E19 L=337)   314     74        0 ( 754/1257- 816/1310)  45.0 E21-E17 N05-N09
      6 1158  669 (S20W17 L= 13)   599    174        1 (1073/ 629-1228/ 708)  45.0 W12-W20 S24-S16
      7 1398  341 (S34W50 L= 46)   944    130        1 (1349/ 308-1452/ 387)  -4.1 W43-W57 S35-S31
  
Download Binary data for this image

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