[Dda-cvs] ntdda/src timestep.c,1.41,1.42
Status: Beta
Brought to you by:
doolin
From: Roozbeh <rgr...@us...> - 2008-04-10 00:58:57
|
Update of /cvsroot/dda/ntdda/src In directory sc8-pr-cvs12.sourceforge.net:/tmp/cvs-serv24775 Modified Files: timestep.c Log Message: Fixed computeTimeStep() subroutine to solve the automatic time computing which was caused hanging up during dynamic analysis Index: timestep.c =================================================================== RCS file: /cvsroot/dda/ntdda/src/timestep.c,v retrieving revision 1.41 retrieving revision 1.42 diff -C2 -d -r1.41 -r1.42 *** timestep.c 20 Dec 2002 05:20:02 -0000 1.41 --- timestep.c 10 Apr 2008 00:58:50 -0000 1.42 *************** *** 558,562 **** a1=a3; ! a2 = globalTime[ad->cts-1][1]*maxdisplacement*domainscale/(ad->delta_t); if (analysisType == STATIC) /* analysisType == 0 is static type analysis, */ --- 558,567 ---- a1=a3; ! //globalTime[i][0]: cumulative time from 0 seconds; ! //globalTime[i][1]: displacement ratios??? ! //the globalTime[ad->cts-1][1] term which is displacement ratio ! //has been changed to cumulative time (globalTime[ad->cts-1][0]) ! //by Roozbeh ! a2 = globalTime[ad->cts-1][0]*maxdisplacement*domainscale/(ad->delta_t); // Changed by Roozbeh if (analysisType == STATIC) /* analysisType == 0 is static type analysis, */ |