Matrix Elements VB-800 Uživatelský manuál Strana 15
- Strana / 172
- Tabulka s obsahem
- KNIHY
Hodnocené. / 5. Na základě hodnocení zákazníků
A1.3 Adding C/C
++
code: returning values in arguments 7
static void OXCALL
fnInvert(OxVALUE *rtn, OxVALUE *pv, int cArg)
{
int r, signdet = 0; double logdet = 0;
OxZero(rtn, 0);
OxLibCheckSquareMatrix(pv, 0, 0);
if (cArg == 2) /* either 1 or 3 arguments */
OxRunError(ER_ARGS, "invert");
else if (cArg == 3)
OxLibCheckType(OX_ARRAY, pv, 1, 2);
r = OxMatr(pv, 0);
OxLibValMatDup(rtn, OxMat(pv, 0), r, r);
if (IInvDet(OxMat(rtn, 0), r, &logdet, &signdet) != 0)
{
OxRunMessage("invert(): inversion failed");
OxFreeByValue(rtn);
OxZero(rtn, 0);
}
if (cArg == 3)
{
OxSetDbl( OxArray(pv,1), 0, logdet);
OxSetInt( OxArray(pv,2), 0, signdet);
}
}
• OxLibCheckSquareMatrix(pv, 0, 0) is the same as making a call to
OxLibCheckType(OX
MATRIX, pv, 0, 0) followed by a check if the matrix
is square.
• Using invert with two arguments is an error. When there are three arguments,
the code checks if the second and third are of type OX
ARRAY.
• OxMatr gets the number of rows in the first argument (we already know that it is
a matrix, with the same number of rows as columns).
• Next, we duplicate (allocate a matrix and copy) the matrix in the first argument
to the return value. We shall overwrite this with the actual inverse.
• If the matrix inversion fails, the matrix in rtn is freed, and rtn is changed back
to an integer with value 0. It is important to free before setting the value to an
integer: otherwise a memory leak occurs.
• Otherwise, but only if the second and third argument were provided, do we put the
log-determinant(logdet) and sign in those argument. OxArray(pv,1) accesses
the array at element 1 in pv. This is then used in the same way as pv was used to
access the first entry in that array (index 0).
A more complex example is that for the square root free Choleski decomposition
decldl, again from the standard library. The first argument is the symmetric matrix to
decompose, the next two are arrays in which we expect the function to return the lower
triangular matrix and vector with diagonal elements.
- Ox Appendices 1
- Contents 3
- Appendix A1 9
- Extending Ox 9
- A1.2 Adding C/C 10
- A1.3 Adding C/C 14
- A1.7 Linking Fortran code 28
- Appendix A2 29
- Exported Function Summary 29
- A2.2 Ox function summary 30
- FOxLibAddFunction 31
- FOxSetDataMember 32
- IOxRunInit 32
- IOxVersion 32
- OxFreeByValue 33
- OxDeleteObject 33
- OxLibArgError 34
- OxLibArgTypeError 34
- OxLibCheckArrayMatrix 34
- OxLibCheckMatrixSize 35
- OxLibCheckSquareMatrix 35
- OxLibCheckType 35
- OxLibValArrayCalloc 35
- OxLibValMatDup 36
- OxLibValMatMalloc 36
- OxMain,OxMainCmd 36
- OxMainExit 37
- OxMainInit 37
- OxMakeByValue 37
- OxMessage 38
- OxRunAbort 38
- OxRunError 38
- OxRunErrorMessage 38
- OxRunExit 38
- OxRunMainExitCall 39
- OxRunMessage 39
- OxValColumns 39
- OxValGet 39
- OxValHasType, OxValHasFlag 40
- OxValRows 40
- OxValSet 40
- OxValType 41
- SetOxExit 42
- SetOxGets 42
- SetOxMessage 43
- SetOxPipe 43
- SetOxPuts 43
- SetOxRunMessage 43
- SOxGetTypeName 43
- SOxIntFunc 44
- OxGiveWinFinish 47
- VeccCopyMat 54
- VecrCopyMat 54
- DBessel01, DBesselNu 55
- DBetaFunc 55
- DDens 55
- DecQRtMul 56
- DDiagXSXt, DDiagXtSXtt 56
- DQuan. . 58
- DTail 59
- DTrace, DTraceAB 59
- EigVecDiv 59
- FCubicSpline 60
- FIsInf, FIsNaN 60
- FPeriodogram, FPeriodogramAcf 61
- IDecQRt 61
- IEigValPoly,IEigen 63
- IEigenSym 63
- IGenEigVecSym 64
- IInvert, IInvDet 64
- ILDLbandDec 65
- ILUPlogdet 66
- IMatRank 66
- INullSpace 67
- IOlsNorm, IOlsQR, OlsQRacc 67
- ISymInv,ISymInvDet 69
- LDLbandSolve 69
- LDLsolve 70
- LDLsolveInv 70
- LUPsolve, LUPsolveInv 70
- MatBtBVec 71
- MatAlloc, MatAllocBlock 72
- MatCopy.. 73
- MatFree, MatFreeBlock 73
- MatGenInvert 73
- MatGetAt 74
- MatRan, MatRanNormal 74
- MatReflect, MatTranspose 74
- MatSetAt 75
- MatStandardize 75
- MatVariance 75
- RanDirichlet 76
- RanGetSeed 76
- RanNewRan, RanSetRan 76
- RanSetSeed 76
- SetFastMath 77
- SetInvertEps 77
- SetInf, SetNaN 77
- ToeplitzSolve 78
- VecAlloc 78
- VecrCopyMat, VeccCopyMat 78
- VecDiscretize 79
- VecTranspose 79
- Appendix A3 80
- Modelbase and OxPack 80
- OxPackDialog 83
- { 1,1,2,0 } 84
- OxPackGetData 85
- OxPackReadProfile 86
- OxPackSetMarker 86
- OxPackStore 86
- OxPackWriteProfile 87
- Modelbase::IsCrossSection 88
- Modelbase::LoadOptions 88
- Modelbase::GetModelSettings 88
- Modelbase::ReceiveData 89
- Modelbase::ReceiveDialog 89
- Modelbase::ReceiveModel 90
- Modelbase::SaveOptions 90
- Modelbase::SendDialog 90
- Modelbase::SendFunctions 91
- Modelbase::SendMenu 91
- Modelbase::SendMethods 93
- Modelbase::SendResults 93
- Modelbase::SendSpecials 93
- Modelbase::SendVarStatus 94
- Modelbase::SetModelSettings 95
- Modelbase::Batch 95
- Modelbase::BatchMethod 96
- Modelbase::BatchVarStatus 96
- A3.4 Adding support for Help 97
- A3.5 An example 99
- A3.5 An example 93 101
- A3.5 An example 95 103
- A3.5 An example 97 105
- A3.5 An example 99 107
- Appendix A4 108
- Using OxGauss 108
- A4.4 Calling OxGauss from Ox 109
- A4.5 How does it work? 110
- A4.6 Some large projects 110
- A4.7 Known limitations 112
- Appendix A5 113
- OxGauss Function Summary 113
- Appendix A6 136
- OxGauss Language Reference 136
- A6.3 Constants 137
- A6.4 Objects 139
- A6.5 OxGauss Program 140
- A6.6 External declarations 140
- A6.7 Statements 144
- A6.8 Expressions 148
- A6.9 Preprocessing 157
- Appendix A7 160
- Comparing Gauss and Ox syntax 160
- A7.3 G2Ox 165
- Appendix A8 166
- Random Number Generators 166
- A8.3 L’Ecuyer’s generator 167
- References 169
- Subject Index 170
- SUBJECT INDEX 163 171
- 164 SUBJECT INDEX 172
Související produkty a manuály pro Audio zesilovače Matrix Elements VB-800
(12 stránky)© 2020, manymanuals.cz. Všechna práva vyhrazena. | 0.034 s |
Manymanuals.com
Manymanuals.de
Manymanuals.fr
Manymanuals.it
Manymanuals.pl
Manymanuals.cz
Manymanuals.es
Manymanuals-pt.com
Komentáře k této Příručce