source: trunk/LMDZ.GENERIC/libf/grid/dimension/makntrac @ 937

Last change on this file since 937 was 135, checked in by aslmd, 14 years ago

CHANGEMENT ARBORESCENCE ETAPE 2 -- NON COMPLET

  • Property svn:executable set to *
File size: 630 bytes
Line 
1fichntrac=ntraceur.$1
2
3if [ ! -f $fichntrac ] ; then
4# si le fichier de dimensions n'existe pas, on le cree
5
6cat << EOF > $fichntrac
7c-----------------------------------------------------------------------
8c   INCLUDE 'ntraceur.h'
9c
10c   ntraceur.h contient la dimension de la variable traceur q
11c   Generalement egale au nombre de traceur.
12c-----------------------------------------------------------------------
13
14      INTEGER nqmx
15
16      PARAMETER (nqmx=$1)
17
18c-----------------------------------------------------------------------
19EOF
20fi
21
22\rm ../ntraceur.h
23tar cf - $fichntrac | ( cd .. ; tar xf - ; mv $fichntrac ntraceur.h )
Note: See TracBrowser for help on using the repository browser.