Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1 1700 1415 (N07W54 L=223)  1112    115        4 (1646/1370-1741/1465) -63.4 W49-W58 N04-N10
      2 1047 1307 (N19W09 L=177)  1241    477        3 ( 904/1154-1214/1393)  12.8 E02-W20 N14-N22
      3 1834 1203 (S08W58 L=227)  1057    212        1 (1761/1135-1892/1256) -47.7 W52-W64 S13-S02
      4  437 1148 (N25E34 L=135)   582    130        0 ( 397/1093- 486/1183)  20.6 E37-E29 N22-N27
      5 1411 1134 (N00W24 L=193)   646    139        1 (1360/1069-1443/1178) -74.1 W22-W26 S03-N04
      6 1888  927 (S25W59 L=228)  3474    373        2 (1817/ 768-1939/1102)  48.6 W49-W68 S33-S16
      7  262  996 (N20E51 L=117)   747    165        2 ( 237/ 927- 282/1077) -73.3 E53-E49 N15-N25
      8 1747 1060 (S13W46 L=214)   267     33        0 (1721/1043-1768/1076) -26.6 W43-W47 S13-S11
      9 1588 1050 (S09W33 L=202)   385     90        1 (1548/1027-1632/1073)  -9.5 W30-W36 S10-S06
     10 1727 1005 (S15W43 L=211)   323     71        2 (1696/ 976-1753/1024) -45.0 W40-W45 S17-S13
     11  306  890 (N13E49 L=119)  1170    221        3 ( 261/ 824- 356/ 984)  35.0 E53-E43 N09-N17
     12  133  940 (N19E69 L=100)   752    115        0 ( 103/ 901- 190/ 982) -26.6 E74-E61 N16-N21
     13 1554  928 (S15W28 L=197)   603    144        1 (1508/ 869-1607/ 963)  14.0 W24-W32 S16-S13
     14  795  804 (S02E18 L=150)  1062    247        1 ( 705/ 708- 865/ 895) -76.0 E21-E15 S08-N04
     15 1584  855 (S20W29 L=198)   343     60        1 (1555/ 823-1608/ 888)  36.9 W26-W31 S21-S18
     16 1698  620 (S39W37 L=205)   894    144        1 (1636/ 580-1741/ 680)  18.4 W30-W41 S40-S35
     17  671  501 (S17E36 L=133)  1630    427        3 ( 542/ 378- 810/ 643)  18.4 E51-E21 S21-S11
     18  512  607 (S07E42 L=127)   293     58        0 ( 473/ 591- 534/ 628)   0.0 E44-E39 S07-S05
     19  360  600 (S04E54 L=114)   362     52        2 ( 332/ 581- 400/ 622) -18.4 E57-E50 S05-S02
     20  323  538 (S07E62 L=107)  1526    159        2 ( 283/ 475- 363/ 615)  77.5 E65-E59 S11-S02
     21 1023  508 (S25E14 L=154)  1297    276        2 ( 904/ 441-1146/ 580)   6.0 E23-E04 S26-S22
     22  425  435 (S15E58 L=110)  2207    197        9 ( 362/ 350- 475/ 541)  47.5 E69-E49 S21-S09
     23  766  357 (S28E37 L=132)   409     94        0 ( 725/ 329- 804/ 391)   7.1 E40-E32 S29-S26
  

    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