About recorder in the circulation

[cicilixiaoran]

Hello, everyone, Now I have some problem about recorder in the circulation, for example:
recorder Node -file $dataDir/DFree.out -time -node 2 -dof 1 2 3 disp;
foreach Dmax $iDmax {
set iDstep [GeneratePeaks $Dmax $Dincr $CycleType $Fact];
for {set i 1} {$i <= $Ncycles} {incr i 1} {
set zeroD 0
set D0 0.0
foreach Dstep $iDstep {
set D1 $Dstep
set Dincr [expr $D1 - $D0]
integrator DisplacementControl $IDctrlNode $IDctrlDOF $Dincr
analysis Static
set ok [analyze 1]
recorder Node -file $dataDir/DFree.out -time -node 2 -dof 1 2 3 disp;
set outFileIDDFree [open data/DFree.out r]
set DFree [read $outFileIDDFree]
close $outFileIDDFree
set DFreechu [lindex $DFree 1]
set outFileIDDFreechu [open data/DFreechu.out "a"]
puts $outFileIDDFreechu $DFreechu;
close $outFileIDDFreechu
if {$ok != 0} {
if {$ok != 0} {
puts "Trying Newton with Initial Tangent .."
test NormDispIncr $TolStatic 2000 0
algorithm Newton -initial
set ok [analyze 1]
test $testTypeStatic $TolStatic $maxNumIterStatic 0
algorithm $algorithmTypeStatic
}
if {$ok != 0} {
puts "Trying Broyden .."
algorithm Broyden 8
set ok [analyze 1 ]
algorithm $algorithmTypeStatic
}
if {$ok != 0} {
puts "Trying NewtonWithLineSearch .."
algorithm NewtonLineSearch 0.8
set ok [analyze 1]
algorithm $algorithmTypeStatic
}
if {$ok != 0} {
set putout [format $fmt1 "PROBLEM" $IDctrlNode $IDctrlDOF [nodeDisp $IDctrlNode $IDctrlDOF] $LunitTXT]
puts $putout
return -1
}; # end if
}; # end if
set D0 $D1;
}; # end Dstep
}; # end i
}; # end of iDmaxCycl

I want to record the dfree for one time step, but the operation results of above code is that DFreechu.out record the results of forepart loading, but results of back part loading are constant, and the DFree.out record the results(not constant) of back part loading. Why?
How to record the dfree for one time step in the circulation in the whole process of loading? Thank you!

[vesna]

I do not quite understand what you are trying to do. Would you explain the whole process step by step? That way I may be able to help you.

[cicilixiaoran]

Hello vesna, thank you very much for your reply,this problem is solved because of your answer of my next problem"About changed damping ratio for every one time step".Thank you very much!