Syntax
array set eigenmodes [ABRESULTS schedid EIGENMODE GETCOUNT ATDAY day]
set modeids [ABRESULTS schedid EIGENMODE GET ATDAY day]
array set eigenmode [ABRESULTS schedid EIGENMODE GET imode ATDAY day]
Description
Query the number of Eigenmodes at a specified day
Query the list of Eigenmodes at a specified day
Query the Daten-ID of the Eigenmodes at a specified day
Argument |
Dimension |
Meaning |
schedid |
OBJID |
Schedule-ID |
EIGENMODE |
KEYWORD |
Result type of query |
GETCOUNT |
KEYWORD |
Query number of modes |
GET |
KEYWORD |
Query data |
ATDAY |
KEYWORD |
Combination result of a defined day is queried |
day||FINAL |
INT||KEYWORD |
Defined day or calculated end day (taking into account the end creeping) |
Return array for [ABRESULTS schedid EIGENMODE GETCOUNT ...]
Array item |
Dimension |
Meaning |
error |
INT |
Error code |
info |
TEXT |
Error information |
count |
INT |
Number of the eigenvectors stored |
Return for [ABRESULTS ... GET ATDAY ...]
Return |
Dimension |
Meaning |
dataids |
LIST |
List of data IDs of Eigenmodes |
Rückgabefeld für [ABRESULTS schedid EIGENMODE GET imode ATDAY day]
Array item |
Dimension |
Meaning |
error |
INT |
Error code |
info |
TEXT |
Error information |
id |
OBJID |
Data ID of specified mode |
Scopes
All
Examples
# Eigenmodes
# ----------
puts $outfile ""
puts $outfile " Schedule 'Schedule1' Eigenmodes"
puts $outfile " ----------------------------------"
array set nmode [ABRESULTS "Schedule1" EIGENMODE GETCOUNT ATDAY FINAL]
set format9 " Number of modes at day FINAL: %6s"
puts $outfile ""
puts $outfile [format $format9 $nmode(count)]
set modes [ABRESULTS "Schedule1" EIGENMODE GET ATDAY FINAL]
puts $outfile ""
puts $outfile " Mode"
puts $outfile " --------"
set format10 " %8s"
foreach modeID $modes {
array unset mode
array set mode [ABRESULT $modeID EIGENMODE GET]
puts $outfile [format $format10 $mode(name)]
}
It is assumed that a text file outfile has been opened for writing . The results are written formatted into the text file.
The output is project-dependent and can look like the following, for example:
Schedule 'Schedule1' Eigenmodes
----------------------------------
Number of modes at day FINAL: 40
Mode
--------
000001
000002
000003
000004
000005
000006
000007
.......
Output for script above.
puts $outfile ""
puts $outfile " Mode Omega (phi)M(phi) (phi)C(phi)"
puts $outfile " ---------------------------------------------------"
set format10 " %6d %14.5e %14.5e %14.5e"
for { set imode 1 } { $imode <= $nmode(count) } { incr imode } {
array unset modei
array set modei [ABRESULTS $sched1 EIGENMODE GET $imode ATDAY FINAL]
array unset mode
array set mode [ABRESULT $modei(id) EIGENMODE GET]
puts $outfile [format $format10 $imode $mode(omega) $mode(gamma) $mode(xsi)]
}
It is assumed that a text file outfile has been opened for writing . The results are written formatted into the text file.
The output is project-dependent and can look like the following, for example:
Mode Omega (phi)M(phi) (phi)C(phi)
---------------------------------------------------
1 4.68570e+00 1.60200e+03 0.00000e+00
2 5.12270e+00 3.28300e+03 0.00000e+00
3 5.64560e+00 5.55550e+03 0.00000e+00
4 1.05430e+01 1.51850e+03 0.00000e+00
5 1.69730e+01 1.30980e+03 0.00000e+00
6 2.83860e+01 1.80950e+03 0.00000e+00
7 2.88940e+01 1.67150e+03 0.00000e+00
......
Output for script above.
|
(C) ALLPLAN GmbH |
Privacy policy |