source:
tol/tolsh/tests/matprod/check.tol
@
6d7779d
| Last change on this file since 6d7779d was 6d7779d, checked in by , 18 years ago | |
|---|---|
|
|
| File size: 373 bytes | |
| Line | |
|---|---|
| 1 | /* -*- mode: c++ -*- */ |
| 2 | |
| 3 | Matrix parC = MatReadFile("parC.bbm"); |
| 4 | Matrix seqC = MatReadFile("seqC.bbm"); |
| 5 | Matrix diffC = parC - seqC; |
| 6 | Real norm = MatFrobeniusNorm(diffC); |
| 7 | WriteLn("|parC-seqC|="<<norm); |
| 8 | Matrix errorData = Rand(1, 2, 0, 0); |
| 9 | Real Do PutMatDat(errorData, 1, 1, Rows(diffC)); |
| 10 | Real Do PutMatDat(errorData, 1, 2, norm); |
| 11 | Matrix MatAppendFile("norm.bbm", errorData); |
Note: See TracBrowser
for help on using the repository browser.
