Ignore:
Timestamp:
04/25/16 10:08:11 (9 years ago)
Author:
Mathieu Morlighem
Message:

merged trunk-jpl and trunk for revision 20546

Location:
issm/trunk
Files:
3 edited

Legend:

Unmodified
Added
Removed
  • issm/trunk

  • issm/trunk/src

  • issm/trunk/src/m/classes/clusters/generic_static.m

    r20500 r20548  
    5151                function BuildQueueScript(cluster,dirname,modelname,solution,io_gather,isvalgrind,isgprof,isdakota) % {{{
    5252
     53                        %Check that issm.exe exists in the right path
     54                        if ~exist([cluster.codepath '/issm.exe'],'file'),
     55                                error(['File ' cluster.codepath '/issm.exe does not exist']);
     56                        end
     57
     58                        %Now process codepath and replace empty spaces with \ to avoid errors in queuing script
     59                        codepath2=strrep(cluster.codepath,' ','\ ');
     60
     61                        %write queuing script
     62                        %what is the executable being called?
     63                        executable='issm.exe';
     64                        if isdakota,
     65                                version=IssmConfig('_DAKOTA_VERSION_'); version=str2num(version(1:3));
     66                                if (version>=6),
     67                                        executable='issm_dakota.exe';
     68                                end
     69                        end
     70
    5371                        %write queuing script
    5472                        fid=fopen([modelname '.queue'],'w');
    5573                        fprintf(fid,'#!%s\n',cluster.shell);
    56                         fprintf(fid,[cluster.codepath '/mpiexec -np %i %s/issm.exe %s %s %s \n'],cluster.np,cluster.codepath,EnumToString(solution),'./',modelname);
     74                        fprintf(fid,['%s/mpiexec -np %i %s/%s %s %s %s \n'],codepath2,cluster.np,codepath2,executable,EnumToString(solution),'./',modelname);
    5775                        fclose(fid);
    5876
Note: See TracChangeset for help on using the changeset viewer.