Description This subroutine queries an existing Extended Harvey-Shack scatter model for its T_HARVEYSHACKEXTENDEDSCATTER data structure.
Syntax GetHarveyShackExtendedScatter sNode, tScatter
Parameters sNode As Long Node number of the scatter model being queried.
tScatter As T_HARVEYSHACKEXTENDEDSCATTER After being passed into the subroutine, this structure variable contains the scatter model parameters.
Example The example below queries an Extended Harvey-Shack scatter model for its parameters and prints them to the output window.
Sub Main Dim sNode As Long sNode = FindScatter( "Example EHS" )
Dim tScatter As T_HARVEYSHACKEXTENDEDSCATTER GetHarveyShackExtendedScatter( sNode, tScatter )
Print tScatter.name & " Parameters" Print "b0" & vbTab & tScatter.b0 Print "L" & vbTab & tScatter.l Print "S" & vbTab & tScatter.S Print "P" & vbTab & tScatter.P Print "Q" & vbTab & tScatter.Q
End Sub
See Also InitHarveyShackExtendedScatter
|