ViewVC Help
View File | Revision Log | Show Annotations | View Changeset | Root Listing
root/freemol/trunk/src/mengine/src/active.c
Revision: 27
Committed: Tue Jul 8 19:10:25 2008 UTC (11 years, 10 months ago) by tjod
File size: 301 byte(s)
Log Message:
move mengine src to reflect new freemol directory structure

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 }