File: sep_mpi.prl

package info (click to toggle)
openmx 3.8.5%2Bdfsg1-1
  • links: PTS, VCS
  • area: main
  • in suites: buster, sid
  • size: 385,200 kB
  • sloc: ansic: 233,355; f90: 2,080; python: 876; makefile: 725; xml: 63; sh: 30; perl: 18
file content (15 lines) | stat: -rwxr-xr-x 243 bytes parent folder | download | duplicates (4) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
 
#!/usr/bin/perl

$file = "tmp_ls";
open(INPUTFILE,$file);

while ($name = <INPUTFILE>){
 chop($name);
 print"sed 's/MPI_Finalize/MPI_Finalize()/g' $name > tmp_file\n";
 print"cp tmp_file $name\n";
 print"rm tmp_file\n";
}
close(INPUTFILE);