$Id$
jjjz=jjj(3,18,*,*)
save,file='prof.sav',jjjz,zzz
END