484   int fid,fidroot,fitid,aid,agdid,lid,pid,mid,tid,rid,rid2,cid;  in prmload()  local
668       if ((fitid=newobj(fitobj))==-1) goto errexit;  in prmload()
669       getobj(fitobj,"oid",fitid,0,NULL,&nameid);  in prmload()
670       if (d5==51) fitnameid[i]=fitid;  in prmload()
676         putobj(fitobj,"type",fitid,&fittype);  in prmload()
678         putobj(fitobj,"poly_dimension",fitid,&fittype);  in prmload()
681         putobj(fitobj,"type",fitid,&fittype);  in prmload()
719       putobj(fitobj,"through_point",fitid,&d1);  in prmload()
720       putobj(fitobj,"point_x",fitid,&f1);  in prmload()
721       putobj(fitobj,"point_y",fitid,&f2);  in prmload()
758       fitid=fitnameid[j];  in prmload()
760         putobj(fitobj,"parameter0",fitid,&f1);  in prmload()
762         putobj(fitobj,"parameter1",fitid,&f1);  in prmload()
764         putobj(fitobj,"parameter2",fitid,&f1);  in prmload()
766         putobj(fitobj,"parameter3",fitid,&f1);  in prmload()
768         putobj(fitobj,"parameter4",fitid,&f1);  in prmload()
770         putobj(fitobj,"parameter5",fitid,&f1);  in prmload()
772         putobj(fitobj,"parameter6",fitid,&f1);  in prmload()
774         putobj(fitobj,"parameter7",fitid,&f1);  in prmload()
782       fitid=fitnameid[j];  in prmload()
784         putobj(fitobj,"user_func",fitid,s);  in prmload()
786         putobj(fitobj,"derivative0",fitid,s);  in prmload()
788         putobj(fitobj,"derivative1",fitid,s);  in prmload()
790         putobj(fitobj,"derivative2",fitid,s);  in prmload()
792         putobj(fitobj,"derivative3",fitid,s);  in prmload()
794         putobj(fitobj,"derivative4",fitid,s);  in prmload()
796         putobj(fitobj,"derivative5",fitid,s);  in prmload()
798         putobj(fitobj,"derivative6",fitid,s);  in prmload()