hdiff output

r30961/nodes.f90 2016-08-04 16:30:10.751618394 +0100 r30960/nodes.f90 2016-08-04 16:30:10.999621689 +0100
362:           TOTALJOBSTRING=TRIM(ADJUSTL(TOTALJOBSTRING)) // ' ; rm -r ' // TRIM(ADJUSTL(PATHSTRING))362:           TOTALJOBSTRING=TRIM(ADJUSTL(TOTALJOBSTRING)) // ' ; rm -r ' // TRIM(ADJUSTL(PATHSTRING))
363:           IF (LDEBUG) PRINT '(2A)', 'nodes> complete job string for srun command: ',TRIM(ADJUSTL(TOTALJOBSTRING))363:           IF (LDEBUG) PRINT '(2A)', 'nodes> complete job string for srun command: ',TRIM(ADJUSTL(TOTALJOBSTRING))
364: ! (7) submit the job for real364: ! (7) submit the job for real
365: ! Commands for srun written into this script365: ! Commands for srun written into this script
366:           OPEN(UNIT=225,FILE='submit_' // TRIM(ADJUSTL(RANSTRING)) // '.sh',STATUS='UNKNOWN')366:           OPEN(UNIT=225,FILE='submit_' // TRIM(ADJUSTL(RANSTRING)) // '.sh',STATUS='UNKNOWN')
367:           WRITE(225,'(A)') '#!/bin/bash'367:           WRITE(225,'(A)') '#!/bin/bash'
368:           WRITE(225,'(A)') TRIM(ADJUSTL(TOTALJOBSTRING))368:           WRITE(225,'(A)') TRIM(ADJUSTL(TOTALJOBSTRING))
369:           CLOSE(225)369:           CLOSE(225)
370:           CALL MYSYSTEM(MYSTAT,LDEBUG,'chmod +x submit_' // TRIM(ADJUSTL(RANSTRING)) // '.sh')370:           CALL MYSYSTEM(MYSTAT,LDEBUG,'chmod +x submit_' // TRIM(ADJUSTL(RANSTRING)) // '.sh')
371:           IF (CUDAT) THEN371:           IF (CUDAT) THEN
372:              CALL SYSTEM_SUBR('srun -n1 -N1 -l --gres=gpu:1 submit_' // TRIM(ADJUSTL(RANSTRING)) // '.sh',MYSTATUS)372:              CALL SYSTEM_SUBR('srun -n1 -N1 -l --exclusive --gres=gpu:1 submit_' // TRIM(ADJUSTL(RANSTRING)) // '.sh',MYSTATUS)
373:           ELSE373:           ELSE
374:              CALL SYSTEM_SUBR('srun -n1 -N1 -l --exclusive submit_' // TRIM(ADJUSTL(RANSTRING)) // '.sh',MYSTATUS)374:              CALL SYSTEM_SUBR('srun -n1 -N1 -l --exclusive submit_' // TRIM(ADJUSTL(RANSTRING)) // '.sh',MYSTATUS)
375:           END IF375:           END IF
376: ! Remove srun script after completion376: ! Remove srun script after completion
377:           CALL MYSYSTEM(MYSTAT,LDEBUG,'rm -rf submit_' // TRIM(ADJUSTL(RANSTRING)) // '.sh')377:           CALL MYSYSTEM(MYSTAT,LDEBUG,'rm -rf submit_' // TRIM(ADJUSTL(RANSTRING)) // '.sh')
378:           STAT=MYSTATUS378:           STAT=MYSTATUS
379: 379: 
380:      END SUBROUTINE SLURMSUBMIT380:      END SUBROUTINE SLURMSUBMIT
381: 381: 
382: END MODULE NODES382: END MODULE NODES


legend
Lines Added 
Lines changed
 Lines Removed

hdiff - version: 2.1.0