"Общечеловеческая мораль" — это какая? Сомневаюсь, что аборигены Австралии слышали про общечеловеческую мораль, когда каннибализмом занимались.
Добрый день, мораль у греков с римлянами появилась, внезапно, на основе религии. Возьми любое античное учение греков о морали — оно так или иначе связано с богами, богом или вселенной в магическом смысле. Уж не платонизм ли лёг в основу христианской апологетики?
Ну да, мы живём наследием римских законов. И христианской этики. Но никто не использует оригинальные римские законы 2000-летней давности — они уже давно эволюционировали кучу раз. С христианской этикой аналогично — её уже 10 раз переосмыслили, и она давно лежит в основе европейской светской этики.
Да, многожёнство отлично осуждается в исламе, а инцест — в зороастризме.
Ещё раз — люди не святые и не машины, чтобы исполнять всё в точности и безукоризненно. Если человек христианин — это не значит, что он автоматически будет жить аки Иисус. А когда речь заходит о целых организациях, вроде церквей, к этому примешивается ещё и фактор политики, который невозможно игнорировать.
В случае с Габсбургами всё очевидно — они были главными защитниками католической церкви в период Реформации, а потому имели большое влияние на неё. Чем и пользовались, внезапно. Но, видимо, церкви стоило осудить Габсбургов и порвать с ними, чтобы добровольно отдать всё в руки протестантов. Эх, чего только не сделаешь по прихоти рандомного реакторчанина несколькими веками позже...
В целом же, церковь вполне успешно предовтращала близкородственные браки и добивалась разрыва уже существующих, если постфактум вскрылось доказательство родственной близости.