typedef struct { float a[222],c[222],f[222],l[222],n[222],
			rho[222],g1[222],g2[222],Coriolis[222],b[222],g[222],h[222],cs[222];} knla_st;

typedef struct { float *a,*c,*f,*l,*n;
                 float *rho,*g1,*g2,*Coriolis;
		 float *b,*g,*h,*cs;} knla_st_dyn;

typedef struct { int s,iq,j;} index_st;