fix MPI mode
rename symbolic transform constants
This commit is contained in:
parent
7928e13156
commit
4b0f2f1f54
9 changed files with 54 additions and 48 deletions
|
@ -111,9 +111,9 @@ int main(void)
|
|||
for (int spin=0; spin<=2; spin+=2)
|
||||
{
|
||||
fprintf(fp,"{");
|
||||
for (sharp_jobtype type=MAP2ALM; type<=ALM2MAP_DERIV1; ++type)
|
||||
for (sharp_jobtype type=SHARP_MAP2ALM; type<=SHARP_ALM2MAP_DERIV1; ++type)
|
||||
{
|
||||
if ((type==ALM2MAP_DERIV1) && (spin==0))
|
||||
if ((type==SHARP_ALM2MAP_DERIV1) && (spin==0))
|
||||
fprintf(fp,"-1");
|
||||
else
|
||||
{
|
||||
|
@ -135,7 +135,7 @@ int main(void)
|
|||
DEALLOC(time);
|
||||
fprintf(fp,"%d",nvbest);
|
||||
}
|
||||
if (type!=ALM2MAP_DERIV1) fprintf(fp,",");
|
||||
if (type!=SHARP_ALM2MAP_DERIV1) fprintf(fp,",");
|
||||
}
|
||||
fprintf(fp,(spin==0)?"},":"}");
|
||||
printf("\n");
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue