Tcl Procedure for Reliability
Moderators: silvia, selimgunay, mhscott, Moderators
-
- Posts: 8
- Joined: Tue Jan 21, 2014 11:39 am
Tcl Procedure for Reliability
I have to perform reliability analysis of several different configurations of the same structure.
Since the problem is always the same I defined a procedure where the only inputs are R and S.
When I call the procedure I get the results once and the second time I get an error.
Here is the procedure
proc betaFORM {R S } {
pause
reliability
randomVariable 1 lognormal -mean $R -stdv [expr $R*.18]
randomVariable 2 gumbel -mean $S -stdv [expr $S*.1]
randomVariable 3 normal -mean 1.1 -stdv [expr 1.1*.06]
randomVariable 4 normal -mean 1. -stdv .05
randomVariable 5 normal -mean 1. -stdv .02
randomVariable 6 normal -mean 1. -stdv .1
parameter 1 randomVariable 1
parameter 2 randomVariable 2
parameter 3 randomVariable 3
parameter 4 randomVariable 4
parameter 5 randomVariable 5
parameter 6 randomVariable 6
performanceFunction 1 "\$par(1)-(\$par(2)*\$par(3)*\$par(4)*\$par(5)*\$par(6))"
functionEvaluator Tcl
gradientEvaluator FiniteDifference -pert 1000
startPoint Mean
runFOSMAnalysis barFOSM.out
probabilityTransformation Nataf
searchDirection iHLRF
reliabilityConvergenceCheck Standard -e1 1.0e-4 -e2 1.0e-4
stepSizeRule Fixed -stepSize 1.0
findDesignPoint StepSearch -maxNumIter 10
runFORMAnalysis barFORM.out
set beta $betaFORM(1)
puts "beta $beta"
return $beta
}
Since the problem is always the same I defined a procedure where the only inputs are R and S.
When I call the procedure I get the results once and the second time I get an error.
Here is the procedure
proc betaFORM {R S } {
pause
reliability
randomVariable 1 lognormal -mean $R -stdv [expr $R*.18]
randomVariable 2 gumbel -mean $S -stdv [expr $S*.1]
randomVariable 3 normal -mean 1.1 -stdv [expr 1.1*.06]
randomVariable 4 normal -mean 1. -stdv .05
randomVariable 5 normal -mean 1. -stdv .02
randomVariable 6 normal -mean 1. -stdv .1
parameter 1 randomVariable 1
parameter 2 randomVariable 2
parameter 3 randomVariable 3
parameter 4 randomVariable 4
parameter 5 randomVariable 5
parameter 6 randomVariable 6
performanceFunction 1 "\$par(1)-(\$par(2)*\$par(3)*\$par(4)*\$par(5)*\$par(6))"
functionEvaluator Tcl
gradientEvaluator FiniteDifference -pert 1000
startPoint Mean
runFOSMAnalysis barFOSM.out
probabilityTransformation Nataf
searchDirection iHLRF
reliabilityConvergenceCheck Standard -e1 1.0e-4 -e2 1.0e-4
stepSizeRule Fixed -stepSize 1.0
findDesignPoint StepSearch -maxNumIter 10
runFORMAnalysis barFORM.out
set beta $betaFORM(1)
puts "beta $beta"
return $beta
}
Re: Tcl Procedure for Reliability
Add the 'wipeReliability' command ... your error is probably due to multiply defined rv tags.
Was my answer helpful to you? https://www.buymeacoffee.com/mhscott
OpenSees courses: https://courses.silviasbrainery.com/
OpenSees 1-on-1 sessions: https://www.silviasbrainery.com/one-on-one-training
OpenSees blog: www.portwooddigital.com
OpenSees courses: https://courses.silviasbrainery.com/
OpenSees 1-on-1 sessions: https://www.silviasbrainery.com/one-on-one-training
OpenSees blog: www.portwooddigital.com
-
- Posts: 1
- Joined: Sat Mar 09, 2019 6:37 pm
- Contact:
Re: Tcl Procedure for Reliability
Thanks guys for this reliability analysis.
Indian Wedding Wearhttps://getethnic.com
-
- Posts: 1
- Joined: Tue Jun 04, 2019 10:51 pm
Re: Tcl Procedure for Reliability
polo pony, polo ponies, polo horse, polo horses, retired polo horse, retired polo horses, retired horses, retired horse, retired ponies, retired pony, therapeutic horses, therapeutic horse, therapeutic ponies, therapeutic pony, therapy ponies, therapy horse, therapy pony, therapy horses, non profit organization for horses, nonprofit for horses
ReplayPolo is dedicated to connecting retiring polo horses to their second careers in therapeutic riding, intercollegiate sports, and other therapy programs
https://replaypolo.com/
ReplayPolo is dedicated to connecting retiring polo horses to their second careers in therapeutic riding, intercollegiate sports, and other therapy programs
https://replaypolo.com/
-
- Posts: 6
- Joined: Thu Jun 06, 2019 3:18 pm
- Contact:
-
- Posts: 1
- Joined: Thu Oct 31, 2019 5:27 am
Re: Tcl Procedure for Reliability
The procedure is quite easy, I think that we can seamlessly perform the actions. Will be working on this.
Re: Tcl Procedure for Reliability
Thanks for the information.