UPP (develop)
Loading...
Searching...
No Matches
svptbl.f
Go to the documentation of this file.
1
3 module svptbl_mod
4!---------------------------------------------------------------------
5
6 implicit none
7!
8 integer,PARAMETER :: nx=7501
9 real c1xpvs0
10 real c2xpvs0
11 real c1xpvs
12 real c2xpvs
13 real tbpvs(nx)
14 real tbpvs0(nx)
15!
16 end module svptbl_mod