Création automatique de schémas YACS à partir d'un cas

[modules/homard.git] / src / HOMARD_I / HOMARD_Cas_i.cxx

diff --git a/src/HOMARD_I/HOMARD_Cas_i.cxx b/src/HOMARD_I/HOMARD_Cas_i.cxx
index 91e7e5e6ba2165bdb1520878e71146c1f0d5b636..3a0a2a28b705762e4c56283ba42ec5506cf0a4ef 100755 (executable)
--- a/src/HOMARD_I/HOMARD_Cas_i.cxx
+++ b/src/HOMARD_I/HOMARD_Cas_i.cxx
@@ -416,3 +416,26 @@ void HOMARD_Cas_i::AddIteration( const char* NomIteration )
   ASSERT( myHomardCas );
   myHomardCas->AddIteration( NomIteration );
 }
+//=============================================================================
+//=============================================================================
+// YACS
+//=============================================================================
+//=============================================================================
+//=============================================================================
+// Ecriture d'un schema YACS
+// ScriptFile : nom du fichier contenant le script de lancement du calcul
+// DirName : le repertoire de lancement des calculs du schéma
+// MeshFile : nom du fichier contenant le maillage pour le premier calcul
+//=============================================================================
+CORBA::Long HOMARD_Cas_i::WriteYACSSchema( const char* ScriptFile, const char* DirName, const char* MeshFile )
+{
+//
+  ASSERT( myHomardCas );
+// Nom du cas
+  const char* CaseName = GetName() ;
+  MESSAGE ( "WriteYACSSchema : Schema YACS pour le cas " << CaseName);
+  MESSAGE ( "ScriptFile : " << ScriptFile);
+  MESSAGE ( "DirName    : " << DirName);
+  MESSAGE ( "MeshFile   : " << MeshFile);
+  return _gen_i->WriteYACSSchema(CaseName, ScriptFile, DirName, MeshFile) ;
+}