1 : C DFHARDCT SOURCE AM 12/02/27 23:39:36 7289 2 : FUNCTION dfhardCT(rkappait) 3 : 4 : c This subroutine calculates the derivative of the tensile 5 : c hardening function with respect to rkappait 6 : 7 : IMPLICIT REAL*8 (A-B,D-H,O-Z) 8 : 9 : dfhardct = 0. * rkappait 10 : 11 : RETURN 12 : END 13 : 14 : 15 :
© Cast3M 2003 - All rights reserved.
Disclaimer