- Timestamp:
- Jun 25, 2007, 1:05:54 PM (17 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
LMDZ4/trunk/libf/grid/dimension/makdim
r764 r794 6 6 fichdim=dimensions${list}.t${nqmx} 7 7 8 if [ ! -f $fichdim -o ! -f ${fichdim}_90] ; then8 if [ ! -f $fichdim -o ] ; then 9 9 # si le fichier de dimensions n'existe pas, on le cree 10 10 … … 48 48 49 49 cat << EOF > $fichdim 50 c-----------------------------------------------------------------------51 c INCLUDE 'dimensions.h'52 c53 c dimensions.h contient les dimensions du modele54 c ndm est tel que iim=2**ndm55 c nqmx est la dimension de la variable traceur q56 c-----------------------------------------------------------------------57 58 INTEGER iim,jjm,llm,ndm59 60 PARAMETER (iim= $im,jjm=$jm,llm=$lm,ndm=$ndm)61 62 integer nqmx63 parameter (nqmx=$nqmx)64 65 c-----------------------------------------------------------------------66 EOF67 68 cat << EOF > ${fichdim}_9069 50 !----------------------------------------------------------------------- 70 ! INCLUDE 'dimensions 90.h'51 ! INCLUDE 'dimensions.h' 71 52 ! 72 ! dimensions 90.h contient les dimensions du modele53 ! dimensions.h contient les dimensions du modele 73 54 ! ndm est tel que iim=2**ndm 74 55 ! nqmx est la dimension de la variable traceur q … … 84 65 !----------------------------------------------------------------------- 85 66 EOF 67 86 68 fi 87 69 88 70 \rm ../dimensions.h 89 \rm ../dimensions90.h90 71 tar cf - $fichdim | ( cd .. ; tar xf - ; mv $fichdim dimensions.h ) 91 tar cf - ${fichdim}_90 | ( cd .. ; tar xf - ; mv ${fichdim}_90 dimensions90.h )
Note: See TracChangeset
for help on using the changeset viewer.