dextrapol          39 src/prediction.c     double dextrapol,scal1,scal2;
dextrapol          51 src/prediction.c 		    dextrapol=*dtime*veold[mt*k+j]+scal1*accold[mt*k+j];
dextrapol          52 src/prediction.c 		    if((fabs(dextrapol)>uam[0])&&(nactdof[mt*k+j]>0)) {uam[0]=fabs(dextrapol);}
dextrapol          53 src/prediction.c 		    v[mt*k+j]=vold[mt*k+j]+dextrapol;
dextrapol          65 src/prediction.c 		dextrapol=*dtime*veold[mt*k];
dextrapol          66 src/prediction.c 		if(fabs(dextrapol)>100.) dextrapol=100.*dextrapol/fabs(dextrapol);
dextrapol          67 src/prediction.c 		if((fabs(dextrapol)>uam[1])&&(nactdof[mt*k]>0)) {uam[1]=fabs(dextrapol);}
dextrapol          68 src/prediction.c 		v[mt*k]+=dextrapol;
dextrapol          73 src/prediction.c 		    dextrapol=*dtime*veold[mt*k+j]+scal1*accold[mt*k+j];
dextrapol          74 src/prediction.c 		    if((j==0)&&fabs(dextrapol)>100.) dextrapol=100.*dextrapol/fabs(dextrapol);
dextrapol          76 src/prediction.c 			if((fabs(dextrapol)>uam[1])&&(nactdof[mt*k]>0)) {uam[1]=fabs(dextrapol);}
dextrapol          78 src/prediction.c 			if((fabs(dextrapol)>uam[0])&&(nactdof[mt*k+j]>0)) {uam[0]=fabs(dextrapol);}
dextrapol          80 src/prediction.c 		    v[mt*k+j]=vold[mt*k+j]+dextrapol;
dextrapol          97 src/prediction.c 			    dextrapol=*dtime*veold[mt*k+j];
dextrapol          98 src/prediction.c 			    if((fabs(dextrapol)>uam[0])&&(nactdof[mt*k+j]>0)) {uam[0]=fabs(dextrapol);}	
dextrapol          99 src/prediction.c 			    v[mt*k+j]=vold[mt*k+j]+dextrapol;
dextrapol         113 src/prediction.c 			dextrapol=*dtime*veold[mt*k];
dextrapol         114 src/prediction.c 			if(fabs(dextrapol)>100.) dextrapol=100.*dextrapol/fabs(dextrapol);
dextrapol         115 src/prediction.c 			if((fabs(dextrapol)>uam[1])&&(nactdof[mt*k]>0)) {uam[1]=fabs(dextrapol);}	
dextrapol         116 src/prediction.c 			v[mt*k]+=dextrapol;
dextrapol         123 src/prediction.c 			    dextrapol=*dtime*veold[mt*k+j];
dextrapol         124 src/prediction.c 			    if((j==0)&&fabs(dextrapol)>100.) dextrapol=100.*dextrapol/fabs(dextrapol);
dextrapol         126 src/prediction.c 				if((fabs(dextrapol)>uam[1])&&(nactdof[mt*k+j]>0)) {uam[1]=fabs(dextrapol);}
dextrapol         128 src/prediction.c 				if((fabs(dextrapol)>uam[0])&&(nactdof[mt*k+j]>0)) {uam[0]=fabs(dextrapol);}
dextrapol         130 src/prediction.c 			    v[mt*k+j]=vold[mt*k+j]+dextrapol;
dextrapol          39 src/prediction_em.c     double dextrapol;
dextrapol          53 src/prediction_em.c 		dextrapol=*dtime*veold[mt*k+j];
dextrapol          54 src/prediction_em.c 		if(fabs(dextrapol)>100.) dextrapol=100.*dextrapol/fabs(dextrapol);
dextrapol          56 src/prediction_em.c 		    if((fabs(dextrapol)>uam[1])&&(nactdof[mt*k]>0)) {uam[1]=fabs(dextrapol);}
dextrapol          58 src/prediction_em.c 		v[mt*k+j]=vold[mt*k+j]+dextrapol;
dextrapol          71 src/prediction_em.c 			dextrapol=*dtime*veold[mt*k+j];
dextrapol          72 src/prediction_em.c 			if(fabs(dextrapol)>100.) dextrapol=100.*dextrapol/fabs(dextrapol);
dextrapol          74 src/prediction_em.c 			    if((fabs(dextrapol)>uam[1])&&(nactdof[mt*k]>0)) {uam[1]=fabs(dextrapol);}
dextrapol          76 src/prediction_em.c 			v[mt*k+j]=vold[mt*k+j]+dextrapol;