libf/filtrez/parafilt.f90

module parafilt

  ! From filtrez/parafilt.h, v 1.1.1.1 2004/05/19 12:53:09

  ! La premiere fois que  le Gcm  rentrera  dans le Filtre ,
  ! il indiquera  les bonnes valeurs  de  nfilun , nflius, nfilvn  et 
  ! nfilvs  a  mettre .  Il suffira alors de changer ces valeurs dans
  ! Parameter  ci-dessus  et de relancer  le  run.

  implicit none

  INTEGER, PARAMETER:: nfilun=12, nfilus=11, nfilvn=12, nfilvs=12

end module parafilt
1	module parafilt
2
3	! From filtrez/parafilt.h, v 1.1.1.1 2004/05/19 12:53:09
4
5	! La premiere fois que le Gcm rentrera dans le Filtre ,
6	! il indiquera les bonnes valeurs de nfilun , nflius, nfilvn et
7	! nfilvs a mettre . Il suffira alors de changer ces valeurs dans
8	! Parameter ci-dessus et de relancer le run.
9
10	implicit none
11
12	INTEGER, PARAMETER:: nfilun=12, nfilus=11, nfilvn=12, nfilvs=12
13
14	end module parafilt