Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1  932 1847 (N45E33 L= 41)   393     37        0 ( 915/1824- 948/1871) -45.0 E35-E29 N43-N47
      2 1148 1617 (N32E06 L= 68)  1103    199        1 (1087/1542-1208/1701) -33.7 E12-W00 N27-N37
      3  581 1634 (N22E44 L= 30)   353     79        1 ( 543/1613- 605/1659)  36.9 E47-E42 N20-N23
      4  676 1603 (N21E36 L= 38)   470     77        1 ( 643/1563- 710/1638) -29.7 E38-E31 N18-N23
      5 1487 1539 (N35W20 L= 94)  1175    199        2 (1440/1449-1530/1628) -63.4 W15-W23 N29-N41
      6  300 1286 (S04E54 L= 20)   664    115        1 ( 271/1234- 340/1339)  66.8 E56-E51 S07-N00
      7 1691 1231 (N20W39 L=113)   940    165        1 (1626/1180-1745/1271) -10.3 W32-W43 N18-N22
      8 1516 1048 (N05W29 L=103)  1081    313        2 (1487/ 919-1547/1203) -76.0 W26-W32 S02-N14
      9 1766 1167 (N19W46 L=120)   526     71        1 (1743/1134-1794/1196)  76.0 W44-W48 N16-N20
     10  175 1012 (S21E64 L= 11)  2235    353        4 ( 117/ 868- 229/1165)  51.7 E74-E57 S30-S11
     11 1736 1101 (N14W44 L=118)   273     22        0 (1714/1081-1752/1120)   0.0 W42-W45 N12-N15
     12 1656 1038 (N08W39 L=113)   283     69        0 (1633/1007-1685/1064) -11.3 W36-W41 N07-N09
     13  302  682 (S41E52 L= 23)   643    146        0 ( 259/ 623- 359/ 723)  22.4 E60-E43 S45-S37
     14 1569  644 (S16W44 L=118)   591    182        0 (1537/ 579-1633/ 715) -83.7 W42-W47 S19-S10
     15 1746  648 (S11W59 L=133)   358     75        0 (1714/ 620-1775/ 676)  53.1 W56-W60 S12-S08
     16 1688  635 (S13W54 L=128)   353     41        1 (1666/ 614-1708/ 662)  90.0 W52-W56 S14-S11
     17 1774  604 (S12W65 L=139)  1473    124        2 (1728/ 566-1832/ 635)  33.7 W59-W71 S15-S08
     18 1314  583 (S26W29 L=103)   488    138        1 (1257/ 530-1361/ 631) -16.7 W24-W34 S27-S23
     19 1705  453 (S22W70 L=144)  2012    137        5 (1640/ 412-1766/ 497)  23.2 W62-W80 S24-S17
     20 1230  454 (S36W30 L=104)   279     76        0 (1194/ 441-1277/ 467)  26.6 W26-W32 S36-S33
     21 1468  357 (S35W55 L=129)   622     91        0 (1425/ 339-1516/ 375)  23.2 W50-W57 S36-S32
     22 1280  292 (S44W45 L=119)   502     81        1 (1247/ 274-1312/ 323)  -6.3 W40-W49 S45-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