Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1 1381 1794 (N45W60 L=241)   591     79        1 (1340/1775-1420/1817)  -4.1 W53-W67 N43-N45
      2 1007 1673 (N48W17 L=199)  2615    505        7 ( 837/1582-1249/1790)   2.4 W00-W47 N44-N50
      3  804 1446 (N37E06 L=176)   279     79        0 ( 765/1432- 843/1460) -18.4 E08-E02 N35-N38
      4 1018 1400 (N29W08 L=189)   529    136        1 ( 968/1361-1081/1441)  12.5 W04-W13 N26-N30
      5 1296 1245 (N14W21 L=202)  1075    260        1 (1209/1157-1378/1344) -70.3 W18-W23 N07-N21
      6  258 1264 (N34E56 L=126)   710    114        1 ( 238/1201- 284/1316)  90.0 E57-E53 N30-N37
      7  815 1070 (N14E12 L=170)   252    107        1 ( 789/1044- 848/1107) -68.2 E13-E09 N11-N16
      8  224  833 (N08E61 L=120)  5006    581       11 ( 135/ 689- 320/1058) -72.3 E76-E54 S01-N21
      9 1117  894 (S02W03 L=184)   360    106        0 (1095/ 844-1144/ 948)  38.7 W00-W05 S05-N00
     10 1873  860 (S24W60 L=242)  1284    137        3 (1842/ 799-1909/ 928) -59.0 W55-W67 S28-S18
     11  621  816 (N02E28 L=153)   306     99        1 ( 604/ 766- 635/ 871)  59.0 E30-E26 N00-N05
     12 1373  745 (S17W15 L=197)   437    159        0 (1310/ 680-1411/ 798)  32.0 W10-W18 S19-S14
     13  175  729 (N02E72 L=109)   813     75        2 ( 158/ 693- 193/ 770) -76.0 E75-E68 N00-N04
     14  506  697 (S03E39 L=143)   358     79        1 ( 478/ 660- 530/ 734) -68.2 E40-E37 S05-N00
     15 1470  652 (S25W21 L=202)   300    103        0 (1433/ 611-1510/ 686)  26.6 W17-W23 S26-S23
     16  930  499 (S23E17 L=164)  1336    334        2 ( 865/ 353- 984/ 652)  52.1 E24-E09 S32-S13
     17 1548  586 (S32W26 L=208)   417     97        0 (1508/ 554-1586/ 619)  15.9 W22-W29 S33-S30
     18  535  497 (S16E44 L=137)   652     87        3 ( 501/ 459- 562/ 537)  68.2 E47-E41 S18-S13
     19  398  490 (S15E57 L=125)   935     84        3 ( 360/ 447- 428/ 527) -80.5 E60-E54 S18-S12
     20  379  422 (S20E65 L=117)  4178    236        7 ( 293/ 343- 457/ 521) -65.2 E73-E57 S26-S12
     21  613  434 (S22E41 L=141)   968    198        2 ( 539/ 389- 669/ 469) -26.6 E47-E36 S25-S19
     22  568  361 (S26E49 L=132)   694    121        2 ( 514/ 328- 611/ 396)  13.0 E56-E43 S28-S23
     23 1052  307 (S40E16 L=165)   495     55        0 (1018/ 288-1089/ 325) -31.0 E18-E13 S41-S37
     24 1232  224 (S54E06 L=176)  1727    257        3 (1129/ 175-1348/ 269)   2.5 E17-W06 S56-S50
  

    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