Changeset 18790
- Timestamp:
- 11/17/14 08:34:01 (10 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
issm/trunk-jpl/src/m/classes/clusters/pfe.m
r18787 r18790 215 215 end 216 216 end %}}} 217 function BuildOceanQueueScript(cluster,modelname,solution,io_gather,isvalgrind,isgprof) % {{{ 218 219 %compute number of processors 220 cluster.np=cluster.numnodes*cluster.cpuspernode; 217 function BuildOceanQueueScript(np,cluster,modelname) % {{{ 221 218 222 219 %write queuing script 223 220 fid=fopen([modelname '.queue'],'w'); 224 221 fprintf(fid,'#PBS -S /bin/bash\n'); 225 fprintf(fid,'#PBS -l select= %i:ncpus=%i:model=%s\n',cluster.numnodes,cluster.cpuspernode,cluster.processor);226 fprintf(fid,'#PBS -l walltime=%i\n',cluster.time *60); %walltime is in seconds.222 fprintf(fid,'#PBS -l select=1:ncpus=%i:model=%s\n',np,cluster.processor); 223 fprintf(fid,'#PBS -l walltime=%i\n',cluster.time); %walltime is in seconds. 227 224 fprintf(fid,'#PBS -q %s \n',cluster.queue); 228 225 fprintf(fid,'#PBS -W group_list=%s\n',cluster.grouplist); … … 238 235 fprintf(fid,'export PATH="$PATH:."\n'); 239 236 fprintf(fid,'export MPI_GROUP_MAX=64\n\n'); 240 fprintf(fid, 'cd %s/%s/\n\n',cluster.executionpath,modelname);241 fprintf(fid,'mpiexec -np %i ./mitgcm \n',cluster.np);237 fprintf(fid,['cd ' pwd() ' \n\n']); 238 fprintf(fid,'mpiexec -np %i ./mitgcmuv\n',np); 242 239 % if ~io_gather, %concatenate the output files: 243 240 % fprintf(fid,'cat %s.outbin.* > %s.outbin',modelname,modelname);
Note:
See TracChangeset
for help on using the changeset viewer.