Welcome to Adams/Solver Subroutines - Kxcad.net

More documents

Recommendations

Info

166 Adams/Solver LOGICAL IFLAG DOUBLE PRECISION FIELD( 6 ) DOUBLE PRECISION DFDDIS( 6, 6 ) DOUBLE PRECISION DFDVEL( 6, 6 ) C C ID Identifier of calling FIELD statement C TIME Current time C PAR Array of passed statement parameters C NPAR Number of passed parameters C DISP Array of I with respect to J displacements C VELO Array of I with respect to J velocities C DFLAG Differencing flag C IFLAG Initialization pass flag C FIELD Array of field values C DFDDIS Displacement partial derivatives C DFDVEL Velocity partial derivatives C C - Local variable definitions ----------- C ... C C === Executable code ================================= C C Assign readable variable names to passed parameters C ... C IF ( IFLAG ) THEN C C - Subroutine initialization ----------- C ... C ENDIF C C - Calculate field component forces -------- C C X translation field force C ... FIELD(1) = ... C C Y translation field force C ... FIELD(2) = ... C C Z translation field force C ... FIELD(3) = ... C C - Calculate field component torques ------- C
C X rotational field torque C ... FIELD(4) = ... C C Y rotational field torque C ... FIELD(5) = ... C C Z rotational field torque C ... FIELD(6) = ... C C - Assign returned partial derivatives if this -- C is a differencing pass (DFLAG=.TRUE.) C IF ( DFLAG ) THEN C C Assign displacement partials for X force C DFDDIS(1,1) = ... ... DFDDIS(1,6) = ... C C Assign displacement partials for Y force C DFDDIS(2,1) = ... ... DFDDIS(2,6) = ... C C Assign displacement partials for Z force C DFDDIS(3,1) = ... ... DFDDIS(3,6) = ... C C Assign displacement partials for X torque C DFDDIS(4,1) = ... ... DFDDIS(4,6) = ... C C Assign displacement partials for Y torque C DFDDIS(5,1) = ... ... DFDDIS(5,6) = ... C C Assign displacement partials for Z torque C DFDDIS(6,1) = ... ... Welcome to Adams/Solver Subroutines 167
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:
Use Called By Any user-written subr
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: Welcome to Adams/Solver Subroutines
Page 121 and 122: Use Called By Any user-written subr
Page 123 and 124: Input Arguments Welcome to Adams/So
Page 127 and 128: User-Written Subroutines Welcome to
Page 139 and 140: C - Evaluate Normal Force component
Page 153 and 154: Output Arguments Welcome to Adams/S
Page 165: Welcome to Adams/Solver Subroutines
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 and 194: 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 217 and 218:
Page 219 and 220:
Page 221 and 222:
Page 223 and 224:
Page 225 and 226:
C - Derivatives of prior first deri
Page 227 and 228:
Page 229 and 230:
C C - Subroutine initialization ---
Page 231 and 232:
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?