Changeset 1611 for LMDZ5/trunk/libf/bibio

Timestamp:

Jan 25, 2012, 3:31:54 PM (13 years ago)

Author:

lguez

Message:

Avoid aliasing in "inidissip".
Correct misplaced continuation lines in "initdynav".

File:

• LMDZ5/trunk/libf/bibio/initdynav.F90 (modified) (1 diff)

LMDZ5/trunk/libf/bibio/initdynav.F90

@@ -117 +117 @@
   !  Appel a histvert pour la grille verticale
 
-  call histvert(histaveid,'presnivs','Niveaux Pression &
-       approximatifs','mb',llm, presnivs/100., zvertiid,'down')
-  call histvert(histuaveid,'presnivs','Niveaux Pression &
-       approximatifs','mb',llm, presnivs/100., zvertiid,'down')
-  call histvert(histvaveid,'presnivs','Niveaux Pression &
-       approximatifs','mb',llm, presnivs/100., zvertiid,'down')
+  call histvert(histaveid,'presnivs','Niveaux Pression approximatifs','mb', &
+       llm, presnivs/100., zvertiid,'down')
+  call histvert(histuaveid,'presnivs','Niveaux Pression approximatifs','mb', &
+       llm, presnivs/100., zvertiid,'down')
+  call histvert(histvaveid,'presnivs','Niveaux Pression approximatifs','mb', &
+       llm, presnivs/100., zvertiid,'down')
 
   !  Appels a histdef pour la definition des variables a sauvegarder