/[lmdze]/trunk/Sources/bibio/inithist.f
ViewVC logotype

Diff of /trunk/Sources/bibio/inithist.f

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 66 by guez, Thu Sep 20 13:00:41 2012 UTC revision 67 by guez, Tue Oct 2 15:50:56 2012 UTC
# Line 82  contains Line 82  contains
82    
83      ! Appel a histvert pour la grille verticale      ! Appel a histvert pour la grille verticale
84    
85      call histvert(histid, 'presnivs', 'Niveaux pression','mb', llm, &      call histvert(histid, 'presnivs', 'Niveaux pression','mb', presnivs/100., &
86             zvertiid,'down')
87        call histvert(histvid, 'presnivs', 'Niveaux pression','mb', &
88           presnivs/100., zvertiid,'down')           presnivs/100., zvertiid,'down')
89      call histvert(histvid, 'presnivs', 'Niveaux pression','mb', llm, &      call histvert(histuid, 'presnivs', 'Niveaux pression','mb', &
          presnivs/100., zvertiid,'down')  
     call histvert(histuid, 'presnivs', 'Niveaux pression','mb', llm, &  
90           presnivs/100., zvertiid,'down')           presnivs/100., zvertiid,'down')
91    
92      ! Appels a histdef pour la definition des variables a sauvegarder      ! Appels a histdef pour la definition des variables a sauvegarder
Legend:
Removed from v.66  
changed lines
  Added in v.67
  ViewVC Help
Powered by ViewVC 1.1.21