logo kso logo uni graz

20130424 - Filament data for 14 UTC
Available data for 20130424: »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  767 1835 (N38E52 L=218)  1257    145        1 ( 697/1808- 842/1855)   3.2 E61-E43 N36-N39
      2  511 1662 (N20E56 L=214)   684     98        0 ( 461/1636- 550/1693)  51.3 E59-E53 N17-N22
      3  811 1630 (N25E32 L=238)   360     77        0 ( 789/1599- 838/1663) -23.2 E35-E28 N23-N26
      4 1179 1425 (N22E02 L=268)   568    194        0 (1125/1389-1261/1477)  14.0 E06-W02 N20-N25
      5  883 1151 (S01E11 L=259)   242     75        1 ( 840/1126- 918/1169)   0.0 E13-E08 S02-N00
      6 1767  934 (N12W50 L=320)   481    113        0 (1736/ 882-1794/ 983)  81.9 W48-W52 N07-N14
      7  603  634 (S39E17 L=253)   478    105        1 ( 573/ 580- 637/ 682) -45.0 E19-E13 S41-S36
  
Download Binary data for this image

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