Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1 1119 1622 (N40W24 L=128)  1030    158        3 (1075/1564-1166/1705)  59.0 W19-W30 N35-N45
      2 1320 1673 (N38W42 L=145)   425     54        0 (1289/1653-1361/1692)   0.0 W38-W46 N36-N38
      3 1535 1654 (N30W58 L=161)   737     91        1 (1492/1626-1578/1678)   0.0 W51-W63 N28-N31
      4 1696 1543 (N19W65 L=168)   675    108        1 (1645/1507-1750/1572) -26.6 W61-W71 N16-N21
      5 1182 1409 (N26W19 L=123)  1091    261        2 (1104/1347-1276/1500) -72.9 W15-W23 N19-N32
      6 1738 1445 (N13W62 L=165)   824    108        0 (1704/1386-1762/1486)  81.9 W59-W64 N08-N15
      7  953 1293 (N24W02 L=105)   252     54        0 ( 925/1270- 986/1315) -45.0 W00-W03 N22-N26
      8  605 1208 (N26E23 L= 81)   641    236        2 ( 538/1120- 684/1291) -58.4 E27-E18 N19-N32
      9  244 1106 (N26E56 L= 48)   494     85        1 ( 227/1066- 269/1140) -76.0 E57-E52 N23-N27
     10  893 1077 (N13E07 L= 97)   242    119        0 ( 877/1029- 925/1130)  51.3 E07-E03 N10-N15
     11 1127 1070 (N08W07 L=110)   448    191        1 (1067/1033-1209/1105) -45.0 W03-W10 N03-N10
     12 1309  995 (S01W16 L=119)   207     71        0 (1271/ 982-1343/1014)   0.0 W13-W18 S01-N00
     13 1899  884 (S24W64 L=167)  2301    232        2 (1840/ 782-1939/ 984)  34.7 W54-W72 S29-S19
     14  391  921 (N13E43 L= 60)   776    264        0 ( 329/ 855- 438/ 975) -60.3 E48-E40 N08-N15
     15  168  852 (N11E68 L= 35)  1358    164        3 ( 133/ 774- 200/ 921) -59.0 E73-E64 N05-N15
     16 1540  887 (S13W28 L=132)   239     37        0 (1512/ 872-1570/ 902) -26.6 W26-W30 S13-S11
     17  876  823 (S01E13 L= 91)   307     56        1 ( 856/ 780- 897/ 856)  56.3 E14-E11 S03-N00
     18 1572  804 (S18W29 L=133)   319     69        0 (1555/ 769-1588/ 838)  63.4 W28-W30 S20-S16
     19 1339  777 (S14W13 L=117)   358     78        3 (1315/ 744-1361/ 815)  76.0 W11-W14 S15-S11
     20 1678  723 (S27W37 L=140)   439     68        0 (1651/ 688-1707/ 758)  31.0 W34-W39 S28-S25
     21 1410  738 (S18W17 L=120)   278     31        0 (1382/ 717-1432/ 755) -56.3 W15-W18 S19-S16
     22 1261  658 (S19W06 L=110)   203    124        0 (1222/ 616-1298/ 715) -76.0 W04-W07 S23-S15
     23 1425  485 (S36W14 L=118)  2053    316        5 (1335/ 375-1532/ 582)  32.0 W06-W23 S42-S30
     24  672  499 (S17E34 L= 69)   732    171        2 ( 611/ 441- 723/ 572)  30.3 E41-E29 S20-S13
     25  542  456 (S18E46 L= 57)   541     78        1 ( 504/ 428- 580/ 489) -45.0 E48-E43 S20-S15
     26 1117  343 (S38E11 L= 92)  3068    498        8 ( 938/ 243-1340/ 434)   4.9 E28-W07 S42-S33
     27 1267  164 (S63E09 L= 94)   615     84        0 (1229/ 148-1308/ 181) -11.3 E13-E03 S65-S60
  

    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