source: trunk/SOURCES/notracer_mod.f90 @ 159

Last change on this file since 159 was 4, checked in by dumas, 10 years ago

initial import GRISLI trunk
File size: 499 bytes
Line 
1
2! routine appele par le main (step)
3! routine qui ne fait rien (qd on ne veut pas utiliser les tracers
4
5module notracer_mod 
6
7  use tracer_vars  ! pour ne pas avoir de probleme avec les sorties ncdf
8  implicit none
9
10  contains
11
12  subroutine init_tracer
13    tdep(:,:,:)=0.
14    xdep(:,:,:)=0.
15    ydep(:,:,:)=0.
16
17 ! pour ecrire les recovery avec ou sans les tableaux traceurs
18    itracer = 0
19  end subroutine init_tracer
20 
21
22  subroutine tracer
23  end subroutine tracer
24 
25   
26end module notracer_mod
Note: See TracBrowser for help on using the repository browser.