Accueil | Cast3M

   1 : $$$$ ROTA_IMP NOTICE  PV090527  25/10/06    21:15:03     9885           
   2 :                                              DATE     25/10/06
   3 : 
   4 :    Procedure ROTA_IMP                          Voir aussi :
   5 :      ---------------  
   6 :    RIG1 CH1 = ROTA_IMP ANGLE POIN1 POIN2 MAIL1
   7 : 
   8 : 
   9 : 
  10 :     Objet :
  11 :     _______
  12 : 
  13 :   La procedure ROTA_IMP construit la raideur RIG1 et le champ de deplacement
  14 :   impose CH1 permettant d'imposer au maillage MAIL1 une condition de rotation
  15 :   d'angle ANGLE autour de l'axe defini par les points POINT1 et POINT2.
  16 : 
  17 : 
  18 :   Remarques:
  19 : 
  20 :   La matrice et le champ dependent de l'angle. Il faut donc les reevaluer 
  21 :   pour chaque nouvel angle
  22 : 
  23 :   L'angle doit etre strictement compris entre -90 et +90.
  24 : 
  25 :   Exemple d'utilisation dans PERSO1 pour PASAPAS:
  26 : 
  27 : 
  28 : DEBPROC PERSO1  latab;
  29 : 
  30 : WTAB = latab.'WTABLE';
  31 : form latab.continuation.deplacements;
  32 : clx0 fmpx0 = rota_imp angle mpx0 px1 px0;
  33 : WTAB.'BLOCAGES_MECANIQUES' = CLX0 'ET' ...  ;
  34 : WTAB.'CHARGEMENT' =
  35 :     (char 'DINCR' fmpx100 evch1) et ...     ;
  36 : form latab.wtable.for0;
  37 : 
  38 : finproc;
  39 : 
  40 : $$$
  41 :  
  42 :