Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1 1236 1378 (N18W22 L=241)   298    127        0 (1178/1367-1301/1393) -33.7 W18-W25 N16-N20
      2 1637 1360 (N06W47 L=265)   543    109        2 (1596/1322-1670/1392) -78.7 W44-W49 N03-N08
      3 1514 1244 (N04W34 L=253)   789    232        1 (1440/1172-1586/1343)  19.7 W27-W42 N01-N06
      4 1247 1292 (N13W20 L=238)   523    135        1 (1186/1254-1306/1325)  -7.1 W15-W23 N11-N14
      5  651 1206 (N24E17 L=201)   219    102        0 ( 610/1181- 693/1242) -56.3 E19-E14 N21-N27
      6 1002 1087 (N09W00 L=219)   650    150        3 ( 956/1018-1053/1133)  38.7 E02-W04 N05-N11
      7 1644 1040 (S11W37 L=256)   302    100        0 (1607/1006-1677/1091) -63.4 W35-W39 S13-S07
      8  389 1029 (N20E40 L=179)   276     44        0 ( 360/1015- 414/1045) -36.9 E41-E37 N18-N21
      9  272  957 (N18E51 L=167)   612     98        2 ( 247/ 903- 308/1005)  39.8 E54-E47 N15-N20
     10  166  908 (N18E65 L=154)  1377    166        5 ( 124/ 838- 196/ 973)  48.8 E71-E59 N13-N21
     11 1327  693 (S22W09 L=227)  1324    334        1 (1261/ 562-1398/ 847)  40.9 W01-W16 S28-S14
     12  630  780 (N01E29 L=190)   600    185        1 ( 574/ 685- 668/ 836) -90.0 E30-E27 S05-N04
     13 1800  711 (S36W48 L=266)  2702    262        7 (1699/ 631-1879/ 813)  10.8 W36-W58 S40-S31
     14  551  628 (S06E39 L=180)   718    197        1 ( 527/ 531- 582/ 707)  59.0 E42-E34 S11-S01
     15 1115  680 (S17E04 L=215)   199     25        1 (1091/ 664-1137/ 697) -18.4 E05-E02 S17-S15
     16  802  559 (S16E25 L=193)   864    277        3 ( 757/ 471- 866/ 647)  45.0 E30-E19 S21-S11
     17 1033  612 (S18E10 L=208)   270     59        1 (1008/ 582-1054/ 644)  45.0 E12-E08 S20-S16
     18  711  586 (S12E30 L=189)   333     71        1 ( 676/ 553- 740/ 615)  31.0 E32-E27 S13-S10
     19  614  553 (S12E37 L=181)   330     96        0 ( 573/ 534- 647/ 573)  -9.5 E40-E34 S13-S10
     20  225  538 (S05E77 L=142)  1397     48        2 ( 200/ 509- 248/ 564) -90.0 E83-E72 S07-S03
     21  625  432 (S19E42 L=176)  1458    224        6 ( 558/ 390- 711/ 502) -45.0 E49-E36 S22-S14
     22  385  449 (S13E61 L=157)   772     90        3 ( 358/ 403- 408/ 491)  50.2 E64-E58 S16-S10
     23 1165  416 (S35E09 L=209)   370    101        0 (1130/ 377-1190/ 465)  29.7 E13-E06 S36-S31
     24  507  383 (S20E55 L=164)  1166    196        2 ( 433/ 331- 609/ 432) -41.6 E60-E48 S24-S15
     25  881  349 (S31E30 L=189)   389     87        0 ( 847/ 322- 922/ 382) -71.6 E31-E28 S33-S27
     26  478  305 (S24E66 L=153)  2029    118        1 ( 426/ 265- 518/ 353)   9.1 E82-E57 S27-S21
  

    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