Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1 1334 1597 (N39W30 L=302)   911    195        1 (1260/1543-1421/1637)  14.0 W23-W39 N35-N41
      2  619 1571 (N43E30 L=242)   367     99        0 ( 572/1548- 670/1590)   6.3 E34-E25 N41-N44
      3  972 1557 (N40W01 L=272)   754    225        1 ( 875/1527-1078/1584) -18.4 E07-W08 N36-N42
      4 1069 1270 (N20W05 L=276)   311     80        1 (1029/1249-1107/1294) -26.6 W02-W06 N18-N21
      5 1591 1195 (N11W39 L=310)   944    233        1 (1500/1110-1651/1252) -41.6 W32-W42 N04-N14
      6  298 1105 (N13E51 L=221)   355    107        0 ( 284/1055- 316/1162) -71.6 E52-E49 N10-N16
      7  530 1015 (N07E32 L=240)   955    365        0 ( 414/ 870- 636/1130) -46.8 E40-E25 S02-N14
      8  948 1092 (N10E04 L=267)   331    155        0 ( 921/1038-1013/1121)  31.0 E06-W00 N06-N11
      9 1909 1028 (S04W69 L=341)   622     47        1 (1881/ 999-1933/1055)  23.2 W65-W74 S05-S02
     10 1275  788 (S11W14 L=285)   274    102        1 (1256/ 742-1296/ 833)  68.2 W12-W15 S14-S08
     11  308  676 (S14E55 L=217)  1737    278        4 ( 261/ 603- 363/ 768)  79.7 E61-E50 S18-S07
     12  914  649 (S18E10 L=262)   338    154        1 ( 877/ 608- 940/ 704)  71.6 E12-E07 S20-S13
     13 1755  640 (S27W54 L=326)  1049    150        0 (1695/ 593-1816/ 682)  17.1 W48-W61 S29-S24
     14 1116  583 (S23W03 L=274)   550    212        0 (1039/ 532-1197/ 653)  35.0 E02-W08 S26-S19
     15  240  610 (S18E68 L=204)   798     88        1 ( 225/ 568- 260/ 651)  45.0 E73-E63 S21-S15
     16  714  594 (S20E24 L=248)   390    107        1 ( 688/ 534- 744/ 638)  63.4 E26-E21 S24-S17
     17 1601  498 (S35W42 L=313)   563     72        1 (1582/ 461-1626/ 533) -54.5 W38-W46 S38-S31
     18  453  495 (S26E48 L=224)   336     66        1 ( 439/ 461- 470/ 531)  78.7 E49-E46 S28-S23
     19 1544  380 (S44W41 L=313)  2430    197        3 (1461/ 332-1605/ 460)  -6.3 W31-W52 S48-S37
     20 1378  376 (S42W24 L=295)   451     69        1 (1345/ 350-1408/ 402)  36.9 W20-W26 S43-S39
     21 1190  316 (S45W07 L=279)   419     42        1 (1166/ 294-1216/ 346)  63.4 W05-W09 S46-S42
     22 1039  290 (S46E06 L=266)   703     65        1 (1000/ 271-1082/ 316)  -8.1 E09-E02 S47-S43
     23  941  268 (S47E15 L=257)   534     48        1 ( 914/ 243- 969/ 294) -68.2 E17-E12 S49-S44
     24  757  218 (S51E37 L=234)  1632    176        3 ( 667/ 192- 821/ 251)   5.7 E49-E27 S54-S47
  

    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