logo kso logo uni graz

20130515 - Filament data for 14 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  867 1553 (N25E23 L=329)   634    157        1 ( 807/1506- 916/1578)  -6.3 E27-E18 N23-N27
      2  369 1529 (N13E60 L=292)   662    107        1 ( 348/1472- 388/1576) -54.5 E63-E57 N09-N16
      3  458 1450 (N10E48 L=305)   334     64        0 ( 442/1420- 472/1493) -63.4 E49-E46 N08-N12
      4 1486 1400 (N31W22 L= 14)   594    210        2 (1449/1303-1525/1479) -55.0 W17-W25 N25-N35
      5  809 1270 (N07E18 L=334)   661    214        0 ( 755/1227- 883/1349) -26.6 E23-E13 N04-N10
      6 1209  648 (S20W20 L= 13)   477    150        1 (1145/ 615-1279/ 684)  40.6 W17-W24 S23-S17
      7 1438  327 (S34W55 L= 47)   571     71        1 (1415/ 300-1463/ 369) -16.7 W50-W60 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