logo kso logo uni graz

20130818 - Filament data for 09 UTC
Available data for 20130818: »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 1202 1320 (N21W17 L=195)   424    157        0 (1129/1298-1275/1340) -29.1 W12-W21 N18-N23
      2 1827  875 (S20W56 L=234)   801    164        0 (1798/ 801-1855/ 945)  58.0 W52-W59 S24-S16
      3 1679  888 (S15W40 L=218)   331     86        0 (1642/ 856-1704/ 928)  31.0 W37-W42 S16-S12
      4 1715  858 (S18W43 L=221)   315     42        0 (1698/ 833-1736/ 880)  14.0 W41-W45 S18-S16
      5 1544  591 (S31W28 L=206)  1603    286        1 (1483/ 484-1635/ 706)  45.0 W22-W35 S38-S24
      6 1042  642 (S17E06 L=172)   652    268        0 ( 980/ 603-1127/ 701) -12.5 E09-W00 S18-S12
      7 1780  656 (S34W52 L=230)   669    104        1 (1749/ 631-1817/ 685)   7.1 W48-W57 S35-S30
      8  529  516 (S17E44 L=134)  1548    350        2 ( 367/ 485- 685/ 542)  -8.4 E58-E31 S18-S14
      9  993  368 (S35E17 L=161)  3407    498        8 ( 838/ 208-1149/ 538)  29.1 E37-E01 S46-S24
  
Download Binary data for this image

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