366 |
|
|
367 |
|
char *foo; // the pointer to the current string token |
368 |
|
|
369 |
< |
double pos[3]; // position place holders |
370 |
< |
double q[4]; // the quaternions |
371 |
< |
double RfromQ[3][3]; // the rotation matrix |
372 |
< |
double normalize; // to normalize the reference unit vector |
373 |
< |
double uX, uY, uZ; // reference unit vector place holders |
374 |
< |
double uselessToken; |
369 |
> |
RealType pos[3]; // position place holders |
370 |
> |
RealType q[4]; // the quaternions |
371 |
> |
RealType RfromQ[3][3]; // the rotation matrix |
372 |
> |
RealType normalize; // to normalize the reference unit vector |
373 |
> |
RealType uX, uY, uZ; // reference unit vector place holders |
374 |
> |
RealType uselessToken; |
375 |
|
StringTokenizer tokenizer(readLine); |
376 |
|
int nTokens; |
377 |
|
|
492 |
|
char *parseErr; |
493 |
|
|
494 |
|
std::vector<StuntDouble*> vecParticles; |
495 |
< |
std::vector<double> tempZangs; |
495 |
> |
std::vector<RealType> tempZangs; |
496 |
|
|
497 |
|
inAngFileName = info_->getRestFileName(); |
498 |
|
|
600 |
|
int index; |
601 |
|
|
602 |
|
int nCurObj; |
603 |
< |
double angleTranfer; |
603 |
> |
RealType angleTranfer; |
604 |
|
|
605 |
|
nTotObjs = info_->getNGlobalIntegrableObjects(); |
606 |
|
haveError = 0; |
669 |
|
|
670 |
|
for(j=0; j < nCurObj; j++){ |
671 |
|
angleTransfer = tempZangs[index]; |
672 |
< |
MPI_Send(&angleTransfer, 1, MPI_DOUBLE, which_node, |
672 |
> |
MPI_Send(&angleTransfer, 1, MPI_REALTYPE, which_node, |
673 |
|
TAKE_THIS_TAG_DOUBLE, MPI_COMM_WORLD); |
674 |
|
index++; |
675 |
|
} |
704 |
|
integrableObject != NULL; |
705 |
|
integrableObject = mol->nextIntegrableObject(ii)){ |
706 |
|
|
707 |
< |
MPI_Recv(&angleTransfer, 1, MPI_DOUBLE, 0, |
707 |
> |
MPI_Recv(&angleTransfer, 1, MPI_REALTYPE, 0, |
708 |
|
TAKE_THIS_TAG_DOUBLE, MPI_COMM_WORLD, &istatus); |
709 |
|
|
710 |
|
integrableObject->setZangle(angleTransfer); |
753 |
|
MPI_Status istatus; |
754 |
|
|
755 |
|
int nCurObj; |
756 |
< |
double angleTranfer; |
756 |
> |
RealType angleTranfer; |
757 |
|
|
758 |
|
nTotObjs = info_->getNGlobalIntegrableObjects(); |
759 |
|
haveError = 0; |
789 |
|
|
790 |
|
for(j=0; j < nCurObj; j++){ |
791 |
|
angleTransfer = 0.0; |
792 |
< |
MPI_Send(&angleTransfer, 1, MPI_DOUBLE, which_node, |
792 |
> |
MPI_Send(&angleTransfer, 1, MPI_REALTYPE, which_node, |
793 |
|
TAKE_THIS_TAG_DOUBLE, MPI_COMM_WORLD); |
794 |
|
|
795 |
|
} |
822 |
|
integrableObject != NULL; |
823 |
|
integrableObject = mol->nextIntegrableObject(ii)){ |
824 |
|
|
825 |
< |
MPI_Recv(&angleTransfer, 1, MPI_DOUBLE, 0, |
825 |
> |
MPI_Recv(&angleTransfer, 1, MPI_REALTYPE, 0, |
826 |
|
TAKE_THIS_TAG_DOUBLE, MPI_COMM_WORLD, &istatus); |
827 |
|
vecParticles[j]->setZangle(angleTransfer); |
828 |
|
} |