ViewVC Help
View File | Revision Log | Show Annotations | View Changeset | Root Listing
root/freemol/branches/sync4pymol12/src/mengine/src/pcmwin1.c
(Generate patch)
# Line 7 | Line 7
7   double dihdrl(int i1,int i2,int i3,int i4);
8   void type_mmx(void);
9   void hdel(int);
10 < void set_atomdata(int,int,int,int,int,int);
10 > void set_atomdata(int,int,int,int);
11  
12   void set_atomtypes(int);
13   void type(void);      
# Line 48 | Line 48
48              else
49                atom[i].tclass = atom[i].type;
50          }
51 <    } else if (newtype == OPLSAA)
52 <    {
53 <        for (i=1; i <= natom; i++)
54 <        {
55 <            atom[i].type = atom[i].opls_type;
56 <            atom[i].tclass = atom_k.tclass[atom[i].type];
57 <        }
58 <    } else if (newtype == AMBER)
59 <    {
60 <        for (i=1; i <= natom; i++)
61 <        {
62 <            atom[i].type = atom[i].amber_type;
63 <            atom[i].tclass = atom_k.tclass[atom[i].type];
64 <        }
65 <    }
51 >    }
52      badtype = FALSE;
53      
54      for (i=1; i <= natom; i++)
# Line 170 | Line 156
156          }
157          type_mmx();
158          set_atomtypes(MMFF94);
173    } else if (field.type == AMBER)
174    {
175        for (i=1; i <= natom; i++)
176        {
177            if (atom[i].mmx_type == 20)
178            {
179                hdel(1);
180                break;
181            }
182        }
183        type_mmx();
184        set_atomtypes(AMBER);
185    } else if (field.type == OPLSAA)
186    {
187        for (i=1; i <= natom; i++)
188        {
189            if (atom[i].mmx_type == 20)
190            {
191                hdel(1);
192                break;
193            }
194        }
195        type_mmx();
196        set_atomtypes(OPLSAA);
159      }
160      else
161         message_alert("No typing rules for this force field are implemented!","ERROR");  
# Line 751 | Line 713
713                  /* *** typing is now done, load value and return *** */
714   L_290:
715   //                if (field.type == MMX && iatomt < 300 )
716 <                set_atomdata(i,iatomt,0,mmfftype,0,0);
716 >                set_atomdata(i,iatomt,0,mmfftype);
717   L_300:
718                  continue;
719              }

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines