Date            11 juin 2025
Responsable     of166741
Developpement 
Composant       Autre
Nom             IniData
             
--------------------------
                          
Permettre l'initialisation des COMMONS (bdata.eso) par un sous-programme (de nom INIDATA) appele par DEBUT (debut.eso), lorsque le BLOCK DATA (bdata.eso) n'est pas charge au lancement, ce qui est le cas de CastemCoupling.

L'utilisation judicieuse d'une variable de compilation ESOPE (a preciser dans ESOPE_PARAM pour qu'elle soit mise a vrai) permet sans le moindre effort de faire ce développement, et sans impact sur le fonctionnement normal de Cast3M qui doit être garanti.

Date            11 jui 2025           Fermeture : 11 jui 2025 
Responsable     of166741              par       : of166741  
Developpement 
Composant       Autre
Nom             IniData
             
--------------------------
 evolution demandee le 11 juin 2025 par of166741
 Liste des  sous-programmes concernés 
 et commentaires associés 
Grace au positionenement de la variable de compilation ESOPE (ESOPE_PARAM=...,COUPLING) 
lors de la construction de CastemCoupling (par defaut a FAUX dans le cas standard), 
il suffit juste de modifier les sources suivantes :
bdata.eso  : En tete du fichier
   "%IF COUPLING"
   "      SUBROUTINE INIDATA"
   "%ELSE"
   "      BLOCK DATA"
   "%ENDIF"
debut.eso  : 1ere instruction (apres les declarations)
   "%IF COUPLING"
   "      CALL INIDATA"
   "%ENDIF"
Et le tour est joue ! Merci Esope !