Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1  766 1707 (N31E33 L=133)   408     39        0 ( 741/1683- 788/1730) -18.4 E36-E30 N29-N33
      2  411 1653 (N23E61 L=105)  1971    170        5 ( 353/1578- 481/1721) -57.5 E71-E51 N17-N28
      3  915 1593 (N26E18 L=148)   405     94        1 ( 893/1553- 943/1634) -80.5 E19-E16 N23-N29
      4  440 1566 (N17E52 L=115)  1105    182        3 ( 368/1527- 513/1596)  24.4 E58-E45 N13-N19
      5 1808 1297 (N27W52 L=218)  1898    154        8 (1762/1229-1868/1354) -29.1 W46-W60 N23-N31
      6  252 1296 (S02E59 L=107)   957     79        2 ( 221/1257- 287/1337) -31.0 E63-E54 S03-N00
      7 1538 1233 (N16W28 L=194)   707    191        1 (1512/1136-1577/1316)  85.2 W26-W29 N09-N21
      8 1797 1198 (N20W50 L=216)   633     78        1 (1777/1149-1813/1238) -90.0 W47-W51 N17-N22
      9 1614 1125 (N11W35 L=201)   420     94        1 (1592/1066-1628/1172) -71.6 W32-W36 N07-N13
     10  451 1088 (S12E37 L=129)   399     81        2 ( 425/1059- 481/1120)  45.0 E39-E35 S13-S09
     11  325 1098 (S13E48 L=119)   296     82        0 ( 297/1071- 358/1117)  21.8 E50-E44 S14-S11
     12  721  960 (S15E17 L=149)   282     75        0 ( 686/ 928- 744/ 994)  63.4 E18-E15 S17-S13
     13  421  958 (S20E38 L=128)   380     80        2 ( 391/ 929- 449/ 988)  63.4 E40-E35 S21-S17
     14  193  901 (S26E61 L=105)   473     84        0 ( 154/ 869- 226/ 923) -11.3 E67-E57 S27-S24
     15  175  729 (S36E70 L= 96)   767     76        0 ( 150/ 707- 216/ 755)  -4.8 E76-E62 S37-S34
     16  835  697 (S29E06 L=160)  1121    338        2 ( 678/ 649- 988/ 742)   5.4 E16-W05 S31-S27
     17 1464  650 (S19W36 L=202)   395    144        0 (1416/ 603-1492/ 706)  81.9 W33-W37 S22-S15
     18 1717  578 (S17W60 L=226)  1237    229        0 (1630/ 510-1792/ 665)  59.7 W55-W64 S22-S10
     19  373  588 (S44E46 L=120)   949    133        1 ( 310/ 559- 441/ 631)  12.5 E55-E37 S46-S40
     20  963  563 (S35W06 L=172)   236     69        0 ( 937/ 530- 992/ 588)  53.1 W04-W07 S37-S33
     21 1549  477 (S27W51 L=217)   398     57        0 (1514/ 461-1582/ 494)   9.5 W47-W53 S27-S25
     22  628  434 (S52E20 L=146)   292     47        1 ( 598/ 417- 649/ 453)   0.0 E23-E17 S53-S49
     23  527  410 (S56E33 L=133)   757     73        1 ( 499/ 384- 564/ 449) -45.0 E38-E28 S58-S52
     24 1591  312 (S35W73 L=239)   729     78        0 (1560/ 296-1635/ 330)   8.7 W66-W79 S36-S32
     25  509  282 (S69E52 L=114)   724    104        0 ( 462/ 271- 571/ 298)   0.0 E68-E36 S69-S67
  

    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