童貞裁判において童貞を自称する者に童貞筋が認められなかった場合は火炙り