Changeset 1106 for palm/trunk/SCRIPTS

Timestamp:

Mar 4, 2013 5:31:38 AM (11 years ago)

Author:

raasch

Message:

New:
---

Porting of FFT-solver for serial runs to GPU using CUDA FFT,
preprocessor lines in transpose routines rearranged, so that routines can also
be used in serial (non-parallel) mode,
transpositions also carried out in serial mode, routines fftx, fftxp replaced
by calls of fft_x, fft_x replaced by fft_x_1d in the 1D-decomposition routines
(Makefile, Makefile_check, fft_xy, poisfft, poisfft_hybrid, transpose, new: cuda_fft_interfaces)

--stdin argument for mpiexec on lckyuh, -y and -Y settings output to header (mrun)

Changed:

---

Module array_kind renamed precision_kind
(check_open, data_output_3d, fft_xy, modules, user_data_output_3d)

some format changes for coupled atmosphere-ocean runs (header)
small changes in code formatting (microphysics, prognostic_equations)

Errors:

---

bugfix: default value (0) assigned to coupling_start_time (modules)
bugfix: initial time for preruns of coupled runs is output as -coupling_start_time (data_output_profiles)

File:

• palm/trunk/SCRIPTS/mrun (modified) (4 diffs)

palm/trunk/SCRIPTS/mrun

@@ -22 +22 @@
 # Current revisions:
 # ------------------
-# 
+# --stdin argument for mpiexec on lckyuh
+# -y and -Y settings output to header
 #
 # Former revisions:
@@ -2029 +2030 @@
  if [[ -n $numprocs ]]
  then
-    spalte1="number of PEs:"; spalte2=$numprocs
+    if [[ $run_coupled_model = false ]]
+    then
+       spalte1="number of PEs:"; spalte2=$numprocs
+    else
+       spalte1="number of PEs:"; spalte2="$numprocs  (atmosphere: $numprocs_atmos, ocean: $numprocs_ocean)"
+    fi
     printf "| %-25s%-45s | \n" "$spalte1" "$spalte2"
  fi
@@ -2126 +2132 @@
  spalte1="OUTPUT control list:"; spalte2=$(echo $output_list)
  printf "| %-25s%-45s | \n" "$spalte1" "$spalte2"
+
+ if [[ "$ocean_file_appendix" = true ]]
+ then
+    printf "| %-35s%-35s | \n" "suffix \"_O\" is added to local files" " "
+ fi
 
  if [[ $do_batch = true  ||  "$LOADLBATCH" = yes ]]
@@ -3650 +3661 @@
                 elif [[ $host = lckyu* ]]
                 then
-                   mpiexec -n $ii  ./a.out  < runfile_atmos  $ROPTS
+                   mpiexec -n $ii --stdin runfile_atmos  ./a.out  $ROPTS
                 else
-                   mpiexec  -machinefile hostfile  -n $ii  a.out  < runfile_atmos  $ROPTS
+                   mpiexec  -machinefile hostfile  -n $ii  a.out  <  runfile_atmos  $ROPTS
                 fi
              else