intp Subroutine

subroutine intp()

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

Arguments

None

Calls

proc~~intp~~CallsGraph proc~intp intp pris pris proc~intp->pris dsign dsign proc~intp->dsign pyl pyl proc~intp->pyl pxr pxr proc~intp->pxr pxl pxl proc~intp->pxl pyr pyr proc~intp->pyr

Called by

proc~~intp~~CalledByGraph proc~intp intp program~main main program~main->proc~intp

Contents


Common Blocks

TypeAttributesNameInitial
real :: pris(4,0:jmax+1,0:kmax+1)
TypeAttributesNameInitial
real :: pxl(4,0:jmax+1,0:kmax+1)
real :: pxr(4,0:jmax+1,0:kmax+1)
real :: pyl(4,0:jmax+1,0:kmax+1)
real :: pyr(4,0:jmax+1,0:kmax+1)