Changeset 623 for trunk/libIGCM/libIGCM_sys/libIGCM_sys_titane.ksh

Timestamp:

03/30/12 16:57:50 (12 years ago)

Author:

sdipsl

Message:

• adapt curie system for the pack
• homogenize curie and titane system. Easier to maintain

File:

• trunk/libIGCM/libIGCM_sys/libIGCM_sys_titane.ksh (modified) (43 diffs)

trunk/libIGCM/libIGCM_sys/libIGCM_sys_titane.ksh

@@ -14 +14 @@
 #=========================================================
 # The documentation of this file can be automatically generated
-# if you use the prefix #D- for comments to be extracted. 
+# if you use the prefix #D- for comments to be extracted.
 # Extract with command: cat lib* | grep "^#D-" | cut -c "4-"
 #=========================================================
@@ -22 +22 @@
 #D-#==================================================
 #D-
-#D- This ksh library if a layer under some usefull 
+#D- This ksh library if a layer under some usefull
 #D-environment variables and shell commands.
 #D-All those definitions depend on host particularities.
@@ -42 +42 @@
 # YOU MUST COMPILE YOUR EXE FILES FOR DRYRUN MODE !
 # -------------------------------------------------------------------------------------
-# | DRYRUN=  |  Date computations, | sys_Get    |  Exe    | sys_Put_Out; sys_Put_Rest |
-# |          |  Cp/Exe param files |            |  Chmod  |                           |
-# |          |      Qsub           |            |         |                           |
+# | DRYRUN=  |  Date computations, | sys_Get    |  Exe    | sys_Put_Out; sys_Put_Rest |
+# |          |  Cp/Exe param files |            |  Chmod  |                           |
+# |          |      Qsub           |            |         |                           |
 # -------------------------------------------------------------------------------------
-# |    0     |       yes           |    yes     |  yes    |      yes                  |
+# |    0     |       yes           |    yes     |  yes    |      yes                  |
 # -------------------------------------------------------------------------------------
-# |    1     |       yes           |    yes     |  yes    |      no                   |
+# |    1     |       yes           |    yes     |  yes    |      no                   |
 # -------------------------------------------------------------------------------------
-# |    2     |       yes           |    yes     |  no     |      no                   |
+# |    2     |       yes           |    yes     |  no     |      no                   |
 # -------------------------------------------------------------------------------------
-# |    3     |       yes           |    no      |  no     |      no                   |
+# |    3     |       yes           |    no      |  no     |      no                   |
 # -------------------------------------------------------------------------------------
 
@@ -194 +194 @@
 
 NUM_COREPERNODE=8
-        
+
 #====================================================
 #- Default number of MPI task for IPSL coupled model
@@ -274 +274 @@
 #  if [ "X$( grep rebuild_from tmp_IGCM_sys_RshPost_$$ )" != "X" ] ; then
 #    #little hack so that rebuild submission is done on titane not an cesium
-#    
+#
 #    libIGCM_POST_sed=$( echo $libIGCM_POST | sed 's/\//\\\//g' )
 #    POST_DIR_sed=$( echo ${POST_DIR} | sed 's/\//\\\//g' )
@@ -282 +282 @@
 #    sed "s/Script_Post_Output=/Script_Output=${POST_DIR_sed}\//g" tmp.txt > tmp_IGCM_sys_RshPost_$$
 #    \mv tmp.txt tmp_IGCM_sys_RshPost_$$
-#    
+#
 #    echo cat tmp_IGCM_sys_RshPost_$$ AFTER
 #    cat tmp_IGCM_sys_RshPost_$$
@@ -355 +355 @@
 
     if [ ! -z ${config_UserChoices_MailName} ] ; then
-        mail -s "${config_UserChoices_JobName} ${status}" ${config_UserChoices_MailName} < job_end.mail
+        mail -s "${config_UserChoices_JobName} ${status}" ${config_UserChoices_MailName} < job_end.mail
     elif [ -f ~/.forward ] ; then
-        mail -s "${config_UserChoices_JobName} ${status}" $( cat ~/.forward ) < job_end.mail
+        mail -s "${config_UserChoices_JobName} ${status}" $( cat ~/.forward ) < job_end.mail
     fi
     sleep 10
@@ -405 +405 @@
   fi
   #- creation de repertoire sur le serveur fichier
-  if [ ! -d ${1} ]; then 
+  if [ ! -d ${1} ]; then
     \mkdir -p $1
     if [ $? -gt 0 ] ; then
@@ -426 +426 @@
   fi
   #- creation de repertoire sur le serveur fichier
-  if [ ! -d ${1} ]; then 
+  if [ ! -d ${1} ]; then
     \mkdir -p $1
     if [ $? -gt 0 ] ; then
@@ -716 +716 @@
 #    fi
 #    (( i = i + 1 ))
-#  done 
+#  done
 # ============ CESIUM  END  ============ #
 
@@ -727 +727 @@
 
 #D-*************************
-#D- File transfer functions 
+#D- File transfer functions
 #D-*************************
 #D-
@@ -796 +796 @@
   elif [ $MYLANG = "en" ] ; then
     case $RET in
-    0)  return;;                
+    0)  return;;
     1)  echo "rsync error : Syntax or usage error "
       return;;
@@ -969 +969 @@
 
     typeset RET
-    
+
     echo mv $@ > out_rsync 2>&1
     \mv $@ >> out_rsync 2>&1
     RET=$?
-    
+
     if [ ${RET} -gt 0 ] ; then
       echo "IGCM_sys_Mv : error in mv."
@@ -1132 +1132 @@
     RET=$?
 
-#       #RSYNC WITH NETWORK SSH CALL
-#       echo ${RSYNC} ${RSYNC_opt} -e ssh ${RUN_DIR}/$1 ${STOREHOST}:${2} > out_rsync 2>&1
-#       ${RSYNC} ${RSYNC_opt} -e ssh ${RUN_DIR}/$1 ${STOREHOST}:${2} >> out_rsync 2>&1
-
-#       #RSYNC WITH NFS USE
-#       echo ${RSYNC} ${RSYNC_opt} ${RUN_DIR}/$1 ${2} > out_rsync 2>&1
-#       ${RSYNC} ${RSYNC_opt} ${RUN_DIR}/$1 ${2} >> out_rsync 2>&1
-
-#       RET=$?
-#       IGCM_sys_Rsync_out $RET
-
-#       ${libIGCM}/libIGCM_sys/IGCM_analyse_rsync_out.awk out_rsync
-#       (( RET=RET+$? ))
+#       #RSYNC WITH NETWORK SSH CALL
+#       echo ${RSYNC} ${RSYNC_opt} -e ssh ${RUN_DIR}/$1 ${STOREHOST}:${2} > out_rsync 2>&1
+#       ${RSYNC} ${RSYNC_opt} -e ssh ${RUN_DIR}/$1 ${STOREHOST}:${2} >> out_rsync 2>&1
+
+#       #RSYNC WITH NFS USE
+#       echo ${RSYNC} ${RSYNC_opt} ${RUN_DIR}/$1 ${2} > out_rsync 2>&1
+#       ${RSYNC} ${RSYNC_opt} ${RUN_DIR}/$1 ${2} >> out_rsync 2>&1
+
+#       RET=$?
+#       IGCM_sys_Rsync_out $RET
+
+#       ${libIGCM}/libIGCM_sys/IGCM_analyse_rsync_out.awk out_rsync
+#       (( RET=RET+$? ))
 
     if [ ${RET} -gt 0 ] ; then
@@ -1229 +1229 @@
     #    typeset WORKPATH FILEPATH
     #    WORKPATH=$( dirname $2 | sed -e "s|${R_OUT}|${R_BUF}|" )
-    #    IGCM_sys_MkdirWork ${WORKPATH} 
+    #    IGCM_sys_MkdirWork ${WORKPATH}
     #    FILEPATH=${WORKPATH}/$( basename $2 )
     #    #
@@ -1237 +1237 @@
     if [ X${JobType} = XRUN ] ; then
       if [ X${3} = X ] ; then
-        IGCM_sys_Chmod 444 ${1}
+        IGCM_sys_Chmod 444 ${1}
       fi
     fi
@@ -1245 +1245 @@
     RET=$?
 
-#       #RSYNC WITH NETWORK SSH CALL
-#       echo ${RSYNC} ${RSYNC_opt} -e ssh ${RUN_DIR}/$1 ${STOREHOST}:${2} > out_rsync 2>&1
-#       ${RSYNC} ${RSYNC_opt} -e ssh ${RUN_DIR}/$1 ${STOREHOST}:${2} >> out_rsync 2>&1
-
-#       #RSYNC WITH NFS USE
-#       echo ${RSYNC} ${RSYNC_opt} ${RUN_DIR}/$1 ${2} > out_rsync 2>&1
-#       ${RSYNC} ${RSYNC_opt} ${RUN_DIR}/$1 ${2} >> out_rsync 2>&1
-
-#       RET=$?
-#       IGCM_sys_Rsync_out $RET
-
-#       ${libIGCM}/libIGCM_sys/IGCM_analyse_rsync_out.awk out_rsync
-#       (( RET=RET+$? ))
+#       #RSYNC WITH NETWORK SSH CALL
+#       echo ${RSYNC} ${RSYNC_opt} -e ssh ${RUN_DIR}/$1 ${STOREHOST}:${2} > out_rsync 2>&1
+#       ${RSYNC} ${RSYNC_opt} -e ssh ${RUN_DIR}/$1 ${STOREHOST}:${2} >> out_rsync 2>&1
+
+#       #RSYNC WITH NFS USE
+#       echo ${RSYNC} ${RSYNC_opt} ${RUN_DIR}/$1 ${2} > out_rsync 2>&1
+#       ${RSYNC} ${RSYNC_opt} ${RUN_DIR}/$1 ${2} >> out_rsync 2>&1
+
+#       RET=$?
+#       IGCM_sys_Rsync_out $RET
+
+#       ${libIGCM}/libIGCM_sys/IGCM_analyse_rsync_out.awk out_rsync
+#       (( RET=RET+$? ))
 
     if [ ${RET} -gt 0 ] ; then
@@ -1296 +1296 @@
     if [ X${JobType} = XRUN ] ; then
       if [ X${3} = X ] ; then
-        IGCM_sys_Chmod 444 ${1}
+        IGCM_sys_Chmod 444 ${1}
       fi
     fi
@@ -1326 +1326 @@
   IGCM_debug_PushStack "IGCM_sys_Get" $@
 
-  typeset DEST RET dm_liste ifile target file_work 
+  typeset DEST RET dm_liste ifile target file_work
 
   if ( $DEBUG_sys ) ; then
@@ -1383 +1383 @@
     #   RET=$?
     #   if [ ${RET} -gt 0 ] ; then
-    #       echo "ERROR IGCM_sys_Get : again demigration error :"
-    #       cat out_rsync
-    #       IGCM_debug_Exit "IGCM_sys_Get"
+    #       echo "ERROR IGCM_sys_Get : again demigration error :"
+    #       cat out_rsync
+    #       IGCM_debug_Exit "IGCM_sys_Get"
     #   fi
     #    else
@@ -1398 +1398 @@
       (( RET=0 ))
       for target in ${dm_liste[*]} ; do
-        local_file=$( basename ${target} )
-        \cp ${target} ${DEST}/${local_file} >> out_rsync 2>&1
-        (( RET = RET + $? ))
+        local_file=$( basename ${target} )
+        \cp ${target} ${DEST}/${local_file} >> out_rsync 2>&1
+        (( RET = RET + $? ))
       done
     else
@@ -1407 +1407 @@
     fi
 
-#       #RSYNC WITH NETWORK SSH CALL
-#       echo ${RSYNC} ${RSYNC_opt} -e ssh ${STOREHOST}:"${dm_liste}" ${STOREHOST}:${RUN_DIR}/${DEST} > out_rsync 2>&1
-#       ${RSYNC} ${RSYNC_opt} -e ssh ${STOREHOST}:"${dm_liste}" ${STOREHOST}:${RUN_DIR}/${DEST} >> out_rsync 2>&1
-
-#       #RSYNC WITH NFS USE
-#       echo ${RSYNC} ${RSYNC_opt} ${dm_liste} ${RUN_DIR}/${DEST} > out_rsync 2>&1
-#       ${RSYNC} ${RSYNC_opt} ${dm_liste} ${RUN_DIR}/${DEST} >> out_rsync 2>&1
-
-#       RET=$?
-#       IGCM_sys_Rsync_out $RET
-
-#       ${libIGCM}/libIGCM_sys/IGCM_analyse_rsync_out.awk out_rsync
-#       (( RET=RET+$? ))
+#       #RSYNC WITH NETWORK SSH CALL
+#       echo ${RSYNC} ${RSYNC_opt} -e ssh ${STOREHOST}:"${dm_liste}" ${STOREHOST}:${RUN_DIR}/${DEST} > out_rsync 2>&1
+#       ${RSYNC} ${RSYNC_opt} -e ssh ${STOREHOST}:"${dm_liste}" ${STOREHOST}:${RUN_DIR}/${DEST} >> out_rsync 2>&1
+
+#       #RSYNC WITH NFS USE
+#       echo ${RSYNC} ${RSYNC_opt} ${dm_liste} ${RUN_DIR}/${DEST} > out_rsync 2>&1
+#       ${RSYNC} ${RSYNC_opt} ${dm_liste} ${RUN_DIR}/${DEST} >> out_rsync 2>&1
+
+#       RET=$?
+#       IGCM_sys_Rsync_out $RET
+
+#       ${libIGCM}/libIGCM_sys/IGCM_analyse_rsync_out.awk out_rsync
+#       (( RET=RET+$? ))
 
     if [ ${RET} -gt 0 ] ; then
@@ -1442 +1442 @@
   IGCM_debug_PushStack "IGCM_sys_GetBuffer" $@
 
-  typeset DEST RET buf_liste ifile target file_work 
+  typeset DEST RET buf_liste ifile target file_work
 
   if ( $DEBUG_sys ) ; then
@@ -1460 +1460 @@
       (( RET=0 ))
       for target in ${buf_liste[*]} ; do
-        local_file=$( basename ${target} )
-        \cp ${target} ${DEST}/${local_file} >> out_rsync 2>&1
-        (( RET = RET + $? ))
+        local_file=$( basename ${target} )
+        \cp ${target} ${DEST}/${local_file} >> out_rsync 2>&1
+        (( RET = RET + $? ))
       done
     else
@@ -1502 +1502 @@
 #D-#==================================================
 #D-function IGCM_sys_GetDate_FichArchive
-#D-* Purpose: donne la date filesys d'un fichier sur le filesystem ARCHIVE 
+#D-* Purpose: donne la date filesys d'un fichier sur le filesystem ARCHIVE
 #D-* Examples:
 #D-
@@ -1538 +1538 @@
     /ccc/cont003/home/dsm/p86maf/bin/dods_rm public/${LOGIN}/${R_DODS}/${1} # > out_dods_rm 2>&1
     RET=$?
-    
+
 #       if [ ${RET} -gt 0 ] ; then
-#           echo "IGCM_sys_Dods_Rm : error."
-#           cat out_dods_rm
-#           IGCM_debug_Exit "IGCM_sys_Dods_Rm"
+#           echo "IGCM_sys_Dods_Rm : error."
+#           cat out_dods_rm
+#           IGCM_debug_Exit "IGCM_sys_Dods_Rm"
 #       else
-#           rm out_dods_rm
+#           rm out_dods_rm
 #       fi
 
@@ -1575 +1575 @@
     RET=$?
 
-#       if [ ${RET} -gt 0 ] ; then
-#           echo "IGCM_sys_Dods_Cp : error."
-#           cat out_dods_cp
-#           IGCM_debug_Exit "IGCM_sys_Dods_Cp"
-#       else
-#           rm out_dods_cp
-#       fi
+#       if [ ${RET} -gt 0 ] ; then
+#           echo "IGCM_sys_Dods_Cp : error."
+#           cat out_dods_cp
+#           IGCM_debug_Exit "IGCM_sys_Dods_Cp"
+#       else
+#           rm out_dods_cp
+#       fi
 
   else
@@ -1627 +1627 @@
     IGCM_sys_Dods_Cp ${1}
     RET=0
-    
+
     if [ ${RET} -gt 0 ] ; then
       echo "IGCM_sys_Put_Dods : error."
@@ -1670 +1670 @@
   (( max_omp = 0 ))
   for comp in ${config_ListOfComponents[*]} ; do
-        
+
     eval ExeNameIn=\${config_Executable_${comp}[0]}
     eval ExeNameOut=\${config_Executable_${comp}[1]}
-    
+
     # Only if we really have an executable for the component :
     if ( [ "X${ExeNameOut}" != X\"\" ] &&  [ "X${comp}" != "XCPL" ] ) ; then
@@ -1711 +1711 @@
 ############################################################
 # Build MPI/OMP scripts
-function IGCM_sys_build_execution_scripts 
+function IGCM_sys_build_execution_scripts
 {
   IGCM_debug_PushStack "IGCM_sys_build_execution_scripts" $@
@@ -1717 +1717 @@
     echo "IGCM_sys_build_execution_scripts " $@
   fi
-  typeset nodes listnodes init_node start_num init_exec comp ExeNameIn ExeNameOut 
-  typeset node_num_current node_current comp_proc_mpi_loc comp_proc_omp_loc 
+  typeset nodes listnodes init_node start_num init_exec comp ExeNameIn ExeNameOut
+  typeset node_num_current node_current comp_proc_mpi_loc comp_proc_omp_loc
   typeset num_corempi nombre_restant_node nombre_restant_comp
 
@@ -1737 +1737 @@
 
       ${HOST_MPIRUN_COMMAND} hostname | sort | uniq > hosts.tmp
-        
+
       i=0
       rm -f hosts
@@ -1748 +1748 @@
       done
       rm -f hosts.tmp
-            
+
       listnodes=${host[*]}
-            
-      EXECUTION="${HOST_MPIRUN_COMMAND} -hostfile hosts" 
-        
+
+      EXECUTION="${HOST_MPIRUN_COMMAND} -hostfile hosts"
+
       # Initialisation
 
@@ -1761 +1761 @@
 
       # Test : if oasis is there, we put it at the first position
-            
+
       for comp in ${config_ListOfComponents[*]} ; do
-                
+
         if [ "X${comp}" = "XCPL" ]  ; then
-                    
+
           eval ExeNameIn=\${config_Executable_${comp}[0]}
           eval ExeNameOut=\${config_Executable_${comp}[1]}
-                    
+
           echo "#!/bin/ksh" > script_${ExeNameOut}.ksh
           echo ""  >> script_${ExeNameOut}.ksh
@@ -1776 +1776 @@
           echo "./${ExeNameOut} > out_${ExeNameOut}.out 2>out_${ExeNameOut}.err"  >> script_${ExeNameOut}.ksh
           IGCM_sys_Chmod u+x script_${ExeNameOut}.ksh
-                    
+
           init_node=n
-                    
+
           (( nombre_restant_node = NUM_COREPERNODE - 1 ))
           node_num_current=0
           node_current=${host[${node_num_current}]}
-                    
-          EXECUTION="${EXECUTION} -H ${node_current} -np 1 ./script_${ExeNameOut}.ksh" 
-                    
+
+          EXECUTION="${EXECUTION} -H ${node_current} -np 1 ./script_${ExeNameOut}.ksh"
+
           init_exec=y
           start_num=1
-                    
+
         fi
-                
+
       done
-            
+
       # Then loop on the components (except for oasis)
 
       for comp in ${config_ListOfComponents[*]} ; do
-                
+
         eval ExeNameIn=\${config_Executable_${comp}[0]}
         eval ExeNameOut=\${config_Executable_${comp}[1]}
-                
+
         # Only if we really have an executable for the component :
         if ( [ "X${ExeNameOut}" != X\"\" ] &&  [ "X${comp}" != "XCPL" ] ) ; then
@@ -1804 +1804 @@
           eval comp_proc_mpi_loc=\${${comp}_PROC_MPI}
           eval comp_proc_omp_loc=\${${comp}_PROC_OMP}
-                    
+
           echo "#!/bin/ksh" > script_${ExeNameOut}.ksh
           # echo "set -vx" >> script_${ExeNameOut}.ksh
@@ -1815 +1815 @@
           echo "./${ExeNameOut} > out_${ExeNameOut}.out.\${MYMPIRANK} 2>out_${ExeNameOut}.err.\${MYMPIRANK}"  >> script_${ExeNameOut}.ksh
           IGCM_sys_Chmod u+x script_${ExeNameOut}.ksh
-                    
+
           node_num=0
-                    
-          # We define the number of MPI process to be assigned for the component 
+
+          # We define the number of MPI process to be assigned for the component
 
           nombre_restant_comp=${comp_proc_mpi_loc}
-                    
+
           # Loop on the allocated nodes
 
@@ -1829 +1829 @@
             if [ ${node_num} = ${node_num_current} ] ; then
 
-              node_current=${host[${node_num_current}]}
-
-              # If first time on the node : initialisation 
+              node_current=${host[${node_num_current}]}
+
+              # If first time on the node : initialisation
 
               if [ ${init_node} = y ] ; then
                 nombre_restant_node=${NUM_COREPERNODE}
-              fi
-                            
+              fi
+
               # Test on the number of OMP threads
 
-              if [ ${comp_proc_omp_loc} -gt ${nombre_restant_node} ] ; then
+              if [ ${comp_proc_omp_loc} -gt ${nombre_restant_node} ] ; then
                 (( node_num = node_num + 1 ))
                 node_num_current=${node_num}
@@ -1849 +1849 @@
 
               (( num_corempi = nombre_restant_node / comp_proc_omp_loc ))
-                            
-              if [ ${num_corempi} -gt ${nombre_restant_comp} ] ; then
+
+              if [ ${num_corempi} -gt ${nombre_restant_comp} ] ; then
                 num_corempi=${nombre_restant_comp}
               fi
 
               (( nombre_restant_node = nombre_restant_node - num_corempi * comp_proc_omp_loc ))
-              (( nombre_restant_comp = nombre_restant_comp - num_corempi ))
-                            
-              if [ ${init_exec} = y ] ; then
+              (( nombre_restant_comp = nombre_restant_comp - num_corempi ))
+
+              if [ ${init_exec} = y ] ; then
                 EXECUTION="${EXECUTION} : -H ${node_current} -np ${num_corempi} ./script_${ExeNameOut}.ksh"
-              else      
+              else
                 EXECUTION="${EXECUTION} -H ${node_current} -np ${num_corempi} ./script_${ExeNameOut}.ksh"
                 init_exec=y
@@ -1865 +1865 @@
 
               ((  start_num = num_corempi + start_num ))
-                            
+
             else
-                            
-              (( node_num = node_num + 1 )) 
-              continue
+
+              (( node_num = node_num + 1 ))
+              continue
             fi
-                        
-            # Test on the number of core/process remaining on the node/component 
-                        
+
+            # Test on the number of core/process remaining on the node/component
+
             if [ ${nombre_restant_node} = 0 ] ; then
               (( node_num = node_num + 1 ))
-              node_num_current=${node_num}
-              init_node=y
+              node_num_current=${node_num}
+              init_node=y
 
               if [ ${nombre_restant_comp} = 0 ] ; then
@@ -1885 +1885 @@
 
               node_num_current=${node_num}
-              init_node=n
-                            
-              if [ ${nombre_restant_comp} = 0 ] ; then
-                break 1
-              fi
+              init_node=n
+
+              if [ ${nombre_restant_comp} = 0 ] ; then
+                break 1
+              fi
             fi
           done
         fi
       done
-            
+
     else
 
@@ -1900 +1900 @@
 
         ## the coupler ie oasis must be the first one
-        for comp in ${config_ListOfComponents[*]} ; do
-            
-            eval ExeNameOut=\${config_Executable_${comp}[1]}
-                
-        # for CPL component only
-            if [ "X${comp}" = "XCPL" ] ; then
-                eval comp_proc_mpi_loc=\${${comp}_PROC_MPI}
-                echo "-np ${comp_proc_mpi_loc} ./${ExeNameOut} " >> run_file 
-            fi
-        done
+        for comp in ${config_ListOfComponents[*]} ; do
+
+            eval ExeNameOut=\${config_Executable_${comp}[1]}
+
+        # for CPL component only
+            if [ "X${comp}" = "XCPL" ] ; then
+                eval comp_proc_mpi_loc=\${${comp}_PROC_MPI}
+                echo "-np ${comp_proc_mpi_loc} ./${ExeNameOut} " >> run_file
+            fi
+        done
 
         # Then second loop on the components
 
-        for comp in ${config_ListOfComponents[*]} ; do
-                
-            eval ExeNameOut=\${config_Executable_${comp}[1]}
-                
+        for comp in ${config_ListOfComponents[*]} ; do
+
+            eval ExeNameOut=\${config_Executable_${comp}[1]}
+
             # Only if we really have an executable for the component and not the coupler ie oasis:
-            if ( [ "X${ExeNameOut}" != X\"\" ] && [ "X${comp}" != "XCPL" ] ) ; then
-                eval comp_proc_mpi_loc=\${${comp}_PROC_MPI}
-                echo "-np ${comp_proc_mpi_loc} ./${ExeNameOut} " >> run_file 
-            fi
-        done
-        IGCM_sys_Chmod u+x run_file
-
-        EXECUTION="${HOST_MPIRUN_COMMAND} --app ./run_file"
-          
+            if ( [ "X${ExeNameOut}" != X\"\" ] && [ "X${comp}" != "XCPL" ] ) ; then
+                eval comp_proc_mpi_loc=\${${comp}_PROC_MPI}
+                echo "-np ${comp_proc_mpi_loc} ./${ExeNameOut} " >> run_file
+            fi
+        done
+        IGCM_sys_Chmod u+x run_file
+
+        EXECUTION="${HOST_MPIRUN_COMMAND} --app ./run_file"
+
     fi
 
@@ -1934 +1934 @@
 
           # Only if we really have an executable for the component :
-          eval ExeNameOut=\${config_Executable_${comp}[1]}
-          if ( [ "X${ExeNameOut}" != X\"\" ] ) ; then   
-                
-              echo "#!/bin/ksh" > script_${ExeNameOut}.ksh
-              echo ""  >> script_${ExeNameOut}.ksh
-              if ( ${OK_PARA_OMP} ) ; then 
-                  eval comp_proc_omp_loc=\${${comp}_PROC_OMP}
-                  echo "OMP_NUM_THREADS=${comp_proc_omp_loc}" >> script_${ExeNameOut}.ksh       
-              fi
-              if  ( ${OK_PARA_MPI} ) ; then 
+          eval ExeNameOut=\${config_Executable_${comp}[1]}
+          if ( [ "X${ExeNameOut}" != X\"\" ] ) ; then
+
+              echo "#!/bin/ksh" > script_${ExeNameOut}.ksh
+              echo ""  >> script_${ExeNameOut}.ksh
+              if ( ${OK_PARA_OMP} ) ; then
+                  eval comp_proc_omp_loc=\${${comp}_PROC_OMP}
+                  echo "OMP_NUM_THREADS=${comp_proc_omp_loc}" >> script_${ExeNameOut}.ksh
+              fi
+              if  ( ${OK_PARA_MPI} ) ; then
                   # Default : mpirun used if nb_proc gt 1
-                  # pour sortie out/err par process
-                  # echo "./${ExeNameOut} > out_${ExeNameOut}.out.\${OMPI_COMM_WORLD_RANK} 2>out_${ExeNameOut}.err.\${OMPI_COMM_WORLD_RANK}"  >> script_${ExeNameOut}.ksh
-                  echo "./${ExeNameOut}" >> script_${ExeNameOut}.ksh
-                  IGCM_sys_Chmod u+x script_${ExeNameOut}.ksh
-                  EXECUTION="${HOST_MPIRUN_COMMAND} ./script_${ExeNameOut}.ksh"
-              else
-                  # Default : mpirun is NOT used if nb_proc eq 1
-                  # pour sortie out/err par process
-                  # echo "./${ExeNameOut} > out_${ExeNameOut}.out 2>out_${ExeNameOut}.err" >> script_${ExeNameOut}.ksh
-                  echo "./${ExeNameOut}" >> script_${ExeNameOut}.ksh
-                  IGCM_sys_Chmod u+x script_${ExeNameOut}.ksh
-                  EXECUTION="time ./script_${ExeNameOut}.ksh"
-              fi
-          fi
+                  # pour sortie out/err par process
+                  # echo "./${ExeNameOut} > out_${ExeNameOut}.out.\${OMPI_COMM_WORLD_RANK} 2>out_${ExeNameOut}.err.\${OMPI_COMM_WORLD_RANK}"  >> script_${ExeNameOut}.ksh
+                  echo "./${ExeNameOut}" >> script_${ExeNameOut}.ksh
+                  IGCM_sys_Chmod u+x script_${ExeNameOut}.ksh
+                  EXECUTION="${HOST_MPIRUN_COMMAND} ./script_${ExeNameOut}.ksh"
+              else
+                  # Default : mpirun is NOT used if nb_proc eq 1
+                  # pour sortie out/err par process
+                  # echo "./${ExeNameOut} > out_${ExeNameOut}.out 2>out_${ExeNameOut}.err" >> script_${ExeNameOut}.ksh
+                  echo "./${ExeNameOut}" >> script_${ExeNameOut}.ksh
+                  IGCM_sys_Chmod u+x script_${ExeNameOut}.ksh
+                  EXECUTION="time ./script_${ExeNameOut}.ksh"
+              fi
+          fi
       done
-      
+
   fi