~ubuntu-branches/ubuntu/precise/code-saturne/precise

« back to all changes in this revision

Viewing changes to include/base/alaste.h

  • Committer: Package Import Robot
  • Author(s): Sylvestre Ledru
  • Date: 2011-11-01 17:43:32 UTC
  • mto: (6.1.7 sid)
  • mto: This revision was merged to the branch mainline in revision 11.
  • Revision ID: package-import@ubuntu.com-20111101174332-tl4vk45no0x3emc3
Tags: upstream-2.1.0
ImportĀ upstreamĀ versionĀ 2.1.0

Show diffs side-by-side

added added

removed removed

Lines of Context:
1
 
!-------------------------------------------------------------------------------
2
 
 
3
 
!     This file is part of the Code_Saturne Kernel, element of the
4
 
!     Code_Saturne CFD tool.
5
 
 
6
 
!     Copyright (C) 1998-2009 EDF S.A., France
7
 
 
8
 
!     contact: saturne-support@edf.fr
9
 
 
10
 
!     The Code_Saturne Kernel is free software; you can redistribute it
11
 
!     and/or modify it under the terms of the GNU General Public License
12
 
!     as published by the Free Software Foundation; either version 2 of
13
 
!     the License, or (at your option) any later version.
14
 
 
15
 
!     The Code_Saturne Kernel is distributed in the hope that it will be
16
 
!     useful, but WITHOUT ANY WARRANTY; without even the implied warranty
17
 
!     of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
18
 
!     GNU General Public License for more details.
19
 
 
20
 
!     You should have received a copy of the GNU General Public License
21
 
!     along with the Code_Saturne Kernel; if not, write to the
22
 
!     Free Software Foundation, Inc.,
23
 
!     51 Franklin St, Fifth Floor,
24
 
!     Boston, MA  02110-1301  USA
25
 
 
26
 
!-------------------------------------------------------------------------------
27
 
 
28
 
!                              alaste.h
29
 
!===============================================================================
30
 
 
31
 
!  METHODE ALE - MOUVEMENT DE STRUCTURES EN COUPLAGE AVEC CODE_ASTER
32
 
 
33
 
! NTCAST : NUMERO D'ITERATION DE COUPLAGE AVEC CODE_ASTER
34
 
! NBASTE : NOMBRE DE STRUCTURES MOBILES
35
 
! NBFAST : NOMBRE DE FACES COUPLEES
36
 
! NBNAST : NOMBRE DE NOEUDS COUPLES
37
 
! ISYNCP : INDICATEUR D'IMPRESSION DES RESULTATS DES DEUX CODES
38
 
!          AUX MEMES INSTANTS (SORTIE ENSIGHT POUR ASTER)
39
 
! ASDDLF : BLOCAGE DES DDL DE FORCE
40
 
! ASDDLC : BLOCAGE DES DDL CINEMATIQUES
41
 
 
42
 
integer           ntcast
43
 
integer           nbaste, nbfast, nbnast
44
 
integer           iforas
45
 
integer           isyncp
46
 
integer           asddlf(3,nastmx), asddlc(3,nastmx)
47
 
 
48
 
common / iaster / ntcast, nbaste, nbfast, nbnast,                 &
49
 
                  iforas,                                         &
50
 
                  isyncp,                                         &
51
 
                  asddlf, asddlc
52
 
 
53
 
! FIN
54