Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1 1310 1803 (N47W40 L=359)   666     87        2 (1284/1761-1339/1852)  36.0 W35-W47 N43-N51
      2 1471 1827 (N47W62 L= 21)   635     56        1 (1438/1809-1496/1844) -21.8 W56-W69 N44-N48
      3 1435 1585 (N29W37 L=356)   335     62        1 (1406/1556-1469/1607)   9.5 W33-W39 N27-N30
      4  946 1579 (N34W02 L=321)   681    164        0 ( 873/1550-1020/1600) -18.4 E03-W06 N31-N36
      5 1402 1529 (N26W32 L=352)   286     80        1 (1384/1485-1423/1566)  80.5 W31-W33 N22-N28
      6  327 1412 (N31E48 L=272)   717    156        0 ( 286/1349- 371/1471) -36.9 E54-E42 N26-N35
      7  553 1356 (N24E27 L=293)   245     52        1 ( 524/1330- 576/1380)  14.0 E29-E25 N22-N25
      8 1546 1329 (N12W37 L=356)   468     81        3 (1508/1297-1587/1362) -45.0 W34-W39 N09-N13
      9  426 1206 (N17E37 L=283)   466    139        0 ( 384/1154- 470/1260) -45.0 E40-E33 N13-N20
     10 1770  953 (S13W50 L=  9)  1779    347        4 (1689/ 823-1826/1076) -82.4 W42-W55 S20-S05
     11  353 1009 (N06E43 L=276)  2027    361        5 ( 207/ 950- 516/1057)  -4.4 E57-E31 N01-N08
     12  975  977 (S03E03 L=316)   193     49        0 ( 950/ 959-1003/ 994) -33.7 E04-E01 S04-S01
     13 1827  920 (S15W55 L= 15)   486     68        0 (1808/ 885-1852/ 956)  63.4 W53-W58 S17-S13
     14  774  852 (S08E17 L=303)   185     57        0 ( 757/ 820- 789/ 887)  56.3 E17-E15 S09-S06
     15 1360  668 (S26W18 L=337)  4029   1025        5 ( 909/ 554-1738/ 834)   6.8 E13-W47 S29-S19
     16  243  698 (S11E60 L=259)   499     89        1 ( 224/ 654- 264/ 745)  78.7 E62-E58 S13-S08
     17  325  658 (S14E53 L=266)   486    144        0 ( 311/ 597- 348/ 732)  77.5 E56-E51 S18-S09
     18  439  686 (S14E43 L=277)   442    126        2 ( 389/ 655- 501/ 710)  -6.3 E46-E37 S15-S12
     19  286  633 (S15E58 L=261)   416     58        3 ( 264/ 602- 304/ 663)  38.7 E62-E55 S17-S13
     20  760  586 (S24E22 L=297)   424     91        2 ( 734/ 545- 788/ 635)  51.3 E24-E19 S26-S21
     21 1736  529 (S40W55 L= 15)   633     75        0 (1699/ 504-1765/ 562)   7.1 W49-W58 S41-S37
     22 1537  462 (S42W34 L=354)   409     72        1 (1499/ 444-1580/ 481)  -7.1 W30-W38 S43-S40
     23  365  402 (S31E66 L=254)  1622    143        4 ( 318/ 367- 431/ 436) -12.1 E82-E59 S33-S28
     24  592  280 (S43E52 L=268)   392     43        0 ( 569/ 260- 620/ 298)  12.5 E56-E47 S44-S41
  

    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