Parent Directory | Revision Log | Patch
revision 19 by guez, Fri Aug 1 15:24:12 2008 UTC | revision 20 by guez, Wed Oct 15 16:19:57 2008 UTC | |
---|---|---|
# | Line 187 c ncum est la frequence de stokage en | Line 187 c ncum est la frequence de stokage en |
187 | ||
188 | if (i_sortie.eq.1) then | if (i_sortie.eq.1) then |
189 | file='dynzon' | file='dynzon' |
190 | call inigrads(ifile | call inigrads(ifile ,(/0./),180./pi,0.,0.,rlatv,-90.,90., |
191 | s ,(/0./),180./pi,0.,0.,rlatv,-90.,90.,180./pi | $ 180./pi ,presnivs,1. ,dt_cum,file,'dyn_zon ') |
s ,presnivs,1. | ||
s ,dt_cum,file,'dyn_zon ') | ||
192 | endif | endif |
193 | ||
194 | nom(itemp)='T' | nom(itemp)='T' |
|
ViewVC Help | |
Powered by ViewVC 1.1.21 |