Kalker_code.rar_4 3 2 1_Kalker CONTACT_contact fortran_contact

########################################### 2009년 4월 15일, UST박사과정 조연호 작성 ########################################## LIN은 KALKER의 LINERLIZED CREEP THEORY를 이용한 CREEP FORCE계산 프로그래이다 원본 코드는 [1] "USER'S MANUAL FOR PROGRAM FOR CALCULATION OF KALERR'S LINEAR CREEP COEFFICIENT"에서 발췌함 - MARCH.1979. BY I.HAQUE, E. H. LAW ############ 사용법 ############################ 1. fort.1 입력파일 작성 2. LIN.FOR를 이용하여 컴파일 한 LIN.EXE를 실행시키다. 3. fort.3 파일에 계산 결과가 저장됨 4. 계산결과에서 원하는 결과를 확인 ################################################ ########### 입력 파일 작성 방법 ################# [1]의 13페이지에 기술된 inprt format에 맞도록 작성함. --------------------------------------------------- card# coo.# input parameter format --------------------------------------------------- 1-14 PINV(1/R1') 5E 14.5 1 15-28 RPINV(1/R2') 29-42 SMR(r) 43-56 P(NORMAL P) 57-70 DELP(DELTA P) ----------------------------------------------------- 2 1-14 ROLRI(1/R2) E14.5 ----------------------------------------------------- 3 1-14 PMAX(MAXIMUM P) E14.5 ----------------------------------------------------- 1-14 XNU1(POISSON1) 4 15-28 E1(YOUNG'S M1) 3E14.5 29-42 G1(SHEAR M1) ----------------------------------------------------- 1-14 XNU2(POISSON2) 5 15-28 E2(YOUNG'S M2) 3E14.5 29-42 G2(SHEAR M2) ----------------------------------------------------- 6 1-14 CTANGL(CANTACT ANGLE) E14.5 ----------------------------------------------------- EXAMPLE 1 ########### CUT HEARE ############################## 0, 3.1324, 1.375, 11080.0, 1890.0 0.5714 14860.0 0.24, 0.3E+8, 0.12E+8 0.24, 0.3E+8, 0.12E+8 0.06932 ##################################################### EXAMPLE 2 ########### CUT HEARE ############################## -0.60654, 4.1514, 1.36904, 11080.0, 0.0 0.0 11080.0 0.24, 0.3E+8, 0.12E+8 0.24, 0.3E+8, 0.12E+8 0.0