ViewVC Help
View File | Revision Log | Show Annotations | View Changeset | Root Listing
root/freemol/trunk/src/mengine/src/echarge.c
(Generate patch)
# Line 28 | Line 28
28  
29     if (minim_values.iprint)
30     {
31 <       printf("\nCharge-Charge Interactions : Diele = %7.3f\n",units.dielec);
32 <       printf("      At1      At2      q1        q2         Rik          Eqq\n");
31 >       fprintf(pcmlogfile,"\nCharge-Charge Interactions : Diele = %7.3f\n",units.dielec);
32 >       fprintf(pcmlogfile,"      At1      At2      q1        q2         Rik          Eqq\n");
33     }
34     for (i=1; i < natom; i++)
35     {
# Line 65 | Line 65
65                     *eu += e;
66                  
67                    if (minim_values.iprint)
68 <                     printf("QQ: (%-3d)- (%-3d)   %-8.3f  %-8.3f   %-8.3f = %8.4f\n", i, j,charge[i], charge[j],rik,e);
68 >                     fprintf(pcmlogfile,"QQ: (%-3d)- (%-3d)   %-8.3f  %-8.3f   %-8.3f = %8.4f\n", i, j,charge[i], charge[j],rik,e);
69                  }
70               }
71              }

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines