logo kso logo uni graz

20130620 - Filament data for 14 UTC
Available data for 20130620: »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  421 1575 (N31E57 L=179)  1457    137        3 ( 361/1518- 478/1615)  -5.7 E69-E49 N27-N33
      2 1701 1438 (N34W52 L=288)  1226    166        2 (1662/1362-1729/1512)  63.4 W48-W55 N28-N38
      3  461 1220 (N09E39 L=197)   252     64        0 ( 428/1208- 497/1232)  21.8 E41-E36 N07-N09
      4  626  811 (S15E24 L=212)   650    240        0 ( 531/ 759- 739/ 847) -15.9 E30-E16 S17-S13
      5 1683  766 (S09W48 L=284)   687    119        0 (1642/ 730-1704/ 826)  71.6 W45-W50 S11-S05
      6 1398  514 (S28W32 L=268)   283     44        0 (1368/ 495-1425/ 530)  45.0 W30-W34 S29-S26
      7  411  438 (S44E53 L=183)   726     62        1 ( 389/ 404- 439/ 468)  28.6 E59-E47 S47-S41
  
Download Binary data for this image

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