Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1  436 1627 (N15E59 L=168)  1957    342        7 ( 321/1534- 548/1702)  49.4 E66-E53 N06-N21
      2  950 1579 (N24E21 L=206)   296     84        0 ( 928/1540- 981/1616) -80.5 E22-E20 N21-N27
      3  657 1563 (N16E38 L=189)   263    108        0 ( 622/1525- 680/1592) -23.2 E42-E35 N13-N16
      4  597 1430 (N06E37 L=190)   511    102        1 ( 549/1409- 641/1453)  26.6 E40-E33 N04-N08
      5 1203 1295 (N14W02 L=230)   488    158        0 (1133/1237-1242/1361)  78.7 W00-W04 N09-N19
      6 1520 1270 (N23W23 L=250)   795    154        1 (1477/1201-1553/1346) -45.0 W18-W25 N19-N26
      7  480 1199 (S10E37 L=190)   645    207        0 ( 441/1108- 503/1300) -71.6 E40-E35 S15-S03
      8  343 1075 (S20E45 L=182)   737    246        0 ( 273/1041- 440/1115)  28.3 E50-E37 S22-S15
      9 1107 1066 (S01W03 L=230)   247     70        0 (1085/1027-1134/1100) -26.6 W01-W05 S02-N00
     10  744 1018 (S13E16 L=211)   338    156        0 ( 680/ 974- 816/1040)  40.6 E18-E11 S17-S10
     11 1263  788 (S12W20 L=247)   206     55        1 (1229/ 772-1295/ 803)  11.3 W17-W22 S12-S10
     12  916  627 (S31W06 L=233)  1301    429        1 ( 803/ 519-1082/ 799) -23.5 E04-W19 S33-S22
     13  262  763 (S41E49 L=178)   613    136        0 ( 226/ 743- 310/ 796)   6.3 E52-E43 S42-S38
     14 1077  685 (S23W13 L=240)   430    158        1 (1006/ 656-1124/ 732)  45.0 W08-W16 S24-S18
     15 1154  587 (S26W21 L=248)   226     68        1 (1132/ 565-1180/ 621) -21.8 W18-W23 S26-S24
     16 1560  576 (S14W47 L=274)   730    115        2 (1518/ 529-1613/ 606)  56.3 W44-W50 S17-S11
     17 1058  245 (S51W37 L=264)  1958    352        4 (1006/ 161-1114/ 326) -32.3 W28-W47 S57-S45
     18 1431  312 (S32W55 L=282)   377     43        1 (1410/ 293-1455/ 326)  71.6 W52-W56 S33-S30
     19 1356  273 (S37W52 L=280)   678    118        1 (1332/ 237-1384/ 308) -33.7 W48-W55 S39-S35
     20 1201  240 (S45W46 L=273)   923    149        3 (1168/ 209-1245/ 281)  -5.7 W41-W51 S47-S42
     21 1138  173 (S52W50 L=277)   590    110        3 (1106/ 147-1165/ 193)   0.0 W46-W53 S53-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