Welcome to Adams/Solver Subroutines - Kxcad.net

More documents

Recommendations

Info

194 Adams/Solver Use Corresponding Command Calling Sequence SUBROUTINE SAVSUB(iunit, errflg) Input Arguments iunit An integer variable that contains the FORTRAN IO unit of the Adams/Solver save file. Adams/Solver opens the save file as sequential and unformatted. You may store data in the save file by writing it to this unit with an unformatted FORTRAN WRITE statement. Output Argument errflg A logical variable that indicates to Adams/Solver that an error has occurred while saving user data. If you set errflg to true, Adams/Solver writes an error message to the screen and to the message file. Tip: The most straightforward way to reinitialize user-written subroutines might be to collect the necessary variables in a COMMON block, use SAVSUB to write them to the save file, and RELSUB to read them back from the save file. Caution: RELSUB must read data from the save file in the same order in which SAVSUB wrote the data. Structure A sample structure for SAVSUB is shown next. The comments describe how the subroutine works. SUBROUTINE SAVSUB(IUNIT, ERRFLG) C C === Type and dimension statements =================== C C --- External variable definitions ------------------- C INTEGER IUNIT LOGICAL ERRFLG C C IUNIT FORTRAN IO unit attached to Save File C ERRLFG used to signal problems back to ADAMS C
Welcome to Adams/Solver Subroutines C --- COMMON Blocks ----------------------------------- C COMMON... C C === Executable code ================================= C C Write out the information which appears in the COMMON C blocks, through which this routine shares information C with other user-written subroutines. C WRITE (IUNIT) ... C RETURN END Example For an example of this subroutine, see savsub.f. SENSUB The SENSUB evaluation subroutine computes the values sensed by a SENSOR statement (C++ or FORTRAN). SENSUB is optional. You only need it if you do not want to use a function expression in the SENSOR statement. Use Corresponding Statement Calling Sequence SUBROUTINE SENSUB (id, time, par, npar, iflag, value) 195
Page 1 and 2:
Welcome to Adams/Solver Subroutines
Page 3 and 4:
Compilers and Linkers Welcome to Ad
Page 5 and 6:
Utility Subroutines About Utility S
Page 7 and 8:
Subroutine: Does the following: Uns
Page 9 and 10:
Page 11 and 12:
Input Arguments Welcome to Adams/So
Page 13 and 14:
RETURN END AKISPL Welcome to Adams/
Page 15 and 16:
Page 17 and 18:
Page 19 and 20:
Page 21 and 22:
Use Called By Any user-written subr
Page 23 and 24:
T1( x - x0) = x - x0 CUBSPL , Welco
Page 25 and 26:
Output Arguments Extended Definitio
Page 27 and 28:
Extended Definition Welcome to Adam
Page 29 and 30:
Input Arguments Output Arguments We
Page 31 and 32:
Input Arguments Output Arguments Ex
Page 33 and 34:
Page 35 and 36:
Use Welcome to Adams/Solver Subrout
Page 37 and 38:
GETCPU retrieves CPU time used so f
Page 39 and 40:
GETMOD returns the current analysis
Page 41 and 42:
Use Called by Any user-written subr
Page 43 and 44:
Prerequisite Welcome to Adams/Solve
Page 45 and 46:
Page 47 and 48:
Page 49 and 50:
C C Inputs: C INTEGER ID C C Output
Page 51 and 52:
Page 53 and 54:
Page 55 and 56:
Output Arguments Welcome to Adams/S
Page 57 and 58:
C = [-A-1B] Welcome to Adams/Solver
Page 59 and 60:
Output Arguments Welcome to Adams/S
Page 61 and 62:
Prerequisite STRING statement in da
Page 63 and 64:
Prerequisites None Calling Sequence
Page 65 and 66:
function. Welcome to Adams/Solver S
Page 67 and 68:
Calling Sequence CALL IMPACT (x, x'
Page 69 and 70:
Output Arguments Extended Definitio
Page 71 and 72:
Input Argument Welcome to Adams/Sol
Page 73 and 74:
Input Argument Welcome to Adams/Sol
Page 75 and 76:
Page 77 and 78:
Use Called By SPLINE_READ Calling S
Page 79 and 80:
Page 81 and 82:
`S232' Space-two: 2-3-2 `S313' Spac
Page 83 and 84:
Page 85 and 86:
Callng Sequence CALL SHF (x, x0, a,
Page 87 and 88:
Page 89 and 90:
Calling Sequence CALL STEP5 (x, x0,
Page 91 and 92:
Page 93 and 94:
Page 95 and 96:
Page 97 and 98:
Page 99 and 100:
Page 101 and 102:
Page 103 and 104:
C INTEGER IPAR(2), N_UVX, N_UVY, N_
Page 105 and 106:
CALL NMODES(FBDYID,NQ,ERRFLG) STRIN
Page 107 and 108:
Page 109 and 110:
Page 111 and 112:
F(M 1 (q), M 2 (q), ..., M N (q)) W
Page 113 and 114:
Examples Welcome to Adams/Solver Su
Page 115 and 116:
SUBROUTINE SFOSUB (ID, TIME, PAR, N
Page 117 and 118:
DO 100 J = 1 , 6 DFDDIS(I,J)=0.D0 D
Page 119 and 120:
Page 121 and 122:
Page 123 and 124:
Page 125 and 126:
Page 127 and 128:
User-Written Subroutines Welcome to
Page 129 and 130:
Page 131 and 132:
Page 133 and 134:
Page 135 and 136:
Page 137 and 138:
Page 139 and 140:
C - Evaluate Normal Force component
Page 141 and 142:
Page 143 and 144: Input Arguments Welcome to Adams/So
Page 145 and 146: Welcome to Adams/Solver Subroutines
Page 153 and 154: Output Arguments Welcome to Adams/S
Page 167 and 168: C X rotational field torque C ... F
Page 169 and 170: }; int NPAR; const double* PAR; int
Page 171 and 172: Using the DFLAG Variable Welcome to
Page 173 and 174: C RESULT(2) = ... RESULT(3) = ... R
Page 175 and 176: GSE_UPDATE Calling Sequence Welcome
Page 179 and 180: Use Corresponding Statement Welcome
Page 181 and 182: Output Arguments scale A double-pre
Page 189 and 190: Use Corresponding Command Calling S
Page 193: C ENDIF C C - Create request inform
Page 201 and 202: * * SENSOR struct sAdamsSensorEval
Page 207 and 208: FORTRAN - Prototype Welcome to Adam
Page 215 and 216: C C C C C C C C C C C C C C VALUES(
Page 225 and 226: C - Derivatives of prior first deri
Page 229 and 230: C C - Subroutine initialization ---
Page 233 and 234: */ struct sAdamsVforce { int ID; in
Page 235 and 236: FORTRAN - Prototype Welcome to Adam
Page 237 and 238: Examples For an example of this sub
show all

Welcome to Adams/Solver Subroutines - Kxcad.net

Create successful ePaper yourself

Delete template?

Save as template?