Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1 1380 1541 (N23W38 L=234)   304    105        0 (1355/1500-1418/1570)  21.8 W34-W41 N20-N24
      2 1476 1523 (N19W43 L=239)   322     77        0 (1433/1508-1519/1538) -38.7 W40-W45 N17-N21
      3 1561 1440 (N12W45 L=241)   604    129        0 (1508/1410-1619/1480)   0.0 W39-W51 N11-N13
      4 1817 1452 (N05W70 L=266)   667     62        1 (1785/1430-1846/1471) -11.3 W65-W75 N03-N06
      5 1770 1392 (N04W60 L=256)   419     62        1 (1749/1359-1788/1428)  31.0 W57-W63 N02-N05
      6  953 1355 (N25W05 L=201)   414    176        3 ( 886/1333-1037/1402) -41.2 W01-W09 N21-N28
      7 1349 1238 (N08W24 L=220)   878    143        4 (1306/1184-1417/1296)   0.0 W19-W28 N05-N11
      8 1864 1180 (S10W61 L=257)  1122    132        2 (1832/1133-1898/1249) -74.1 W58-W66 S13-S06
      9  775 1176 (N19E10 L=186)   229     32        0 ( 759/1151- 791/1200)  45.0 E11-E09 N17-N20
     10  586 1100 (N19E24 L=172)   636    263        2 ( 517/1005- 691/1162)  19.7 E30-E16 N15-N21
     11  344 1066 (N23E43 L=153)   437    114        1 ( 302/1013- 385/1115) -54.5 E46-E39 N19-N26
     12 1639 1041 (S11W37 L=233)   306     54        2 (1617/1015-1660/1070)  45.0 W35-W38 S12-S09
     13 1610  805 (S23W30 L=226)  2889    660        4 (1438/ 544-1716/1047)  37.2 W13-W42 S35-S12
     14  198  936 (N18E60 L=136)  1396    183        5 ( 168/ 869- 227/1015)  58.0 E64-E56 N14-N22
     15  983  899 (S01E05 L=191)   891    262        4 ( 914/ 768-1025/ 993)  81.3 E07-E03 S09-N04
     16 1168  891 (S06W05 L=201)   432    149        1 (1120/ 857-1231/ 947) -60.3 W02-W07 S09-S02
     17 1265  921 (S07W11 L=207)   218     51        1 (1244/ 900-1287/ 942) -71.6 W09-W12 S08-S05
     18 1398  869 (S14W17 L=213)   590    165        1 (1336/ 819-1435/ 926)  14.0 W12-W20 S16-S11
     19  270  855 (N12E54 L=142)   702     89        4 ( 218/ 829- 319/ 882)  -5.2 E59-E48 N10-N14
     20  861  752 (S06E16 L=180)   404    145        0 ( 840/ 693- 893/ 824)  69.4 E17-E13 S10-S02
     21 1153  747 (S14W00 L=196)   616    170        4 (1108/ 682-1217/ 786)  14.0 E04-W04 S16-S11
     22 1319  742 (S19W09 L=205)   193     38        1 (1296/ 718-1336/ 760) -71.6 W08-W10 S20-S17
     23 1229  725 (S17W04 L=200)   265     87        1 (1191/ 702-1249/ 759)  14.0 W01-W05 S18-S15
     24  427  550 (S08E51 L=145)  4871    494       12 ( 337/ 368- 496/ 727)  42.4 E75-E44 S18-N03
     25 1205  668 (S20W01 L=197)   207     32        0 (1183/ 650-1224/ 689)  26.6 W00-W02 S20-S18
     26 1040  641 (S17E09 L=187)   267     71        1 (1022/ 608-1057/ 684)  45.0 E10-E06 S19-S14
     27  863  523 (S20E23 L=173)   395    121        2 ( 814/ 500- 914/ 555)  -8.1 E25-E18 S21-S17
     28  679  369 (S25E42 L=154)  2679    467        3 ( 501/ 249- 878/ 456)   5.1 E70-E25 S29-S22
  

    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