Initial commit

This commit is contained in:
2016-02-03 18:52:05 +00:00
commit d40505e161
507 changed files with 91383 additions and 0 deletions
@@ -0,0 +1,15 @@
integer maxndim,nobs,nxvars,nyvars,maxnobs,
& maxnxvars,maxnyvars,iregrestype,iknowder,idobounded
parameter(maxnobs=50000,maxnxvars=10,maxnyvars=10,
& maxndim=1000)
common /int_com_generic/nobs,nxvars,nyvars,iregrestype,
&iknowder,idobounded
double precision xvars(maxnobs,maxnxvars),
& yobs(maxnobs,maxnyvars),weity(maxnobs,maxnyvars),
& weitx(maxnobs,maxnxvars),betamin(maxndim),
& betamax(maxndim),shorty(maxnobs,maxnyvars),
& shortx(maxnobs,maxnxvars),xmin(maxnobs,maxnxvars),
& xmax(maxnobs,maxnxvars)
common /dble_com_generic/xvars,yobs,weity,weitx,
& betamin,betamax,shorty,shortx,xmin,xmax
save /int_com_generic/,/dble_com_generic/