From 8956b885c098372417a2ddbbe320b60553488533 Mon Sep 17 00:00:00 2001
From: eficas <>
Date: Wed, 17 Nov 2004 09:46:22 +0000
Subject: [PATCH] PN : changement version Aster

---
 Aster/Tests/Recette/efica01a.11   |  3 +--
 Aster/Tests/Recette/efica01a.comm | 23 +++++++++++++++--------
 2 files changed, 16 insertions(+), 10 deletions(-)

diff --git a/Aster/Tests/Recette/efica01a.11 b/Aster/Tests/Recette/efica01a.11
index e323531e..cda7b74f 100755
--- a/Aster/Tests/Recette/efica01a.11
+++ b/Aster/Tests/Recette/efica01a.11
@@ -1,5 +1,4 @@
-DEPL2 = FORMULE(REEL="""(REEL:INST) =
-SIN(OMEGAA*INST)/(OMEGAA**2) """)
+DEPL2 = FORMULE(NOM_PARA='INST',VALE='sin(OMEGAA*INST)/(OMEGAA**xx)')
 DEPLACE2=CALC_FONC_INTERP( FONCTION=DEPL2,
                            LIST_PARA=L_INST,
 			   NOM_PARA='INST',
diff --git a/Aster/Tests/Recette/efica01a.comm b/Aster/Tests/Recette/efica01a.comm
index 46507be0..20eea866 100755
--- a/Aster/Tests/Recette/efica01a.comm
+++ b/Aster/Tests/Recette/efica01a.comm
@@ -1,4 +1,4 @@
-# MODIF  DATE 13/01/2004   AUTEUR DURAND C.DURAND 
+# MODIF  DATE 20/09/2004   AUTEUR DURAND C.DURAND 
 # TITRE TEST DE NON REGRESSION DE L IHM EFICAS - DERIVE DE SDND102A
 #            CONFIGURATION MANAGEMENT OF EDF VERSION
 # ======================================================================
@@ -42,7 +42,7 @@
 #
 
 
-DEBUT(CODE=_F(NOM='EFICA01A',NIV_PUB_WEB='INTERNET'),)
+DEBUT(CODE=_F(NOM='EFICA01A',NIV_PUB_WEB='INTERNET',VISU_EFICAS='NON'),)
 
 MAILLAGE=LIRE_MAILLAGE()
 
@@ -162,9 +162,10 @@ L_INST=DEFI_LIST_REEL(DEBUT=0.0,
                       INTERVALLE=_F(JUSQU_A=1.0,
                                     PAS=1.E-4,),)
 
-OMEGAA=DEFI_VALEUR(R8=EVAL("""2.*PI*10."""),)
+OMEGAA=2.*pi*10.
 
-ACCE1 = FORMULE(REEL = '''(REEL:INST) = SIN(OMEGAA*INST)''')
+ACCE1 = FORMULE(VALE = 'sin(OMEGAA*INST)',
+                NOM_PARA='INST')
 
 ACCELER1=CALC_FONC_INTERP(FONCTION=ACCE1,
                           NOM_RESU='ACCE',
@@ -173,7 +174,8 @@ ACCELER1=CALC_FONC_INTERP(FONCTION=ACCE1,
                           PROL_DROITE='LINEAIRE',
                           PROL_GAUCHE='LINEAIRE',)
 
-ACCE2 = FORMULE(REEL = '''(REEL:INST) = - SIN(OMEGAA*INST)''')
+ACCE2 = FORMULE(VALE = '-sin(OMEGAA*INST)',
+                NOM_PARA='INST')
 
 ACCELER2=CALC_FONC_INTERP(FONCTION=ACCE2,
                           NOM_RESU='ACCE',
@@ -182,7 +184,8 @@ ACCELER2=CALC_FONC_INTERP(FONCTION=ACCE2,
                           PROL_DROITE='LINEAIRE',
                           PROL_GAUCHE='LINEAIRE',)
 
-VITE1 = FORMULE(REEL = '''(REEL:INST) = -COS(OMEGAA*INST)/OMEGAA''')
+VITE1 = FORMULE(VALE = '-cos(OMEGAA*INST)/OMEGAA',
+                NOM_PARA='INST')
 
 VITESSE1=CALC_FONC_INTERP(FONCTION=VITE1,
                           NOM_RESU='VITE',
@@ -191,7 +194,8 @@ VITESSE1=CALC_FONC_INTERP(FONCTION=VITE1,
                           PROL_DROITE='LINEAIRE',
                           PROL_GAUCHE='LINEAIRE',)
 
-DEPL1 = FORMULE(REEL = '''(REEL:INST) = -SIN(OMEGAA*INST)/(OMEGAA**2)''')
+DEPL1 = FORMULE(VALE = '-sin(OMEGAA*INST)/(OMEGAA**2)',
+                NOM_PARA='INST')
 
 DEPLACE1=CALC_FONC_INTERP(FONCTION=DEPL1,
                           NOM_RESU='DEPL',
@@ -200,7 +204,8 @@ DEPLACE1=CALC_FONC_INTERP(FONCTION=DEPL1,
                           PROL_DROITE='LINEAIRE',
                           PROL_GAUCHE='LINEAIRE',)
 
-VITE2 = FORMULE(REEL = '''(REEL:INST) = COS(OMEGAA*INST)/OMEGAA''')
+VITE2 = FORMULE(VALE = 'cos(OMEGAA*INST)/OMEGAA',
+                NOM_PARA='INST')
 
 VITESSE2=CALC_FONC_INTERP(FONCTION=VITE2,
                           NOM_RESU='VITE',
@@ -209,6 +214,8 @@ VITESSE2=CALC_FONC_INTERP(FONCTION=VITE2,
                           PROL_DROITE='LINEAIRE',
                           PROL_GAUCHE='LINEAIRE',)
 
+xx=2
+
 INCLUDE(UNITE=11,
         INFO=1,)
 
-- 
2.39.2