logo kso logo uni graz

20130701 - Filament data for 13 UTC
Available data for 20130701: »05 UTC   »06 UTC   »07 UTC   »08 UTC   »09 UTC   »10 UTC   »11 UTC   »12 UTC   »13 UTC   »14 UTC  
Click on image to open sensitive map!
 
  Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1  400 1510 (N31E54 L= 37)   507     79        1 ( 362/1489- 442/1526)  -5.2 E59-E48 N29-N31
      2  731 1378 (N24E21 L= 70)   560    178        2 ( 646/1347- 816/1407)  -4.8 E27-E15 N22-N25
      3  875 1250 (N16E10 L= 81)   267    128        0 ( 807/1232- 930/1264)  -7.1 E14-E06 N15-N17
      4 1320 1197 (N14W18 L=109)   265     81        1 (1282/1175-1360/1218)  -9.5 W15-W21 N12-N15
      5  241  779 (S16E59 L= 31)   389     61        0 ( 229/ 747- 262/ 805)  45.0 E61-E56 S18-S14
      6 1507  699 (S16W34 L=125)   240     87        1 (1484/ 663-1531/ 731)  53.1 W32-W35 S18-S14
      7  925  464 (S34E05 L= 85)  1078    290        4 ( 876/ 354- 996/ 580) -70.6 E08-W00 S43-S25
  
Download Binary data for this image

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