Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1 1153 1726 (N51W24 L=  6)   325     81        1 (1109/1714-1194/1739)  -6.3 W19-W28 N49-N51
      2  394 1568 (N46E56 L=287)   543     76        0 ( 363/1537- 416/1590) -21.8 E63-E51 N43-N48
      3 1451 1445 (N26W36 L= 18)   262    100        0 (1407/1426-1497/1463) -26.6 W32-W38 N24-N27
      4  688 1377 (N31E20 L=322)  1294    372        4 ( 553/1246- 816/1449) -38.3 E31-E11 N21-N36
      5 1344 1282 (N17W24 L=  6)   273     96        0 (1321/1232-1366/1326) -90.0 W22-W24 N14-N20
      6  744 1175 (N17E16 L=326)   241     95        0 ( 715/1142- 788/1206)  31.0 E18-E13 N15-N18
      7 1678 1144 (N05W45 L= 28)   808    173        1 (1618/1093-1746/1197)  17.1 W39-W52 N02-N06
      8 1845  993 (S07W60 L= 42)  1108    255        1 (1797/ 878-1868/1094)  56.3 W54-W63 S13-S01
      9  879  879 (S02E10 L=332)   215     87        0 ( 833/ 845- 909/ 911) -45.0 E12-E08 S04-N00
     10 1507  741 (S18W29 L= 11)   316    104        1 (1495/ 684-1520/ 794) -90.0 W27-W29 S21-S14
     11  356  767 (S05E49 L=294)   330     60        1 ( 328/ 745- 381/ 787) -33.7 E50-E46 S06-S03
     12  749  722 (S10E20 L=322)   497     87        2 ( 715/ 676- 775/ 768)  63.4 E23-E18 S13-S07
     13  300  587 (S17E61 L=281)  2261    302        4 ( 267/ 455- 341/ 688)  58.0 E69-E53 S26-S10
     14 1109  667 (S17W02 L=344)   264    107        0 (1055/ 648-1152/ 687)  21.8 E01-W04 S18-S16
     15 1837  663 (S29W66 L= 48)   664     42        1 (1811/ 644-1862/ 683)  -9.5 W60-W72 S31-S27
     16 1197  589 (S24W07 L=349)   607    160        0 (1161/ 526-1250/ 656)  48.8 W03-W10 S27-S19
     17 1517  545 (S32W31 L= 13)  1183    186        2 (1436/ 494-1577/ 601)  20.0 W24-W35 S34-S28
     18 1613  499 (S37W41 L= 24)  1341    273        2 (1497/ 459-1717/ 569)  10.8 W30-W52 S39-S33
     19  412  481 (S25E54 L=288)   467     66        0 ( 399/ 443- 430/ 511)  35.5 E58-E51 S27-S22
     20 1225  322 (S45W07 L=350)  1883    248        4 (1150/ 249-1318/ 409)  40.6 W00-W15 S51-S38
     21  626  291 (S41E46 L=296)   900     94        0 ( 596/ 251- 662/ 331)  23.6 E55-E39 S44-S37
  

    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