TAILIEUCHUNG - Mechanics Of Saouma Part 14

Tham khảo tài liệu 'mechanics of saouma part 14', kỹ thuật - công nghệ, cơ khí - chế tạo máy phục vụ nhu cầu học tập, nghiên cứu và làm việc hiệu quả | er Implementation 25 DOUBLEPRECISION hp barhp nEon DOUBLEPRECISION jnks INTEGER PARAMETER mequil 500 INTEGER equil INTEGER PARAMETER assoc 1 INTEGER ninc INTEGER i j k l flag INTEGER local_inc INTEGER kp_flag CHARACTER LEN 80 value INTEGER stg_len ----------------------------------- Allocate space for stress history ------------------------------------- CALL alloc8 Logfid nstrain ninc2 pthist1 ----------------------------------- Allocate space for strain history ------------------------------------ CALL alloc8 Logfid nstrain ninc2 pthist2 ------------------------------------------- Allocate space for plastic strain history ------------------------------------------- CALL alloc8 Logfid nstrain ninc2 ptplasstn ---------------------------------------------------- Allocate and initialize elastic stiffness tensor ---------------------------------------------------- ALLOCATE Eo_ten 3 3 3 3 CALL el_ten1 young pois Eo_ten ------------------------------------------- Allocate and initialize identity matrix ------------------------------------------- ALLOCATE iden 3 3 DO i 1 3 DO j 1 3 IF i .eq. j THEN iden i j ELSE iden i j END IF END DO END DO ------------------------------------------------------------- Allocate plastic strain and tensile plastic strain tensor ------------------------------------------------------------- ALLOCATE plastic_eps 3 3 ninc2 ALLOCATE t_plastic_eps 3 3 ninc2 ----------------------------------- If required allocate space for localization analysis results ----------------------------------- IF lclflg .eq. 1 THEN ALLOCATE local_data1 91 10 ninc2 ALLOCATE local_data2 ninc2 END IF local_inc 0 Victor Saouma Mechanics of Materials II 3D PLASTICITY -------------------------------- Initialize flags for pst file -------------------------------- pstpleps 0 psteff 0 ------------------------------------------------------- Initialize plasticity hardening softening parameters ------------------------------------------------------- limit_ep_k ko_dp .

TỪ KHÓA LIÊN QUAN
TAILIEUCHUNG - Chia sẻ tài liệu không giới hạn
Địa chỉ : 444 Hoang Hoa Tham, Hanoi, Viet Nam
Website : tailieuchung.com
Email : tailieuchung20@gmail.com
Tailieuchung.com là thư viện tài liệu trực tuyến, nơi chia sẽ trao đổi hàng triệu tài liệu như luận văn đồ án, sách, giáo trình, đề thi.
Chúng tôi không chịu trách nhiệm liên quan đến các vấn đề bản quyền nội dung tài liệu được thành viên tự nguyện đăng tải lên, nếu phát hiện thấy tài liệu xấu hoặc tài liệu có bản quyền xin hãy email cho chúng tôi.
Đã phát hiện trình chặn quảng cáo AdBlock
Trang web này phụ thuộc vào doanh thu từ số lần hiển thị quảng cáo để tồn tại. Vui lòng tắt trình chặn quảng cáo của bạn hoặc tạm dừng tính năng chặn quảng cáo cho trang web này.