logo kso logo uni graz

20130515 - Filament data for 09 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  359 1551 (N14E63 L=292)   787    120        1 ( 338/1491- 386/1601) -60.3 E66-E60 N10-N17
      2  835 1567 (N25E26 L=329)   552    127        0 ( 773/1534- 882/1586)   0.0 E30-E21 N23-N27
      3 1450 1422 (N31W18 L= 13)   276    127        0 (1426/1361-1474/1476) -50.2 W15-W21 N28-N34
      4  801 1271 (N07E19 L=336)   383    115        1 ( 757/1248- 831/1306)  11.3 E21-E16 N05-N09
      5 1147  654 (S21W17 L= 12)   218     52        0 (1120/ 636-1177/ 669)  45.0 W15-W18 S22-S19
      6 1419  329 (S34W53 L= 48)   556     52        0 (1395/ 307-1449/ 362) -14.0 W49-W57 S35-S32
  
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