Skip to content
Snippets Groups Projects
Commit 9675f6f6 authored by Giovanni La Mura's avatar Giovanni La Mura
Browse files

Set virtual_line ASCII format according to the definition of np_int

parent 4584cbd3
No related branches found
No related tags found
No related merge requests found
......@@ -199,10 +199,17 @@ void cluster(const string& config_file, const string& data_file, const string& o
//==========================
sprintf(virtual_line, " READ(IR,*)NSPH,LI,LE,MXNDM,INPOL,NPNT,NPNTTS,IAVM,ISAM\n\0");
p_output->append_line(virtual_line);
#ifdef USE_ILP64
sprintf(virtual_line, " %5d%5d%5d%5ld%5d%5d%5d%5d%5d\n\0",
nsph, cid->c4->li, cid->c4->le, gconf->mxndm, gconf->in_pol, gconf->npnt,
gconf->npntts, gconf->iavm, gconf->iavm
);
#else
sprintf(virtual_line, " %5d%5d%5d%5d%5d%5d%5d%5d%5d\n\0",
nsph, cid->c4->li, cid->c4->le, gconf->mxndm, gconf->in_pol, gconf->npnt,
gconf->npntts, gconf->iavm, gconf->iavm
);
#endif
p_output->append_line(virtual_line);
sprintf(virtual_line, " READ(IR,*)RXX(I),RYY(I),RZZ(I)\n\0");
p_output->append_line(virtual_line);
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment