Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1 1253 1562 (N30W19 L=168)   830    182        0 (1179/1510-1321/1615) -41.2 W14-W22 N26-N34
      2  647 1498 (N29E24 L=126)  1056    227        2 ( 566/1457- 755/1563) -28.1 E30-E15 N25-N33
      3 1657 1450 (N21W47 L=197)   476    103        1 (1620/1408-1706/1475)  21.8 W42-W52 N18-N22
      4  396 1315 (N19E41 L=108)  2092    318       10 ( 344/1196- 436/1467) -80.0 E45-E37 N11-N28
      5  456 1362 (N21E37 L=113)   847    189        1 ( 421/1274- 504/1450) -59.7 E40-E32 N15-N27
      6 1719 1335 (N14W49 L=199)   315     66        2 (1687/1315-1751/1356) -31.0 W46-W52 N12-N15
      7  271 1254 (N16E52 L= 98)   601    103        2 ( 241/1211- 313/1287)  38.7 E54-E47 N13-N17
      8 1506 1108 (N01W30 L=179)  1055    359        3 (1374/1000-1610/1157) -31.6 W21-W37 S05-N03
      9 1455  998 (S06W26 L=176)   258     80        0 (1421/ 967-1485/1025) -53.1 W24-W28 S07-S03
     10 1381  972 (S07W21 L=171)   193     24        0 (1361/ 955-1400/ 993)  45.0 W20-W22 S07-S05
     11  198  849 (S08E61 L= 89)  3307    370       10 ( 120/ 721- 280/ 977) -53.7 E69-E52 S15-N00
     12 1412  890 (S12W23 L=173)   587     87        5 (1374/ 847-1445/ 938) -90.0 W20-W25 S14-S09
     13 1186  826 (S15W09 L=158)  1035    357        3 (1074/ 722-1313/ 901)  25.0 W01-W16 S20-S10
     14 1333  838 (S15W18 L=168)   473    121        2 (1302/ 778-1360/ 893)  81.9 W16-W19 S18-S11
     15 1817  784 (S19W57 L=207)   438     78        0 (1787/ 752-1850/ 816)  33.7 W54-W60 S21-S17
     16  213  700 (S17E64 L= 86)  1651    164        4 ( 173/ 650- 263/ 741) -50.2 E69-E58 S19-S13
     17 1271  650 (S26W14 L=164)   209     80        0 (1231/ 634-1307/ 677)  21.8 W11-W16 S27-S24
     18 1391  652 (S26W23 L=172)   205     36        1 (1364/ 634-1418/ 665)  14.0 W20-W24 S27-S25
     19  520  513 (S31E41 L=109)   523     86        1 ( 472/ 493- 569/ 540)   0.0 E45-E36 S32-S28
     20 1581  511 (S37W41 L=191)   345     50        1 (1555/ 489-1610/ 532)  26.6 W38-W43 S38-S35
     21 1700  454 (S41W59 L=209)  1313    173        1 (1612/ 432-1777/ 480)   0.0 W47-W74 S42-S39
     22  418  397 (S38E58 L= 91)  1503    173        2 ( 398/ 298- 443/ 467)  23.7 E75-E50 S44-S33
  

    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

  c = WHERE(data EQ Fil_ID, area)
  f = '(2(A,I6))'
  PRINT, FORM=f, "Area of Fil_ID", Fil_ID," =", area 

  data = ROTATE(data,7)
  Solar_y = 2048-Solar_y