Konungen stulle wärna viligrundlagen