검색어 입력폼

[ 수치해석 ] 포트란 간극수압

저작시기 2007.12 |등록일 2013.04.28 한글파일한글 (hwp) | 3페이지 | 가격 1,500원

소개글

Crank-Nicolson 방법을 이용한 간극수압 구하기 (포트란 코딩)

목차

없음

본문내용

Term Project 2) 그림과 같은 N.C Clay가 10m 깊이로 분포되어있다. Clay층이 50%압밀도를 보일때의 간극수압 분포를 그리시오.
(Crank-Nicolson 방법을 이용,r=1)

<중 략>

err=abs(U(i,j)-oldval)
if (err>=amax) then
amax = err
end if
end do
end do

if (amax>=0.001) then
goto 10
end if

write(1,50) ((U(i,j),j=0,15 ),i=0,10)
50 format(16(F11.1,1x))
close(1)

참고 자료

없음
다운로드 맨위로