init Subroutine

subroutine init()

x方向格子点数 y方向格子点数 時間刻み幅 比熱比と関連定数 定数(計算速度性能に寄与するかはよくわからない)

Arguments

None

Calls

proc~~init~~CallsGraph proc~init init y y proc~init->y pris pris proc~init->pris dsign dsign proc~init->dsign x x proc~init->x cons cons proc~init->cons

Called by

proc~~init~~CalledByGraph proc~init init program~main main program~main->proc~init

Contents


Common Blocks

TypeAttributesNameInitial
real :: r0
real :: p0
real :: u0
real :: v0
real :: ru0
real :: rv0
real :: e0
TypeAttributesNameInitial
real :: r1
real :: p1
real :: u1
real :: v1
real :: ru1
real :: rv1
real :: e1
TypeAttributesNameInitial
real :: x(0:jmax+1,0:kmax+1)
real :: y(0:jmax+1,0:kmax+1)
TypeAttributesNameInitial
real :: cons(4,0:jmax+1,0:kmax+1)
TypeAttributesNameInitial
real :: pris(4,0:jmax+1,0:kmax+1)