!================================================================
! $@0l<!85J|<MJ?9UBg5$7W;;(B; $@%Q%i%a!<%?%b%8%e!<%k(B
!
! 97/01/25 $@>.9b@5;L(B
!================================================================
MODULE para_module
IMPLICIT NONE
PUBLIC

!--$@7W;;%Q%i%a!<%?(B

	INTEGER,PARAMETER :: zdim = 1001! $@1tD>2rA|EY(B

!--$@?t3X%Q%i%a!<%?(B

	REAL,PARAMETER :: pi = 3.141592	! $@1_<~N((B

!--$@J*M}%Q%i%a!<%?(B

	REAL,PARAMETER :: sig = 5.67e-8
					! $@%9%F%U%!%s(B-$@%\%k%D%^%sDj?t(B(W/m^2K^4)
	REAL,PARAMETER :: slp = 1.e+5	! $@COI=5$05(B(Pa) 
	REAL,PARAMETER :: kai = 1.e-4	! $@5[<}78?t(B(1/kg.m)
	REAL,PARAMETER :: ga  = 10.	! $@=ENO2CB.EY(B(m/sec^2)
	REAL,PARAMETER :: uf0 = 240.	! $@Bg5$>eC<>e8~$-J|<M(B(W/m^2)

	
END MODULE para_module



















