Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1  603 1725 (N32E45 L=284)   346     42        1 ( 579/1706- 624/1741)  45.0 E47-E42 N30-N33
      2  532 1645 (N25E46 L=283)   314     43        1 ( 514/1620- 551/1672) -45.0 E48-E43 N23-N27
      3 1021 1540 (N25E09 L=321)   234    119        0 ( 985/1487-1035/1582) -50.2 E11-E06 N21-N27
      4  299 1471 (N12E59 L=270)   937    133        2 ( 262/1422- 328/1518) -54.5 E65-E55 N08-N15
      5 1154 1400 (N18W02 L=331)   606    209        1 (1061/1377-1269/1422)   9.5 E03-W09 N16-N19
      6 1509 1296 (N17W26 L=355)  1947    363        7 (1380/1187-1583/1417) -31.0 W16-W31 N11-N22
      7  470 1376 (N07E40 L=289)   382    102        1 ( 424/1354- 518/1395)  18.4 E43-E37 N06-N08
      8  337 1311 (N02E50 L=279)   653    115        1 ( 311/1261- 362/1365)  90.0 E52-E47 N00-N05
      9  212 1301 (N01E62 L=267)   453     50        1 ( 188/1280- 244/1323)   0.0 E65-E58 N00-N02
     10 1152 1293 (N11W04 L=333)   195     78        0 (1128/1258-1187/1322)  59.0 W02-W05 N08-N13
     11 1083 1254 (N08E00 L=329)   256     82        0 (1058/1211-1098/1287) -76.0 E01-W01 N05-N09
     12 1435 1231 (N12W21 L=351)   530    121        2 (1396/1188-1463/1280)  90.0 W19-W23 N09-N15
     13 1512 1084 (N05W28 L=357)   307    119        2 (1447/1069-1563/1102)  14.0 W23-W31 N04-N06
     14  312  886 (S23E47 L=282)   292    123        0 ( 298/ 829- 332/ 940)  74.1 E48-E45 S26-S19
     15 1735  893 (S01W48 L= 17)   486    114        1 (1676/ 878-1789/ 910)  18.4 W43-W52 S03-N00
     16 1397  890 (S08W24 L=353)   238     93        0 (1364/ 865-1426/ 909)  45.0 W22-W26 S10-S06
     17  452  821 (S26E35 L=294)   990    273        1 ( 344/ 762- 573/ 864)  25.3 E45-E26 S30-S21
     18 1263  644 (S25W22 L=351)  3968    924        4 ( 974/ 556-1660/ 805)   5.7 W01-W51 S29-S18
     19  476  655 (S36E34 L=295)   274     54        1 ( 452/ 638- 502/ 673) -21.8 E36-E31 S36-S34
     20 1819  598 (S15W70 L= 39)   762    110        3 (1778/ 571-1866/ 631)  32.0 W64-W75 S17-S12
     21  430  538 (S44E41 L=288)  1447    330        4 ( 279/ 514- 577/ 562)   1.7 E61-E26 S46-S42
     22  714  508 (S43E14 L=315)   393    108        0 ( 665/ 479- 771/ 536) -12.5 E18-E09 S43-S41
     23  955  453 (S42W06 L=335)   285     87        1 ( 913/ 441-1006/ 473)  -8.1 W02-W09 S43-S41
  

    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