02.04.2013 Views

Welcome to Adams/Solver Subroutines - Kxcad.net

Welcome to Adams/Solver Subroutines - Kxcad.net

Welcome to Adams/Solver Subroutines - Kxcad.net

SHOW MORE
SHOW LESS

You also want an ePaper? Increase the reach of your titles

YUMPU automatically turns print PDFs into web optimized ePapers that Google loves.

Callng Sequence<br />

CALL SHF (x, x0, a, w, phi, b, iord, value, errflg)<br />

Input Arguments<br />

Output Arguments<br />

Extended Definition<br />

The following equation defines SHF:<br />

STEP<br />

STEP approximates a step function with a cubic polynomial.<br />

Use<br />

Called By<br />

Any user-written subroutine<br />

<strong>Welcome</strong> <strong>to</strong> <strong>Adams</strong>/<strong>Solver</strong> <strong>Subroutines</strong><br />

x A double-precision variable that specifies the independent variable.<br />

x0 A double-precision variable that specifies a shift in the independent variable.<br />

a A double-precision variable that specifies the amplitude of the harmonic<br />

function.<br />

w A double-precision variable that specifies the frequency of the sine function.<br />

The variable must be in radians per unit of the independent variable.<br />

phi A double-precision variable that specifies a phase shift in the sine function.<br />

The variable phi must be in radians.<br />

b A double-precision variable that specifies the average value of displacement.<br />

iord An integer variable that defines the order of the derivative that SHF is <strong>to</strong><br />

return. The order is usually zero, but it can be one or two.<br />

errflg A logical (true or false) variable that SHF returns <strong>to</strong> the calling subroutine.<br />

If SHF detects an error in the subroutine call statement, it sets errflg <strong>to</strong> true<br />

before it returns errflg <strong>to</strong> the calling subroutine.<br />

value A double-precision value the subroutine returns. The value returned<br />

depends on IORD as follows<br />

a ⋅sin<br />

( w ⋅(<br />

x – x0) – φ ) + b<br />

85

Hooray! Your file is uploaded and ready to be published.

Saved successfully!

Ooh no, something went wrong!