Changeset 4e219a3
- Timestamp:
- 09/05/08 11:49:43 (16 years ago)
- Branches:
- master
- Children:
- a52fb83
- Parents:
- 229cc35
- Files:
-
- 7 edited
Legend:
- Unmodified
- Added
- Removed
-
EXAMPLES/parallel_tempering_p.f
r229cc35 r4e219a3 125 125 upchswitch=1 126 126 rndord=.true. 127 128 if (ientyp.eq.2) call init_lundff129 127 ! ================================================================= 130 128 ! Distribute nodes to parallel tempering tasks … … 198 196 & fileNameMP(filebase, 6, 9, rep_id + 1)) 199 197 endif 198 call init_lund 199 if (ientyp.eq.2) call init_lundff 200 200 if (ientyp.eq.3) call init_abgn 201 201 202 202 203 ! ======================================== start of parallel tempering run -
Makefile
r229cc35 r4e219a3 4 4 5 5 %_p.o : %_p.f 6 $(MPIF90) $(F_FLAGS) $< 7 8 %_p.o : %_p.F 6 9 $(MPIF90) $(F_FLAGS) $< 7 10 … … 36 39 F_FLAGS=-c -O2 -g 37 40 # Flags for Intel's ifort 38 # F_FLAGS=-c -O3 -axW -g 41 # F_FLAGS=-c -O3 -axW -g -DONECALL -DBRANCHLESS 39 42 # Flags for debugging build 40 43 # F_FLAGS=-c -O0 -g … … 48 51 49 52 # Select your compiler 50 F90=gfortran51 53 #F90=ifort 52 54 #F90=pgf90 53 55 #F90=xlf 56 F90=gfortran 54 57 MPIF90=mpif90 55 58 … … 94 97 $(MPIF90) -o $(PROG) $(L_FLAGS) main_p.o $(OBJ) $(POBJ) 95 98 96 # Cross compile for BlueGene/ P99 # Cross compile for BlueGene/L 97 100 bgl: BGL_L_FLAGS = -L$(BGLSYS)/lib -lmpich.rts -lfmpich.rts -lmsglayer.rts -lrts.rts -ldevices.rts -qextname=flush 98 101 bgl: F_FLAGS = -c -O5 -qhot -g -I$(BGLSYS)/include -L$(BGLSYS)/lib -qarch=440 -qtune=440 -qextname=flush … … 105 108 bgl: $(OBJ) $(POBJ) main_bgl_p.o 106 109 $(BGL_F90) -o $(PROG).rts $(BGL_L_FLAGS) main_bgl_p.o $(OBJ) $(POBJ) $(LIBSF_MPI) 110 111 # Cross compile for BlueGene/P 112 bgp: BGP_SYS = /bgsys/drivers/ppcfloor/comm 113 bgp: DIRCOMP = /opt/ibmcmp/xlf/bg/11.1/bin 114 bgp: BGP_L_FLAGS = -O3 -qhot -g -I$(BGP_SYS)/include -qarch=440 -qtune=440 -qextname=flush 115 bgp: F_FLAGS = -c -O3 -qhot -g -I$(BGP_SYS)/include -qarch=440 -qtune=440 -qextname=flush 116 bgp: BGP_F90 = bgxlf 117 bgp: F90 = $(BGP_F90) 118 bgp: MPIF90 = $(BGP_F90) 119 bgp: LIBS=-Wl,-allow-multiple-definition $(MASS) $(ESSL) -L$(BGP_SYS)/lib -lmpich.cnk -ldcmfcoll.cnk -ldcmf.cnk -L/bgsys/drivers/ppcfloor/runtime/SPI -lSPI.cna -lrt -lpthread 120 121 bgp: $(OBJ) $(POBJ) main_p.o 122 $(BGP_F90) -o $(PROG).rts $(BGP_L_FLAGS) main_p.o $(OBJ) $(POBJ) $(LIBS) 107 123 108 124 # Build the python bindings -
SMMP.kdevelop.filelist
r229cc35 r4e219a3 1 1 # KDevelop Custom Project File List 2 EXAMPLES 3 EXAMPLES/Makefile 4 EXAMPLES/Python 5 EXAMPLES/Python/annealing.py 6 EXAMPLES/Python/gui_example.py 7 EXAMPLES/Python/minimization.py 8 EXAMPLES/Python/muca.py 9 EXAMPLES/Python/regularization.py 10 EXAMPLES/annealing.f 11 EXAMPLES/minimization.f 12 EXAMPLES/multicanonical.f 13 EXAMPLES/parallel_tempering_p.f 14 EXAMPLES/parallel_tempering_s.f 15 EXAMPLES/partem_p.f 16 EXAMPLES/regularization.f 17 INCL.H 18 INCP.H 19 Makefile 2 20 addend.f 3 21 algorithms.py … … 23 41 enysol_p.f 24 42 esolan.f 25 EXAMPLES26 EXAMPLES/annealing.f27 EXAMPLES/Makefile28 EXAMPLES/minimization.f29 EXAMPLES/multicanonical.f30 EXAMPLES/parallel_tempering_p.f31 EXAMPLES/parallel_tempering_s.f32 EXAMPLES/partem_p.f33 EXAMPLES/Python34 EXAMPLES/Python/annealing.py35 EXAMPLES/Python/gui_example.py36 EXAMPLES/Python/minimization.py37 EXAMPLES/Python/muca.py38 EXAMPLES/Python/regularization.py39 EXAMPLES/regularization.f40 43 eyabgn.f 41 44 getmol.f … … 43 46 hbond.f 44 47 helix.f 45 INCL.H46 48 incl_lund.h 47 INCP.H48 49 init_energy.f 49 50 init_molecule.f 51 main.f 52 main.py 50 53 main_bgl_p.f 51 main.f52 54 main_p.f 53 main.py54 Makefile55 55 metropolis.f 56 56 mincjg.f -
contacts.f
r229cc35 r4e219a3 14 14 ! .............................................................. 15 15 ! 16 ! C ALCULATES NUMBER OF CONTACTS IN GIVEN CONFORMATION, NUMBER OF17 ! CONTACTS WHICH ARE THE SAME IN GIVEN AND REFERENCE ONFORMATION,18 ! AND THE HAMMING DISTANCE BETWEEN GIVEN CONFORMATION AND THE19 ! REFERENCE CONFORMATIONa16 ! Calculates number of contacts in given conformation, number of 17 ! contacts which are the same in given and reference conformation, 18 ! and the hamming distance between given conformation and the 19 ! reference conformation. 20 20 ! 21 21 ! CALLS: c_cont -
main_p.f
r229cc35 r4e219a3 127 127 upchswitch=1 128 128 rndord=.true. 129 if (ientyp.eq.2) call init_lundff130 129 ! ================================================================= 131 130 ! Distribute nodes to parallel tempering tasks … … 190 189 & fileNameMP(filebase, 6, 9, rep_id + 1)) 191 190 endif 191 call init_lund 192 ! Must call init_lundff *after* molecule has been loaded. 193 if (ientyp.eq.2) call init_lundff 192 194 if (ientyp.eq.3) call init_abgn 193 195 194 196 nml = 1 197 195 198 196 199 ! RRRRRRRRRRMMMMMMMMMMMMSSSSSSSSSSDDDDDDDDDDDDD -
protein.py
r229cc35 r4e219a3 264 264 265 265 def zimmer(self): 266 first = smmp.mol_i.irsml1[self.__id] [0]- 1267 last = smmp.mol_i.irsml2[self.__id] [0] - 1268 nrs = smmp.mol_i.irsml2[smmp.mol_i.ntlml - 1] [0]- 1266 first = smmp.mol_i.irsml1[self.__id] - 1 267 last = smmp.mol_i.irsml2[self.__id] 268 nrs = smmp.mol_i.irsml2[smmp.mol_i.ntlml - 1] - 1 269 269 smmp.zimmer(last) 270 270 return smmp.zimme.zimm[first:last] 271 271 272 272 def __len__(self): 273 return smmp.mol_i.irsml2[self.__id] - smmp.mol_i.irsml1[self.__id] 273 return smmp.mol_i.irsml2[self.__id] - smmp.mol_i.irsml1[self.__id] + 1 274 274 275 275 -
setmvs.f
r229cc35 r4e219a3 132 132 j=l+l-ii 133 133 do while (j.le.k) 134 if (j.lt.k.and.iadvr1(iorvr(j)).lt.iadvr1(iorvr(j+1))) j=j+1 134 ! if (j.lt.k.and.iadvr1(iorvr(j)).lt.iadvr1(iorvr(j+1))) j=j+1 135 if (j.lt.k) then 136 if (iadvr1(iorvr(j)).lt.iadvr1(iorvr(j+1))) then 137 j = j + 1 138 end if 139 end if 135 140 if (n.lt.iadvr1(iorvr(j))) then 136 141 iorvr(i)=iorvr(j)
Note:
See TracChangeset
for help on using the changeset viewer.