ViewVC Help
View File | Revision Log | Show Annotations | View Changeset | Root Listing
root/freemol/trunk/smi23d/src/mengine/active.c
Revision: 3
Committed: Mon Jun 9 21:38:26 2008 UTC (11 years, 4 months ago) by tjod
File size: 301 byte(s)
Log Message:
test

Line File contents
1 #define EXTERN extern
2
3 #include "pcwin.h"
4 #include "pcmod.h"
5
6 void set_active()
7 {
8 int i;
9 long int minflag;
10
11 minflag = (1L << MIN_MASK);
12
13 for (i=1; i <= natom; i++)
14 {
15 if (atom[i].flags & minflag)
16 atom[i].use = FALSE;
17 else
18 atom[i].use = TRUE;
19 }
20 }