#######################################################################
#                                                                     #
#       |    |  ====  ===   ====  ====  |    |      |        |        #
#       |    |  |     |  |  |        /  |    |      |        |        #
#       |====|  |===  ===   |===    /   |====|   -------  -------     #
#       |    |  |     | \   |      /    |    |      |        |        #
#       |    |  ====  |  \  ====  ====  |    |      |        |        #
#                                                                     #
#######################################################################
#  Copyright (c) 1997-2016 Gerard Rio,   gerard.rio@univ-ubs.fr       #
#  All rights reserved.      http://http://kleger.univ-ubs.fr/Herezh/ #
#  Certification IDDN.FR.010.0106078.000.R.P.2006.035.20600           #
#                                                                     #
#######################################################################
# (version avec le plus de verifications pendant le calcul et les I/O ) 
 version  6.785
 

#######################################################################
#                       fichier de commande                           #
 
 
#     --- vérification du fonctionnement de fonctions 
 
 

#----------------------------------------------------
# definition de la dimension de l'espace de travail |
#----------------------------------------------------
 dimension   1

#---------------------------------------------------------------
# definition facultative du niveau d'impression (entre 0 et 10)|
#---------------------------------------------------------------
 niveau_commentaire   3

#-------------------------------
# definition du type de calcul |
#-------------------------------
 TYPE_DE_CALCUL
  
non_dynamique avec plus lectureCommandesVisu #avec     plus visualisation

#--------------------------------------
#| definition du (ou des) maillage(s) |
#--------------------------------------

 # -- def maillage 
 < barre.her 
 
#-------------------------------------
# definition facultative de courbe 1D|
#-------------------------------------
 
            les_courbes_1D #------------

#............................................
 courbe_monte   COURBE_EXPRESSION_LITTERALE_1D  
       f(x)= 0.0004*(sin(1.5708*x))^4  
   fin_parametres_courbe_expression_litterale_  
   
 courbe_charge_monte   COURBE_EXPRESSION_LITTERALE_1D  
       f(x)= (sin(1.5708*x))^4  
   fin_parametres_courbe_expression_litterale_  
   

#------------- fin def des courbes 1D ------------------------

#----------------------------------------
# definition facultative de fonction  nD|
#----------------------------------------
 
            les_fonctions_nD #------------

# .......  fonction litterale nD ........
#   il s'agit d'une fonction qui utilise une courbe 1D 
#   cette derniere peut soit deja exister, soit etre definie a la suite 
#   exemple 1: cas d'une courbe qui existe deja sous le nom: courbe_charge_monte
    force_appliquee3    FONCTION_COURBE1D  
       courbe= courbe_charge_monte 
       un_argument= temps_courant 
     fin_fonction_courbe1D_
#   
#   exemple 2: cas d'une courbe qui est definit a la suite
    force_appliquee2    FONCTION_COURBE1D  
       un_argument= temps_courant 
       courbe= COURBE_EXPRESSION_LITTERALE_1D 
           f(x)= (sin(1.5708*x))^2  
        fin_parametres_courbe_expression_litterale_  
     fin_fonction_courbe1D_
#  

    force_appliquee    FONCTION_COURBE1D  
       courbe= COURBEPOLYLINEAIRE_1_D
	      Debut_des_coordonnees_des_points
          Coordonnee dim= 2 0.0 0
          Coordonnee dim= 2 1. 1.
          Coordonnee dim= 2 2. 0.
          Coordonnee dim= 2 3. 1.
          Coordonnee dim= 2 4. 0.
	      Fin_des_coordonnees_des_points
       un_argument= temps_courant 
     fin_fonction_courbe1D_

#------------- fin def des fonctions  nD ------------------------

#======================================
#| definition des lois de comportement|
#--------------------------------------
 
            choix_materiaux ----------
#----------------------------------------
# Elements   |   Nom   Materiau         |
#----------------------------------------
E_tout acier 

        materiaux #----------

#------------------------------------------
# Nom Materiau    |      Type loi         |
#------------------------------------------
  acier         ISOELAS1D
# .......  loi de comportement isoelastique 1D ........
#    module d'young :
 210000  0.3

#--------------------------------------- fin def des lois de comportement ------------------------

#    --- divers stockages (1) -------       
 sections   #--------# 
E_tout  1 
 masse_volumique   #--------# 
E_tout  1 

       charges #------------# 
N_fi  PONCTUELLE  1. Fonction_nD_CHARGE: force_appliquee  TEMPS_MINI= 2.  TEMPS_MAXI= 4. 
N_fi  PONCTUELLE  1. Fonction_nD_CHARGE: force_appliquee2  TEMPS_MINI= 4.  TEMPS_MAXI= 6. 
N_fi  PONCTUELLE  1. Fonction_nD_CHARGE: force_appliquee3  TEMPS_MINI= 6.  TEMPS_MAXI= 8. 



              
       blocages #------------# 
#-----------------------------------------------------------
#  nom du maillage | Ref noeud |  Blocages
#-----------------------------------------------------------
N_deb  UX 
N_fi  '  UX =  COURBE_CHARGE: courbe_monte  ' TEMPS_MAXI= 2.

      controle #------------ 
#--------------------------- 
# PARAMETRE    |  VALEUR   | 
#--------------------------- 
 TEMPSFIN 8
 DELTAtMAXI 0.02

      para_affichage #------------ 
#--------------------------- 
# PARAMETRE    |  VALEUR   | 
#--------------------------- 
 FREQUENCE_AFFICHAGE_INCREMENT 500
 FREQUENCE_AFFICHAGE_ITERATION 100
# FREQUENCE_SORTIE_FIL_DU_CALCUL 1
   
#  ------------------------------------------------------------------------------------ 
      resultats  pas_de_sortie_finale_ 
      COPIE 0   
#


  _fin_point_info_