Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1 1003 1679 (N49W13 L=182)  2074    415        2 ( 825/1639-1182/1709) -19.7 E03-W27 N42-N53
      2 1534 1646 (N34W56 L=225)  2161    255        3 (1429/1607-1658/1676) -16.9 W45-W69 N29-N36
      3  868 1537 (N41E02 L=167)   330     60        0 ( 831/1523- 908/1550) -21.8 E04-W01 N39-N42
      4 1061 1513 (N36W12 L=181)   295     83        0 (1022/1495-1102/1527)   0.0 W08-W14 N34-N36
      5 1694 1431 (N18W57 L=226)   851    127        2 (1654/1383-1739/1487) -81.9 W54-W60 N14-N21
      6 1061 1309 (N23W07 L=176)   282    100        0 (1016/1292-1116/1326)  -9.5 W04-W10 N21-N24
      7  882 1303 (N25E05 L=164)   305    100        1 ( 833/1288- 933/1316) -18.4 E07-E01 N24-N26
      8 1294 1271 (N17W21 L=190)   522    216        1 (1192/1226-1362/1302) -26.6 W14-W24 N12-N19
      9  265 1107 (N20E54 L=115)   559     76        1 ( 247/1064- 302/1148) -80.5 E56-E50 N17-N23
     10  911 1071 (N11E06 L=163)   292    101        0 ( 873/1045- 957/1108) -45.0 E08-E03 N08-N13
     11 1793 1009 (S09W53 L=222)  1449    233        6 (1749/ 904-1822/1105) -81.3 W49-W56 S15-S02
     12  343 1076 (N18E46 L=122)   665    110        3 ( 289/1051- 398/1103) -11.3 E51-E41 N16-N19
     13 1690 1006 (S07W43 L=212)   377     89        2 (1651/ 956-1716/1037)  31.0 W39-W45 S08-S04
     14 1481 1002 (S03W28 L=197)   243     79        1 (1447/ 982-1521/1022) -31.0 W25-W30 S04-N00
     15  967  911 (N01E05 L=164)   316    153        1 ( 891/ 901-1037/ 922)  -6.3 E09-W00 N00-N01
     16 1268  851 (S08W12 L=181)   224     45        1 (1245/ 831-1296/ 867)   0.0 W10-W13 S08-S06
     17 1789  765 (S24W52 L=221)  1540    152        2 (1736/ 703-1838/ 829)  33.7 W46-W58 S27-S21
     18 1045  757 (S10E03 L=166)   861    161        4 (1004/ 706-1114/ 826) -56.3 E05-W01 S12-S05
     19 1242  803 (S10W10 L=179)   192     35        1 (1220/ 782-1260/ 820)   0.0 W08-W10 S11-S09
     20  406  628 (S10E49 L=120)  2210    431        9 ( 306/ 464- 470/ 753)  76.0 E56-E42 S21-S01
     21  292  590 (S12E63 L=106)  5254    401        9 ( 182/ 407- 384/ 745) -82.6 E72-E56 S25-S01
     22 1124  642 (S18W00 L=169)   525    237        1 (1029/ 584-1186/ 705)  26.6 E06-W04 S20-S15
     23 1275  523 (S29W08 L=177)   587    101        0 (1235/ 485-1318/ 556)  33.7 W05-W11 S31-S27
     24  881  217 (S47E32 L=136)  1465    201        1 ( 817/ 150- 948/ 276)  21.8 E47-E22 S54-S42
  

    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