Merge pull request tomojitakasu#529 from ourairquality/ppp-res-var

rtklibexplorer · web-flow · commit e4f8cd3b24bc · 2024-12-06T08:33:24.000-07:00
ppp_res: the var[] array needs room for all frequencies
diff --git a/src/ppp.c b/src/ppp.c
@@ -935,7 +935,7 @@ static int ppp_res(int post, const obsd_t *obs, int n, const double *rs,
 {
     prcopt_t *opt=&rtk->opt;
     double y,r,cdtr,bias,rr[3],pos[3],e[3],dtdx[3],L[NFREQ],P[NFREQ],Lc,Pc;
-    double var[MAXOBS*2],dtrp=0.0,dion=0.0,vart=0.0,vari=0.0,dcb,freq;
+    double var[MAXOBS*2*NFREQ],dtrp=0.0,dion=0.0,vart=0.0,vari=0.0,dcb,freq;
     double dantr[NFREQ]={0},dants[NFREQ]={0};
     double ve[MAXOBS*2*NFREQ]={0},vmax=0;
     char str[32];

Original file line number	Diff line number	Diff line change
`@@ -935,7 +935,7 @@ static int ppp_res(int post, const obsd_t obs, int n, const double rs,`
`935`	`935`	`{`
`936`	`936`	`prcopt_t *opt=&rtk->opt;`
`937`	`937`	`double y,r,cdtr,bias,rr[3],pos[3],e[3],dtdx[3],L[NFREQ],P[NFREQ],Lc,Pc;`
`938`		`- double var[MAXOBS*2],dtrp=0.0,dion=0.0,vart=0.0,vari=0.0,dcb,freq;`
	`938`	`+ double var[MAXOBS2NFREQ],dtrp=0.0,dion=0.0,vart=0.0,vari=0.0,dcb,freq;`
`939`	`939`	`double dantr[NFREQ]={0},dants[NFREQ]={0};`
`940`	`940`	`double ve[MAXOBS2NFREQ]={0},vmax=0;`
`941`	`941`	`char str[32];`