Discussion :

[ben31400]

Bonjour,

Je recherche une façon de passer un nombre non fixé d'arguments à une subroutine. De façon plus précise, je souhaite créer une subroutine réalisant le produit tensoriel d'un nombre quelconque de matrices données en argument.

La subroutine idéale serait donc appelée par un

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

 CALL TensorProduct(A1,A2,....)

utilisable quelque soit le nombre de matrice Ak données en argument.

Merci d'avance à ceux qui prendront le temps de me répondre.

[Sylvain Bergeron]

2 solutions :

• Tu utilises l'attribut optional pour les tableaux 2, 3, ... , n
• Tu écris n routines (Routine à 1 arg, routine à 2 args, ...) et tu les associes dans une routine générique (interface to ... module procedure ...)

[ben31400]

Merci pour votre réponse,

J'ai opté pour l'utilisation d'attributs optional, même si je trouve cela malheureusement assez lourd. Il est dommage que Fortran n'ait pas une façon plus élégante de gérer ce problème.

Néanmoins, merci pour tout.