这个要用结构来实现了 程序如下：
new;
@create pv structure for storing matrices@
#include pv.sdf;  
pp = pvcreate;

@suppose create 100 data i (10*10) i = 1:100 of random standard normal distribution@
for i(1,100,1);
    mat = rndn(10,10);
    @name string of matrices@
    mat_nm = ftos(i,"data %*.*lf",1,0);
    @pack (data i) into struct pp@
    pp = pvpacki(pp,mat,mat_nm,i);
endfor;

@save struct on hard disk@
retc = saveStruct(pp,"pp");