ICODE-ADC/lammps
4
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

git-svn-id: svn://svn.icms.temple.edu/lammps-ro/trunk@12668 f3b2605a-c512-4ea7-a41b-209d697bcdaa

Browse Source
This commit is contained in:
sjplimp
2014-10-30 16:12:28 +00:00
parent bdffea2ea7
commit d291f079d5
2 changed files with 4 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
examples/COUPLE/simple/simple.c
View File

@ -13,7 +13,7 @@
/* c_driver = simple example of how an umbrella program /* c_driver = simple example of how an umbrella program
can invoke LAMMPS as a library on some subset of procs can invoke LAMMPS as a library on some subset of procs
Syntax: c_driver P in.lammps Syntax: simpleC P in.lammps
P = # of procs to run LAMMPS on P = # of procs to run LAMMPS on
must be <= # of procs the driver code itself runs on must be <= # of procs the driver code itself runs on
in.lammps = LAMMPS input script in.lammps = LAMMPS input script
@ -34,7 +34,7 @@ int main(int narg, char **arg)
MPI_Init(&narg,&arg); MPI_Init(&narg,&arg);
if (narg != 3) { if (narg != 3) {
printf("Syntax: c_driver P in.lammps\n"); printf("Syntax: simpleC P in.lammps\n");
exit(1); exit(1);
} }

4
examples/COUPLE/simple/simple.f90
View File

@ -11,7 +11,7 @@
! f_driver = simple example of how an umbrella program ! f_driver = simple example of how an umbrella program
! can invoke LAMMPS as a library on some subset of procs ! can invoke LAMMPS as a library on some subset of procs
! Syntax: f_driver P in.lammps ! Syntax: simpleF P in.lammps
! P = # of procs to run LAMMPS on ! P = # of procs to run LAMMPS on
! must be <= # of procs the driver code itself runs on ! must be <= # of procs the driver code itself runs on
! in.lammps = LAMMPS input script ! in.lammps = LAMMPS input script
@ -41,7 +41,7 @@ PROGRAM f_driver
narg = command_argument_count() narg = command_argument_count()
IF (narg /= 2) THEN IF (narg /= 2) THEN
PRINT *, 'Syntax: f_driver P in.lammps' PRINT *, 'Syntax: simpleF P in.lammps'
CALL mpi_abort(MPI_COMM_WORLD,1,ierr) CALL mpi_abort(MPI_COMM_WORLD,1,ierr)
END IF END IF