Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1 1595 1684 (N24W64 L=217)  1033    128        4 (1532/1661-1658/1704) -14.9 W58-W73 N22-N26
      2 1454 1603 (N25W46 L=199)   462    103        0 (1402/1581-1503/1622) -45.0 W43-W48 N22-N27
      3 1339 1457 (N20W31 L=184)   749    221        1 (1242/1410-1424/1500)  -4.1 W23-W37 N17-N21
      4 1162 1350 (N19W16 L=169)   414    118        1 (1134/1289-1194/1405)  35.5 W13-W20 N15-N20
      5 1616 1239 (N01W41 L=193)   837    154        1 (1563/1170-1655/1305) -77.5 W38-W42 S04-N05
      6 1747 1253 (S02W51 L=204)   355     56        1 (1723/1225-1771/1282) -63.4 W49-W53 S04-N00
      7  341 1228 (N32E42 L=111)   296     52        1 ( 311/1212- 371/1249) -26.6 E44-E38 N30-N33
      8 1769 1151 (S09W50 L=203)  1073    226        3 (1703/1101-1848/1234) -55.0 W45-W57 S12-S02
      9  415 1099 (N23E36 L=116)   686    184        1 ( 348/1024- 450/1162) -63.4 E41-E33 N17-N27
     10 1734 1086 (S11W45 L=198)   315     63        0 (1711/1069-1766/1114) -21.8 W43-W48 S12-S09
     11 1857 1036 (S18W57 L=209)  1063    188        3 (1827/ 953-1887/1101)  49.4 W52-W61 S21-S13
     12  253  990 (N20E52 L=100)  1223    233        0 ( 217/ 903- 331/1077) -56.3 E55-E46 N13-N25
     13 1737 1019 (S15W44 L=197)   787    168        3 (1685/ 959-1787/1057) -40.6 W39-W48 S18-S12
     14  155  979 (N21E65 L= 88)  1051    133        2 ( 119/ 913- 190/1030) -41.6 E70-E60 N16-N24
     15 1618  915 (S17W33 L=185)   954    282        3 (1570/ 812-1656/1030)  63.4 W28-W37 S23-S11
     16 1051  915 (S02E01 L=152)  1144    291        3 ( 950/ 804-1115/1008) -77.9 E04-W01 S09-N05
     17 1562  947 (S14W29 L=182)   328     83        1 (1547/ 890-1579/ 989)  59.0 W27-W31 S16-S11
     18 1753  940 (S20W44 L=197)   344     64        2 (1732/ 902-1777/ 973)  78.7 W41-W46 S22-S17
     19  481  919 (N11E35 L=118)   286     91        1 ( 444/ 893- 512/ 949)  11.3 E37-E32 N09-N12
     20 1694  873 (S22W38 L=191)   391     66        0 (1664/ 843-1723/ 904) -76.0 W35-W40 S24-S20
     21 1841  702 (S38W55 L=207)  1181    188        1 (1781/ 649-1888/ 771)  17.1 W46-W61 S41-S34
     22 1029  694 (S14E08 L=145)   260    108        0 (1005/ 649-1049/ 744)  45.0 E10-E05 S16-S11
     23  336  561 (S06E59 L= 94)  3310    472        7 ( 197/ 420- 521/ 717) -56.9 E67-E49 S18-N05
     24 1528  688 (S28W22 L=175)   241     60        0 (1495/ 675-1564/ 705) -36.9 W20-W25 S29-S26
     25 1253  603 (S25W02 L=155)  1445    390        1 (1092/ 527-1423/ 695)   2.4 E09-W15 S27-S23
     26  493  561 (S09E45 L=108)  1026    252        1 ( 433/ 462- 570/ 656) -90.0 E47-E42 S16-S02
     27  376  605 (S04E53 L=100)   415     82        1 ( 347/ 568- 400/ 640) -63.4 E54-E51 S06-S02
     28  834  545 (S18E24 L=129)  1298    294        3 ( 721/ 453- 959/ 608)   8.5 E34-E14 S21-S15
     29  940  425 (S28E22 L=131)   375    105        0 ( 891/ 395- 988/ 456)   7.1 E26-E18 S29-S26
     30  654  378 (S24E43 L=110)   316     82        1 ( 639/ 327- 671/ 413)  50.2 E46-E41 S27-S21
  

    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