i****d
发帖数: 255 | 1 // 定义二维数组的指针
double **zzz；
int i, j, irow = 100， icol = 4；
// 有两种方式malloc
// 第一种
zzz = (double**) malloc( sizeof(double) * irow * icol) );
for(i=0; i
zzz[i] = (double *) malloc( sizeof(double) * icol) );
// 第二种
zzz = (double**) malloc( sizeof(double*) * irow) );
for(i=0; i
zzz[i] = (double *) malloc( sizeof(double) * icol) );
*******************************************
感觉第二种方式好理解：先定义一个指针数组zzz[irow]；然后让里面的各个指针指向
一个个一维数组，即zzz[0]存储第0列的首地址，等等。
但第一种方式不好理解：感觉开辟了两份内存。
请指教！ |
|
j********3
发帖数: 560 | 2 【 以下文字转载自 Computation 讨论区 】
发信人: johnlee123 (no), 信区: Computation
标 题: 请问有没有用过IMSL库的大虾？
发信站: BBS 未名空间站 (Wed Jul 11 17:58:44 2007)
我用 IMSL 库中的 DLSLXG 函数求解系数矩阵稀疏的线性方程组，在方程组规模较小的
时候求解没有任何问题。但是当方程组规模越过一个阈值时，马上就会出错，（编译没
有问题，运行的时候出错），给出的出错信息是“Terminal error 16 from DL2LXG.
Two values of A are given for IROW=72221 and JCOL=7985”，并且是好几条类似的
信息，只是IROW和JCOL后面的数字不同，而且这两个数字随系数矩阵规模的变化而变化
。另外，我并没有调用 DL2LXG 这个函数，看traceback应该是 DLSLXG 函数本身调用
了 DL2LXG 函数。另外还给出 "error type" 为5，"error code" 为16。但是我到处都
找不到这两个东西代表什么意 |
|
j********3
发帖数: 560 | 3 【 以下文字转载自 Computation 讨论区 】
发信人: johnlee123 (no), 信区: Computation
标 题: 请问有没有用过IMSL库的大虾？
发信站: BBS 未名空间站 (Wed Jul 11 17:58:44 2007)
我用 IMSL 库中的 DLSLXG 函数求解系数矩阵稀疏的线性方程组，在方程组规模较小的
时候求解没有任何问题。但是当方程组规模越过一个阈值时，马上就会出错，（编译没
有问题，运行的时候出错），给出的出错信息是“Terminal error 16 from DL2LXG.
Two values of A are given for IROW=72221 and JCOL=7985”，并且是好几条类似的
信息，只是IROW和JCOL后面的数字不同，而且这两个数字随系数矩阵规模的变化而变化
。另外，我并没有调用 DL2LXG 这个函数，看traceback应该是 DLSLXG 函数本身调用
了 DL2LXG 函数。另外还给出 "error type" 为5，"error code" 为16。但是我到处都
找不到这两个东西代表什么意 |
|
d****i
发帖数: 4809 | 4 Exactly! The first method is wrong. You define a pointer array of size irow
* icol, which is not the case because you should only create a pointer array
of size irow, each of which is a pointer that points to the first element
of each column. |
|
k*****c
发帖数: 6 | 5 The following are 2 vb code blocks, maybe helpful to you.
public sub ReadExcelFile
dim sTemp as string
Dim Range As Excel.Range
Set Range = Sheet.UsedRange
iCols = Range.Columns.Count
iRows = Range.Rows.Count
With Range.Cells
For i = 1 To iRows
For j = 1 To iCols
sTemp = .Item(i, j).Value
next j
next i
end sub
public sub SaveExcelFileAsText
Dim xl As Excel.Application
Dim Workbook As Excel.Workbook
Dim |
|
j********3
发帖数: 560 | 6 我用 IMSL 库中的 DLSLXG 函数求解系数矩阵稀疏的线性方程组，在方程组规模较小的
时候求解没有任何问题。但是当方程组规模越过一个阈值时，马上就会出错，（编译没
有问题，运行的时候出错），给出的出错信息是“Terminal error 16 from DL2LXG.
Two values of A are given for IROW=72221 and JCOL=7985”，并且是好几条类似的
信息，只是IROW和JCOL后面的数字不同，而且这两个数字随系数矩阵规模的变化而变化
。另外，我并没有调用 DL2LXG 这个函数，看traceback应该是 DLSLXG 函数本身调用
了 DL2LXG 函数。另外还给出 "error type" 为5，"error code" 为16。但是我到处都
找不到这两个东西代表什么意思。
我试过增加stack的大小，也试过在程序中用4字节整数代替2字节整数，但是都没有用。
请大虾指教。多谢！ |
|
s******t
发帖数: 2 | 7 我是新手，弱弱地问些问题。
我希望从键盘输入参数，用%windows制作输入界面，我照着网上的写，然后每次调用时
候都不清除原来的数据，怎么办？
有没有更好的方法手动输入参数？
%window wndoname
icolumn=15
irow=10
columns=80
rows=20
""
#3 @20 "Adjusted Table Format"
#5 @15 "please enter information of tables"
#7 @15 "The Testing Property" @40 TestProp 6
ATTR=UNDERLINE REQUIRED=YES
#9 @15 "The Environment" @40 Env 6
ATTR=UNDERLINE REQUIRED=YES
#11 @15 "Plies Number" @40 PliesNum 6
ATTR=UNDERLINE REQUIRED=YES
#13 @15 "Other Parameters" @40 OtherPara 6
ATTR=UNDER |
|
