Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1  457 1350 (N39E33 L=167)   284    104        0 ( 412/1336- 507/1361) -12.5 E37-E28 N36-N39
      2 1625 1173 (N00W40 L=240)  1318    288        1 (1564/1042-1721/1230)  17.4 W32-W48 S05-N03
      3  396 1175 (N29E39 L=161)   766    198        0 ( 302/1131- 474/1205)   3.6 E48-E32 N27-N30
      4 1871 1056 (S14W60 L=260)  1531    133        3 (1837/ 997-1913/1102)  14.0 W55-W67 S16-S11
      5  149 1042 (N24E68 L=131)  1528     89        4 (  95/1012- 190/1074)   3.2 E80-E62 N21-N25
      6 1824  971 (S17W53 L=253)  1148    129        3 (1778/ 927-1873/1022) -49.4 W47-W58 S20-S13
      7  488  989 (N16E34 L=166)   253    108        0 ( 435/ 964- 538/1009)   7.1 E38-E30 N15-N16
      8 1363  924 (S06W17 L=217)   223     88        0 (1334/ 887-1402/ 956)  18.4 W14-W20 S07-S05
      9 1830  884 (S23W53 L=252)   448     70        0 (1813/ 846-1845/ 916)  63.4 W50-W54 S25-S21
     10 1234  743 (S14W06 L=205)  1909    508        6 (1119/ 555-1386/ 915)  66.8 E05-W15 S22-S01
     11  577  808 (N04E32 L=168)   233     59        0 ( 548/ 792- 618/ 823)  11.3 E33-E28 N03-N04
     12  250  736 (N05E61 L=139)   510     88        1 ( 229/ 705- 280/ 785) -59.0 E62-E58 N02-N07
     13 1494  749 (S20W22 L=222)   344     74        2 (1461/ 724-1526/ 778)  11.3 W19-W24 S21-S19
     14  716  667 (S07E26 L=173)   280     58        0 ( 696/ 639- 735/ 698)  71.6 E27-E24 S08-S05
     15  800  670 (S08E21 L=179)   351     91        1 ( 762/ 645- 849/ 690) -31.0 E23-E18 S09-S06
     16  715  572 (S12E29 L=170)  1434    283        4 ( 645/ 514- 799/ 630)  -5.7 E34-E24 S16-S08
     17  696  480 (S18E34 L=166)  1305    296        1 ( 575/ 437- 828/ 524)  -9.0 E43-E24 S21-S14
     18  656  434 (S20E39 L=161)   277     38        0 ( 634/ 418- 681/ 453) -45.0 E40-E36 S21-S18
     19  580  340 (S25E51 L=149)  2736    341        2 ( 491/ 210- 637/ 441)  55.0 E66-E46 S36-S16
     20  873  358 (S30E28 L=172)   877    245        2 ( 785/ 287- 964/ 432)  18.4 E37-E19 S34-S26
     21  659  360 (S25E43 L=157)   299     43        2 ( 633/ 340- 683/ 384) -18.4 E45-E41 S26-S23
     22  533  307 (S27E59 L=141)  2120    157        5 ( 469/ 256- 577/ 348) -82.9 E67-E53 S31-S23
  

    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