Changeset 1093

Timestamp:

10/17/14 10:07:02 (10 years ago)

Author:

sdipsl

Message:

cosmetics : emacs macro whitespace-clean and indent-region

File:

• trunk/libIGCM/libIGCM_sys/libIGCM_sys_ada.ksh (modified) (1 diff)

trunk/libIGCM/libIGCM_sys/libIGCM_sys_ada.ksh

@@ -2037 +2037 @@
           (( mpi_count = 1 ))
           until [ ${mpi_count} -gt ${comp_proc_mpi_loc} ] ; do
-              if ( ${OK_PARA_OMP} ) ; then
-                  # Check if the number of threads is correct
-                      case ${comp_proc_omp_loc} in
-                          1|2)
-                              IGCM_debug_Print 1 "You run ${ExeNameOut} on ${comp_proc_omp_loc} OMP threads"
-                              ;;
-                          4|8|16)
-                              IGCM_debug_Exit "ERROR with OMP parameters !"
-                              IGCM_debug_Print 2 "Beware : ${comp_proc_omp_loc} is too much for MPMD mode"
-                              IGCM_debug_Print 2 "You will use more CPU than needed"
-                              IGCM_debug_Verif_Exit
-                              ;;
-                          *) 
-                              IGCM_debug_Exit "ERROR with OMP parameters !"
-                              IGCM_debug_Print 2 "${comp_proc_omp_loc} is not possible as number of OMP threads"
-                              IGCM_debug_Print 2 "Only 2,4,8,16 as number of OMP threads are possible "
-                              IGCM_debug_Verif_Exit
-                              ;;
-                      esac
-                  echo "env OMP_NUM_THREADS=$comp_proc_omp_loc ./${ExeNameOut}" >> run_file 
-              else
-                  echo "./${ExeNameOut}" >> run_file
-              fi
-              (( mpi_count = mpi_count + 1 ))
+            if ( ${OK_PARA_OMP} ) ; then
+              # Check if the number of threads is correct
+              case ${comp_proc_omp_loc} in
+              1|2)
+                IGCM_debug_Print 1 "You run ${ExeNameOut} on ${comp_proc_omp_loc} OMP threads"
+                ;;
+              4|8|16)
+                IGCM_debug_Exit "ERROR with OMP parameters !"
+                IGCM_debug_Print 2 "Beware : ${comp_proc_omp_loc} is too much for MPMD mode"
+                IGCM_debug_Print 2 "You will use more CPU than needed"
+                IGCM_debug_Verif_Exit
+                ;;
+              *)
+                IGCM_debug_Exit "ERROR with OMP parameters !"
+                IGCM_debug_Print 2 "${comp_proc_omp_loc} is not possible as number of OMP threads"
+                IGCM_debug_Print 2 "Only 2,4,8,16 as number of OMP threads are possible "
+                IGCM_debug_Verif_Exit
+                ;;
+              esac
+              echo "env OMP_NUM_THREADS=$comp_proc_omp_loc ./${ExeNameOut}" >> run_file
+            else
+              echo "./${ExeNameOut}" >> run_file
+            fi
+            (( mpi_count = mpi_count + 1 ))
           done
         else
-            echo "./${ExeNameOut} " >> run_file
+          echo "./${ExeNameOut} " >> run_file
         fi
-        if ( ${OK_PARA_OMP} ) ; then
-            export KMP_STACKSIZE=200m
-        fi
+        if ( ${OK_PARA_OMP} ) ; then
+          export KMP_STACKSIZE=200m
+        fi
       fi
     done