function tabla = carga_tabla_notas_musicales (archivo)
  delimitadores = [' ',',',char(9),char(13),'\n'];
  tabla = {" "};
  [fid,msg] = fopen(archivo,"rt");
  if fid < 0
    printf("%s\n",msg);
    return  
  endif
  
  ren = 0;
  while 1
    linea = fgetl(fid);
    if ~ischar(linea)
      break
    endif
    resto = linea;
    ren = ren + 1;
    col = 0;
    while 1
        [palabra,resto]=strtok(resto,delimitadores);
        if isempty(palabra)
           break;
        endif
        col = col + 1;
        if col == 2
           tabla(ren,col)={str2double(palabra)};
        else
          tabla(ren,col)={palabra};
        endif  
    endwhile
  endwhile
  fclose(fid);
endfunction