an = abc2svg.b40a(b40)			// new accidental

	if (sk.k_none) {			// if atonal music
		b40 %= 40
		if (an == -2 || an == 2		// __ or ^^
		 || b40 == 1 || b40 == 38 || b40 == 18 || b40 == 15) {
						// _C, ^B, _F, ^E
			if (an < 0)
				note.pit--
			note.pit += (an > 0) ? 1 : -1
			else
				note.pit++
			an = 0
		}
	}

	if (a) {
		if (sk.k_a_acc) {		// if accidental list
			ak = sk.k_map[(note.pit + 19) % 7]
			if (ak == an)
				an = 0		// accidental in the key
		}
		if (!an)
			an = 3
		if (!an) {
			n = same_pit(s, note)
			an = (n && n.acc) ? 3 : 0
		}
	} else if (sk.k_none) {			// if no key
		if (acc_same_pitch(s, note.midi)) // and accidental from previous notes
			return			// no change
		n = same_pit(s, note)
		if (n) {
			if (n.acc == an)
				return
			if (!an)
				an = 3
		}
	} else if (sk.k_a_acc) {		// if accidental list
		if (acc_same_pitch(s, note.midi)) // and accidental from previous notes
			return			// no change
		n = same_pit(s, note)
		if (n && n.acc == an)
			return
		ak = sk.k_map[(note.pit + 19) % 7]
		if (ak)
			an = 3		// natural
	} else {
		return			// same accidental (in the key)
	}
	if (d && an != a) {

   var sf = abc2svg.b40sf[n_b40]
	sk.k_sf = sf
	sk.k_map = abc2svg.keys[sf + 7]	// map of the notes with accidentals
}

/*
 * for transpose purpose, check if a pitch is already in the measure or
 * if it is tied from a previous note
 * for transpose purpose, search a note that has the same pitch
 * as a note in the measure or tied from a previous note
 */
function acc_same_pitch(s, midi) {
    var	i, a,
function same_pit(s, note) {
    var	i,
	pit = note.pit,
	time = s.time

//fixme: other voice?
	for (s = s.prev; s; s = s.prev) {
		switch (s.type) {
		case C.BAR:
			if (s.time < time)
				return //undefined // not the same pitch
				return //undefined
			while (1) {
				s = s.prev
				if (!s)
					return //undefined
				if (s.type == C.NOTE) {
					if (s.time + s.dur == time)
						break
					return //undefined
				}
				if (s.time < time)
					return //undefined
			}
			for (i = 0; i <= s.nhd; i++) {
				if (s.notes[i].midi == midi)
					return 1 //true
				if (s.notes[i].pit == pit
				 && s.notes[i].tie_ty)
					return s.notes[i]
			}
			return //undefined
		case C.NOTE:
			for (i = 0; i <= s.nhd; i++) {
				if (s.notes[i].midi == midi)
					return 1 //true
				if (s.notes[i].pit == pit)
					return s.notes[i]
			}
			break
		}
	}
	return //undefined
}