Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1  642 1752 (N33E47 L= 94)   759    122        0 ( 630/1696- 657/1819) -39.8 E54-E41 N28-N38
      2 1459 1690 (N47W19 L=160)   396     75        0 (1429/1659-1493/1707)  23.2 W15-W22 N43-N49
      3 1016 1678 (N34E15 L=126)   256     44        0 ( 984/1665-1044/1690)  36.9 E17-E13 N32-N35
      4  474 1609 (N20E51 L= 89)   901    199        1 ( 413/1554- 551/1672)  56.3 E54-E48 N15-N25
      5  526 1509 (N14E42 L= 99)   667    183        0 ( 506/1427- 546/1601) -63.4 E45-E38 N08-N20
      6  748 1552 (N20E28 L=113)  1161    252        4 ( 655/1477- 848/1601) -14.0 E35-E19 N16-N22
      7 1278 1489 (N26W07 L=147)   441     91        0 (1263/1452-1301/1538) -59.0 W05-W08 N23-N29
      8 1447 1447 (N27W19 L=160)   329    109        0 (1422/1395-1477/1493) -56.3 W16-W21 N24-N30
      9  904 1459 (N17E16 L=125)   238     53        1 ( 877/1438- 928/1476)   0.0 E17-E13 N15-N18
     10  842 1431 (N14E19 L=122)   344    115        0 ( 790/1395- 893/1470) -14.0 E22-E14 N12-N15
     11 1823 1125 (N17W53 L=194)   928    145        2 (1805/1041-1844/1187) -77.5 W50-W55 N11-N20
     12 1016 1071 (S04E01 L=140)   282     67        2 ( 978/1046-1051/1103)  33.7 E03-W00 S06-S02
     13 1872 1001 (N11W60 L=201)  1444    139        5 (1848/ 942-1906/1082) -49.4 W57-W66 N07-N15
     14  657 1039 (S12E22 L=119)   307     93        0 ( 622/1011- 695/1059)  31.0 E24-E19 S14-S10
     15  736 1007 (S13E17 L=124)   316     72        0 ( 713/ 971- 757/1041) -76.0 E18-E15 S14-S10
     16  648  911 (S20E21 L=120)   290     50        1 ( 617/ 884- 672/ 935) -14.0 E23-E19 S21-S18
     17  455  842 (S27E35 L=106)   485    100        0 ( 423/ 795- 492/ 882) -39.8 E37-E31 S29-S24
     18 1119  832 (S16W09 L=150)   271     64        0 (1080/ 813-1150/ 852)  45.0 W07-W10 S17-S14
     19  388  731 (S35E41 L=100)   397     74        0 ( 359/ 700- 427/ 758) -26.6 E44-E37 S36-S33
     20 1712  581 (S16W60 L=200)  1272    261        1 (1649/ 487-1743/ 673) -71.6 W54-W65 S23-S11
     21 1179  584 (S29W20 L=161)  1177    337        2 (1022/ 528-1314/ 619)   5.2 W08-W30 S32-S26
     22  586  536 (S45E23 L=118)  1257    179        4 ( 505/ 507- 687/ 564)  16.4 E31-E14 S47-S41
     23 1257  446 (S36W31 L=172)   601    111        0 (1220/ 407-1309/ 477)  66.8 W28-W33 S39-S32
     24  865  347 (S53W06 L=147)   338     35        1 ( 844/ 325- 888/ 376)  90.0 W03-W07 S55-S50
     25  647  270 (S67E20 L=120)   497     59        0 ( 610/ 251- 679/ 288)   0.0 E26-E14 S68-S65
  

    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