Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1 1642 1687 (N27W64 L=303)   808     94        1 (1616/1653-1665/1713)  53.1 W61-W66 N24-N28
      2 1626 1515 (N17W52 L=291)  1169    198        2 (1566/1472-1692/1552)  -9.5 W46-W58 N15-N19
      3 1791 1469 (N11W67 L=306)  1314    361        0 (1734/1437-1840/1516)   2.9 W59-W79 N09-N12
      4 1178 1423 (N22W18 L=257)   982    259        0 (1053/1387-1317/1472) -31.0 W11-W26 N18-N27
      5 1764 1341 (N04W57 L=296)   336    109        0 (1733/1315-1791/1362)   8.1 W53-W60 N03-N05
      6  190 1259 (N33E57 L=181)   443     47        1 ( 171/1239- 207/1279)  33.7 E58-E55 N31-N33
      7  605 1216 (N22E22 L=217)  1803    461        6 ( 440/1170- 806/1250) -13.5 E33-E08 N17-N24
      8  924 1204 (N14E02 L=236)   277     79        0 ( 886/1183- 968/1230) -33.7 E04-W00 N13-N16
      9 1909 1121 (S11W66 L=305)  1805    272        7 (1879/1071-1943/1195)  21.0 W61-W75 S14-S08
     10  229  979 (N15E55 L=183)  1303    266        1 ( 169/ 859- 274/1089) -71.6 E59-E52 N07-N22
     11  991 1063 (N05E01 L=237)   215     50        1 ( 973/1035-1024/1086)   0.0 E02-W00 N03-N06
     12  674 1041 (N10E20 L=218)   235     62        1 ( 637/1011- 712/1064) -45.0 E22-E18 N07-N11
     13 1882  862 (S26W58 L=297)  3335    277        4 (1820/ 773-1927/ 968)  54.0 W51-W64 S31-S19
     14 1261  897 (S10W11 L=249)   707    293        3 (1138/ 815-1370/ 950)   3.6 W02-W18 S12-S07
     15 1351  819 (S16W15 L=254)   821    241        2 (1231/ 756-1419/ 902)  19.7 W06-W20 S18-S12
     16  985  742 (S13E08 L=230)   198     40        0 ( 965/ 714-1000/ 770) -90.0 E08-E07 S14-S11
     17  310  568 (S11E61 L=178)   706    163        1 ( 283/ 540- 348/ 601) -31.0 E63-E57 S12-S08
     18  262  522 (S13E70 L=168)  2540    199        3 ( 227/ 479- 298/ 558) -78.7 E75-E64 S15-S10
     19 1661  516 (S45W38 L=276)   731    119        1 (1626/ 490-1694/ 547)   9.5 W34-W40 S47-S41
     20 1486  402 (S49W21 L=259)  1372    190        3 (1426/ 362-1539/ 472)  45.0 W15-W27 S53-S42
     21  739  352 (S33E37 L=202)  1397    282        3 ( 672/ 277- 785/ 432)  26.6 E46-E30 S36-S27
  

    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