Exemple d'utilisation de la commande MatInverse

Exemples évolués

Chaque exemple montre une utilisation pratique de la fonction du WLangage.

Quand plusieurs syntaxes sont possibles, chacune est illustrée indépendamment.

Revenir à la page des exemples évolués

Le code suivant permet d'inverser une matrice. Le nom de la matrice est saisi par l'utilisateur dans un champ de saisie (NomMatrice).

On considère que la matrice a été préalablement créée. L'existence de la matrice est testée avec MatExiste . Le nombre de colonnes de la matrice doit être égal au nombre de lignes de la matrice. Le déterminant ne doit pas être nul.

--Code de clic sur BtnInversion
// Déclaration des variables
ResInversion est un booléen
// Teste l'existence de la matrice
SI MatExiste(NomMatrice) = Vrai ALORS
   // Nb. colonnes de la matrice = Nb. lignes de la matrice ?
   SI MatNbColonne(NomMatrice) = MatNbLigne(NomMatrice) ALORS
    // Déterminant non nul ?
      SI MatDéterminant(NomMatrice) <> 0 ALORS
         // Inversion de la matrice
          ResInversion = MatInverse (NomMatrice, "MaMatriceInversion")
         // Erreur ?
         SI ResInversion = Vrai ALORS
            Info("L'inversion a été effectuée")
         SINON
            // Affichage du message d'erreur
            Erreur(ErreurInfo(errMESSAGE))
         FIN
      SINON
         Info("Le déterminant est nul")
      FIN
   SINON
      Info("Le nombre de colonnes n'est pas égal au nombre de lignes")
   FIN
SINON
   Info("La matrice n'existe pas")
FIN