ViewVC Help
View File | Revision Log | Show Annotations | View Changeset | Root Listing
root/freemol/trunk/src/mengine/src/active.c
Revision: 110
Committed: Thu Mar 12 01:43:50 2009 UTC (12 years, 3 months ago) by gilbertke
File size: 362 byte(s)
Log Message:
further cleanup and localization of atom data
Line File contents
1 #define EXTERN extern
2
3 #include "pcwin.h"
4 #include "fix.h"
5
6 void set_active(int natom,int *use,int natom_fix,int *katom_fix);
7
8 void set_active(int natom,int *use,int natom_fix,int *katom_fix)
9 {
10 int i;
11 for (i=1; i <= natom; i++)
12 use[i] = TRUE;
13
14 // fixed atoms
15 for (i=0; i < natom_fix; i++)
16 use[katom_fix[i]] = FALSE;
17 }