/[lmdze]/trunk/phylmd/Radlwsw/raddimlw.f90
ViewVC logotype

Contents of /trunk/phylmd/Radlwsw/raddimlw.f90

Parent Directory Parent Directory | Revision Log Revision Log


Revision 328 - (show annotations)
Thu Jun 13 14:40:06 2019 UTC (4 years, 11 months ago) by guez
File size: 279 byte(s)
Change all `.f` suffixes to `.f90`. (The opposite was done in revision
82.)  Because of change of philosopy in GNUmakefile: we already had a
rewritten rule for `.f`, so it does not make the makefile longer to
replace it by a rule for `.f90`. And it spares us options of
makedepf90 and of the compiler. Also we prepare the way for a simpler
`CMakeLists.txt`.

1 module raddimlw
2
3 ! From phylmd/raddimlw.h,v 1.1.1.1 2004/05/19 12:53:09
4
5 implicit none
6
7 INTEGER NUA
8 PARAMETER (NUA=24)
9 INTEGER NTRA
10 PARAMETER (NTRA=15)
11 INTEGER Ninter
12 PARAMETER (Ninter=6)
13 INTEGER NG1, NG1P1
14 PARAMETER (NG1=2, NG1P1=NG1+1)
15
16 end module raddimlw

Properties

Name Value
svn:eol-style native

  ViewVC Help
Powered by ViewVC 1.1.21