|
1
|
|
|
2
|
#######################################################################
|
|
3
|
# #
|
|
4
|
# | | ==== === ==== ==== | | | | #
|
|
5
|
# | | | | | | / | | | | #
|
|
6
|
# |====| |=== === |=== / |====| ------- ------- #
|
|
7
|
# | | | | \ | / | | | | #
|
|
8
|
# | | ==== | \ ==== ==== | | | | #
|
|
9
|
# #
|
|
10
|
#######################################################################
|
|
11
|
# Herezh++ is distributed under GPL 3 license ou ultérieure. #
|
|
12
|
# Copyright (C) 1997-2021 Université Bretagne Sud (France) #
|
|
13
|
# AUTHOR : Gérard Rio #
|
|
14
|
# E-MAIL : gerardrio56@free.fr #
|
|
15
|
# Certification IDDN.FR.010.0106078.000.R.P.2006.035.20600 #
|
|
16
|
# #
|
|
17
|
#######################################################################
|
|
18
|
# (version la plus rapide )
|
|
19
|
version 6.994
|
|
20
|
-- initialisation de l'entree des donnees racine du nom de fichier principal = modele
|
|
21
|
|
|
22
|
== >>> lecture donnees particuliere de la fct: fext_press) operations finales:
|
|
23
|
== >>> Fonction_nD::Definition_depend_M ( fct= fext_press)
|
|
24
|
cas d'un ddl de base: nom_variables(1) = X1 depend_M += 1
|
|
25
|
cas d'un ddl de base: nom_variables(2) = X2 depend_M += 1
|
|
26
|
nb de variables independantes : 2
|
|
27
|
== >>> Fonction_nD::Definition_depend_M : valeur des indicateurs finaux
|
|
28
|
pour memoire: = 0 -> la fct ne depend pas de la position = -1 : la fct depend que de la position > 0 : la fct depend de la position mais pas seulement
|
|
29
|
depend_M = -1,depend_Mt = 0, depend_M0 = 0
|
|
30
|
utilisation du pipe nomme: fext_press_reception_Hz.FIFO pour la fonction externe fext_press
|
|
31
|
---- Fonction_externe_nD fext_press
|
|
32
|
arguments= Tableau :taille= 2 X1 X2
|
|
33
|
variables_globales_en_enumere= taille 1 compteur_iteration_algo_global
|
|
34
|
variables_globales_en_string= taille 0
|
|
35
|
utilisation du pipe nomme: fext_press_reception_Hz.FIFO pour la fonction externe fext_press
|
|
36
|
======== fin de la lecture, Projet::Lecture( ...===========
|
|
37
|
|
|
38
|
|
|
39
|
matrice masse principale:
|
|
40
|
stockage initial matrice masse --> diagonal, nbddl= 66
|
|
41
|
matrice masse secondaire:
|
|
42
|
stockage initial matrice masse --> diagonal, nbddl= 66
|
|
43
|
recalcul de la pseudo-masse (type: 0)
|
|
44
|
recalcul de la pseudo-masse (type: 0)
|
|
45
|
======================================================================
|
|
46
|
INCREMENT DE CHARGE : 1 intensite 1 t= 1 dt= 1
|
|
47
|
======================================================================
|
|
48
|
fonction: fext_press :
|
|
49
|
parametres d'appel: para(1)= 0.21132486540518708 para(2)= 0.21132486540518708
|
|
50
|
compteur_iteration_algo_global 0
|
|
51
|
hzpp: ouverture du tube en ecriture, ecriture sur le tube: fext_press_envoi_Hz.FIFO
|
|
52
|
|
|
53
|
ecriture de 3 reels
|
|
54
|
variable 1= 0.21132486540518708
|
|
55
|
variable 2= 0.21132486540518708
|
|
56
|
variable 3= 0
|
|
57
|
HZpp: fermeture du tube en ecriture: fext_press_envoi_Hz.FIFO
|
|
58
|
|
|
59
|
hzpp: ouverture du tube en lecture, lecture sur le tube: fext_press_reception_Hz.FIFO
|
|
60
|
|
|
61
|
lecture de 1 reels
|
|
62
|
resultat 1= 0
|
|
63
|
HZpp: fermeture du tube en lecture: fext_press_reception_Hz.FIFO
|
|
64
|
|
|
65
|
retour fonction: val(1)= 0
|
|
66
|
fonction: fext_press :
|
|
67
|
parametres d'appel: para(1)= 0.78867513459481287 para(2)= 0.21132486540518708
|
|
68
|
compteur_iteration_algo_global 0
|
|
69
|
hzpp: ouverture du tube en ecriture, ecriture sur le tube: fext_press_envoi_Hz.FIFO
|