Changeset 555 for palm/trunk
- Timestamp:
- Sep 7, 2010 7:32:53 AM (14 years ago)
- Location:
- palm/trunk
- Files:
-
- 12 edited
Legend:
- Unmodified
- Added
- Removed
-
palm/trunk/DOC/app/chapter_3.5.3.html
r132 r555 1 1 <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN"> 2 2 <html><head> 3 3 4 <meta http-equiv="CONTENT-TYPE" content="text/html; charset=windows-1252"><title>PALM chapter 3.5.3</title> <meta name="GENERATOR" content="StarOffice 7 (Win32)"> <meta name="AUTHOR" content="Siegfried Raasch"> <meta name="CREATED" content="20040802;14001660"> <meta name="CHANGED" content="20041112;14483720"> <meta name="KEYWORDS" content="parallel LES model"> <style> 4 5 <!-- 5 6 @page { size: 21cm 29.7cm } 6 7 --> 7 </style></head> 8 <body style="direction: ltr;" lang="en-US"><h3 style="line-height: 100%;">3.5.3 Definition of user-defined 8 </style></head><body style="direction: ltr;" lang="en-US"><h3 style="line-height: 100%;">3.5.3 Definition of user-defined 9 9 subdomains</h3> 10 10 <p style="line-height: 100%;">By default, the values of … … 20 20 <p style="line-height: 100%;">The exact definition of 21 21 these subdomains 22 has to be made by the user within the user-defined subroutine 23 <tt><font style="font-size: 10pt;" size="2">init_user</font></tt>. 22 has to be made by the user within the user-defined subroutine <tt><font style="font-size: 10pt;" size="2">user_init</font></tt>. 24 23 The 25 24 subdomains are defined with a mask array named <tt><font style="font-size: 10pt;" size="2">rmask</font></tt>, … … 93 92 if 94 93 the user sets <a href="chapter_4.1.html#statistic_regions">statistic_regions</a> 95 & ge; <i>1</i>. Beyond that, names for the user-defined94 ≥ <i>1</i>. Beyond that, names for the user-defined 96 95 subdomains can be 97 96 assigned -
palm/trunk/DOC/app/chapter_4.1.html
r531 r555 1 1 <!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"> 2 2 <html><head> 3 3 4 4 5 … … 9847 9848 the pressure 9848 9849 boundary condition <a href="#bc_p_b">bc_p_b</a> 9849 = <i>'neumann+inhomo'</i> is not allowed. </p> 9850 = <i>'neumann+inhomo'</i> is not allowed.<br> 9851 </p> 9852 <p>If the Prandtl-layer is switched off and fluxes shall be prescribed at the surface (by setting <a href="#surface_heatflux">surface_heatflux</a>), it is required to set the parameter <a href="#use_surface_fluxes">use_surface_fluxes</a> = <span style="font-style: italic;">.T.</span>.<br> 9853 </p> 9854 9850 9855 9851 9856 … … 12774 12779 can be used to impose random perturbations on the (homogeneous) surface 12775 12780 heat 12776 flux field <span style="font-style: italic;">shf</span>. </p> 12781 flux field <span style="font-style: italic;">shf</span>.<br> 12782 </p> 12783 <p><span style="font-weight: bold;">Attention:</span><br> 12784 Setting of <span style="font-weight: bold;">surface_heatflux</span> requires setting of <a href="#use_surface_fluxes">use_surface_fluxes</a>=<span style="font-style: italic;">.T.</span>, if the Prandtl-layer is switched off (<a href="#prandtl_layer">prandtl_layer</a>=<span style="font-style: italic;">.F.</span>). </p> 12785 12777 12786 12778 12787 -
palm/trunk/DOC/app/chapter_4.2.html
r531 r555 6896 6896 6897 6897 6898 <td style="vertical-align: top;">Total 6898 <td style="vertical-align: top;">Total (resolved and subgrid-scale) 6899 6899 kinetic energy of 6900 6900 the flow (in m<sup>2</sup>/s<sup>2</sup>) … … 6926 6926 6927 6927 6928 <td style="vertical-align: top;">Perturbation 6929 kinetic 6928 <td style="vertical-align: top;">Resolved-scale kinetic 6930 6929 energy of the flow (in m<sup>2</sup>/s<sup>2</sup>)<sup> 6931 6930 </sup>(normalized … … 11890 11889 11891 11890 11892 <td style="vertical-align: top;"><i> ŽreflectŽ</i></td>11891 <td style="vertical-align: top;"><i>ï¿œreflectï¿œ</i></td> 11893 11892 11894 11893 … … 11915 11914 default, particles are reflected at the bottom boundary. 11916 11915 Alternatively, a particle absorption can set by <b>bc_par_b</b> 11917 = <i> ŽabsorbŽ</i>.</p>11916 = <i>ï¿œabsorbï¿œ</i>.</p> 11918 11917 11919 11918 … … 11958 11957 11959 11958 11960 <td style="vertical-align: top;"><i> ŽcyclicŽ</i></td>11959 <td style="vertical-align: top;"><i>ï¿œcyclicï¿œ</i></td> 11961 11960 11962 11961 … … 11984 11983 are used along x. 11985 11984 Alternatively, reflection (<b>bc_par_lr</b> 11986 = <i> ŽreflectŽ</i>) or absorption (<b>bc_par_lr</b>11987 = <i> ŽabsorbŽ</i>)11985 = <i>ï¿œreflectï¿œ</i>) or absorption (<b>bc_par_lr</b> 11986 = <i>ï¿œabsorbï¿œ</i>) 11988 11987 can be set. <br> 11989 11988 … … 12046 12045 12047 12046 12048 <td style="vertical-align: top;"><i> ŽcyclicŽ</i></td>12047 <td style="vertical-align: top;"><i>ï¿œcyclicï¿œ</i></td> 12049 12048 12050 12049 … … 12072 12071 are used along y. 12073 12072 Alternatively, reflection (<b>bc_par_ns</b> 12074 = <i> ŽreflectŽ</i>) or absorption (<b>bc_par_ns</b>12075 = <i> ŽabsorbŽ</i>)12073 = <i>ï¿œreflectï¿œ</i>) or absorption (<b>bc_par_ns</b> 12074 = <i>ï¿œabsorbï¿œ</i>) 12076 12075 can be set.<br> 12077 12076 … … 12124 12123 12125 12124 12126 <td style="vertical-align: top;"><i> ŽabsorbŽ</i></td>12125 <td style="vertical-align: top;"><i>ï¿œabsorbï¿œ</i></td> 12127 12126 12128 12127 … … 12149 12148 particles are absorbed at the top boundary. 12150 12149 Alternatively, a reflection condition can be set by <b>bc_par_t</b> 12151 = <i> ŽreflectŽ</i>.</p>12150 = <i>ï¿œreflectï¿œ</i>.</p> 12152 12151 12153 12152 -
palm/trunk/DOC/app/chapter_4.5.7.html
r388 r555 1 1 <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN"> 2 2 <html><head> 3 3 4 4 5 <meta http-equiv="CONTENT-TYPE" content="text/html; charset=windows-1252"><title>PALM chapter 4.5.7</title> <meta name="GENERATOR" content="StarOffice 7 (Win32)"> <meta name="AUTHOR" content="Siegfried Raasch"> <meta name="CREATED" content="20041029;14344622"> <meta name="CHANGED" content="20050119;9531085"> <meta name="KEYWORDS" content="parallel LES model"> <style> … … 68 69 computer which is defined via the package parameter <a href="chapter_4.2.html#dvrp_host">dvrp_host</a>. If the default values of the dvrp parameters are used, data are send to a so-called <span style="font-style: italic;">streaming server</span> at the 69 70 RRZN. Apart from graphic data an additional html file is created, which 70 can be opened by an internet browser to view the data (a special <span style="font-weight: bold;">dvrp</span> plugin is required for this).</p><p style="line-height: 100%;"></p><p style="line-height: 100%;"><span style="font-weight: bold;">Quickstart guide for using dvrp on the HLRN/IMUK-System ( May 2009):</span></p><p style="line-height: 100%;">In the following, please replace the string<span style="font-family: Courier New,Courier,monospace; font-weight: bold;"> <UNAME> </span>with your IMUK username, wherever it appears. Please also replace the string<span style="font-family: Courier New,Courier,monospace;"><span style="font-weight: bold;"> <UDIR></span> </span>with a subdirectory name of your choice. <span style="font-weight: bold;"></span> </p>71 can be opened by an internet browser to view the data (a special <span style="font-weight: bold;">dvrp</span> plugin is required for this).</p><p style="line-height: 100%;"></p><p style="line-height: 100%;"><span style="font-weight: bold;">Quickstart guide for using dvrp on the HLRN/IMUK-System (June 2010):</span></p><p style="line-height: 100%;">In the following, please replace the string<span style="font-family: Courier New,Courier,monospace; font-weight: bold;"> <UNAME> </span>with your IMUK username, wherever it appears. Please also replace the string<span style="font-family: Courier New,Courier,monospace;"><span style="font-weight: bold;"> <UDIR></span> </span>with a subdirectory name of your choice. <span style="font-weight: bold;"></span> </p> 71 72 <ol><li> 72 73 Add the following define statements for environment variables to the configuration file (<span style="font-family: Courier New,Courier,monospace;">.mrun.config</span>):<br><br><span style="font-family: Courier New,Courier,monospace;"></span><span style="font-family: Courier New,Courier,monospace;"> %dvr_inc 73 74 -I/home/h/niksiraa/dvr_mvapich2/lib 74 75 lcsgih parallel</span><br style="font-family: Courier New,Courier,monospace;"><span style="font-family: Courier New,Courier,monospace;"> %dvr_lib -L/home/h/niksiraa/dvr_mvapich2/lib:-lDVRP2:-lftp lcsgih 75 parallel</span><br><br><br></li><li>Add the dvrp-steering parameters to your NAMELIST-parameter file, e.g.<br><br><span style="font-family: Courier New,Courier,monospace;"> &d3par end_time = 3600.0,<br> ... /<br><br> &dvrp_graphics_par dvrp_username = '<span style="font-weight: bold;"><UNAME></span>',<br> dvrp_host = '130.75.105. 2',<br> 76 parallel</span><br><br><br></li><li>Add the dvrp-steering parameters to your NAMELIST-parameter file, e.g.<br><br><span style="font-family: Courier New,Courier,monospace;"> &d3par end_time = 3600.0,<br> ... /<br><br> &dvrp_graphics_par dvrp_username = '<span style="font-weight: bold;"><UNAME></span>',<br> dvrp_host = '130.75.105.6',<br> 76 77 77 dvrp_directory = '<span style="font-weight: bold;"><UNAME></span>/<span style="font-weight: bold;"><UDIR></span>', ... /<br></span><br>For other dvrp-parameters see <a href="chapter_4.2.html#Paketparameter">chapter 4.2</a>. An example parameter file can be found in directory <span style="font-family: Courier New,Courier,monospace;">..../trunk/EXAMPLES/dvr </span>.<span style="font-family: Courier New,Courier,monospace;"><br><br></span></li><li>On the IMUK-system, create a subdirectory in which the dvrp-data are stored and give it access permit for group <span style="font-style: italic;">palm</span>.<br><br><span style="font-family: Courier New,Courier,monospace;"> mkdir /data/raasch/Dvrp_daten/<span style="font-weight: bold;"><UNAME><br> 78 </span> chmod g+rwx</span><span style="font-family: Courier New,Courier,monospace;"> /data/raasch/Dvrp_daten/<span style="font-weight: bold;"><UNAME></span></span><br><br>This directory has to be created only once, before dvrp is used for the first time.<br> 79 <br></li><li>Submit the job with <span style="font-weight: bold;">mrun</span>-command<br><br><span style="font-family: Courier New,Courier,monospace;"> mrun .... -p dvrp_graphics ....</span><br><br></li><li><span style="font-family: Courier New,Courier,monospace;"><span style="font-family: Times New Roman,Times,serif;">After the job has finished, the dvrp-output can be found on the IMUK-cluster in a subdirectory under <span style="font-family: Courier New,Courier,monospace;">/data/raasch/Dvrp_daten</span>. The name of the subdirectory is determined by the dvrp-parameter <a href="chapter_4.2.html#dvrp_directory">dvrp_directory</a> (see above), i.e. if the user has set <span style="font-family: Courier New,Courier,monospace;">dvrp_directory</span> = <span style="font-style: italic;">'<span style="font-weight: bold;"><UNAME></span>/movie_1'</span>, the dvrp-data are stored under <span style="font-family: Courier New,Courier,monospace;">/data/raasch/Dvrp_daten/<span style="font-weight: bold;"><UNAME></span>/movie_1</span>.<br><br></span></span></li><li><span style="font-family: Courier New,Courier,monospace;"><span style="font-family: Times New Roman,Times,serif;">Change to this subdirectory (e.g. </span></span><span style="font-family: Courier New,Courier,monospace;"><span style="font-family: Times New Roman,Times,serif;"><span style="font-family: Courier New,Courier,monospace;">/data/raasch/Dvrp_daten/<UNAME>/movie_1</span></span></span><span style="font-family: Courier New,Courier,monospace;"><span style="font-family: Times New Roman,Times,serif;">) and enter the command<br><br><span style="font-family: Courier New,Courier,monospace;"> process_dvr_output</span><br><br>It will create a file with name <span style="font-family: Courier New,Courier,monospace;">all_streams_streaming.html</span>.<br><br></span></span></li><li><span style="font-family: Courier New,Courier,monospace;"><span style="font-family: Times New Roman,Times,serif;">Call the opera-browser (i.e. enter the command <span style="font-family: Courier New,Courier,monospace;">opera</span>) and open the file </span></span><span style="font-family: Courier New,Courier,monospace;"><span style="font-family: Times New Roman,Times,serif;"><span style="font-family: Courier New,Courier,monospace;">all_streams_streaming.html</span>.</span></span><span style="font-family: Courier New,Courier,monospace;"><span style="font-family: Times New Roman,Times,serif;"></span><br></span><br></li></ol><span style="font-weight: bold;">Further features:<br></span>The script<span style="font-family: Courier New,Courier,monospace;"> process_dvr_output </span>has additional options:<br><br><span style="font-weight: bold; font-family: Courier New,Courier,monospace;">-s</span> : <span style="font-weight: bold;">create sequence output</span>. 78 dvrp_directory = '<span style="font-weight: bold;"><UNAME></span>/<span style="font-weight: bold;"><UDIR></span>', ... /<br></span><br>For other dvrp-parameters see <a href="chapter_4.2.html#Paketparameter">chapter 4.2</a>. An example parameter file can be found in directory <span style="font-family: Courier New,Courier,monospace;">..../trunk/EXAMPLES/dvr </span>.<span style="font-family: Courier New,Courier,monospace;"><br><br></span></li><li>Ask the IMUK system operator (Notker Fechner) to mount the filesystem<span style="font-family: Courier New,Courier,monospace;"> /dvrdata </span>on your local computer.<br> 79 <br> 80 </li> 81 <li>On the IMUK-system (your local computer), create a subdirectory 82 in which the dvrp-data are stored and give it access permit for group <span style="font-style: italic;">palm</span>.<br><br><span style="font-family: Courier New,Courier,monospace;"> mkdir /dvrdata/<span style="font-weight: bold;"><UNAME><br> 83 </span> chmod g+rwx /dvrdata</span><span style="font-family: Courier New,Courier,monospace;">/<span style="font-weight: bold;"><UNAME></span></span><br><br><span style="font-weight: bold;">Steps 3. and 4. have to be done only once, before dvrp is used for the first time.</span><br> 84 <br></li> 85 <li>Submit the job with <span style="font-weight: bold;">mrun</span>-command<br><br><span style="font-family: Courier New,Courier,monospace;"> mrun .... -p dvrp_graphics ....</span><br><br></li><li><span style="font-family: Courier New,Courier,monospace;"><span style="font-family: Times New Roman,Times,serif;">After the job has finished, the dvrp-output can be found on the IMUK-cluster in a subdirectory under <span style="font-family: Courier New,Courier,monospace;">/dvrdata</span>. The name of the subdirectory is determined by the dvrp-parameter <a href="chapter_4.2.html#dvrp_directory">dvrp_directory</a> (see above), i.e. if the user has set <span style="font-family: Courier New,Courier,monospace;">dvrp_directory</span> = <span style="font-style: italic;">'<span style="font-weight: bold;"><UNAME></span>/movie_1'</span>, the dvrp-data are stored under <span style="font-family: Courier New,Courier,monospace;">/dvrdata/<span style="font-weight: bold;"><UNAME></span>/movie_1</span>.<br><br></span></span></li><li><span style="font-family: Courier New,Courier,monospace;"><span style="font-family: Times New Roman,Times,serif;">Change to this subdirectory (e.g. </span></span><span style="font-family: Courier New,Courier,monospace;"><span style="font-family: Times New Roman,Times,serif;"><span style="font-family: Courier New,Courier,monospace;">/dvrdata/<UNAME>/movie_1</span></span></span><span style="font-family: Courier New,Courier,monospace;"><span style="font-family: Times New Roman,Times,serif;">) and enter the command<br><br><span style="font-family: Courier New,Courier,monospace;"> process_dvr_output</span><br><br>It will create a file with name <span style="font-family: Courier New,Courier,monospace;">all_streams_streaming.html</span>.<br><br></span></span></li><li><span style="font-family: Courier New,Courier,monospace;"><span style="font-family: Times New Roman,Times,serif;">Call the opera-browser (i.e. enter the command <span style="font-family: Courier New,Courier,monospace;">opera</span>) and open the file </span></span><span style="font-family: Courier New,Courier,monospace;"><span style="font-family: Times New Roman,Times,serif;"><span style="font-family: Courier New,Courier,monospace;">all_streams_streaming.html</span>.</span></span><span style="font-family: Courier New,Courier,monospace;"><span style="font-family: Times New Roman,Times,serif;"></span><br></span><br></li></ol><span style="font-weight: bold;">Further features:<br></span>The script<span style="font-family: Courier New,Courier,monospace;"> process_dvr_output </span>has additional options:<br><br><span style="font-weight: bold; font-family: Courier New,Courier,monospace;">-s</span> : <span style="font-weight: bold;">create sequence output</span>. 80 86 All streams (and static scenes) are collected to one sequence (one 81 87 static scene), which can be displayed with a browser without using the … … 83 89 show animations on a notebook without beeing connected to the internet. 84 90 When the script is called with this option, the sequence is generated 85 in subdirectory sequence_data. Copy this subdirectory and the file 86 all_streams_sequence.html to a directory on your local computer and87 open the file all_streams_sequence.htmlwith your browser. For this,91 in subdirectory sequence_data. Copy this subdirectory and the file<span style="font-family: Courier New,Courier,monospace;"> 92 all_streams_sequence.html </span>to a directory on your local computer and 93 open the file<span style="font-family: Courier New,Courier,monospace;"> all_streams_sequence.html </span>with your browser. For this, 88 94 you will need to install the the dvr-plugin (see webpage of the <a href="http://www.dsvr-software.de/">dsvr-software</a>) on your local computer, which is also available for Windows.<br><br><span style="font-weight: bold;">-a</span> : <span style="font-weight: bold;">acceleration factor</span>. If, in case of sequence mode, the performance of the animation is to slow, you can accelerate it. E.g., by using <span style="font-family: Courier New,Courier,monospace;">"-a 2</span>", only every second frame of the original streams will be used for the sequence.<br><br><br><br><br><span style="font-weight: bold;">Current limitations (May 09):</span><br>Only a special opera-version on host "bora" can be used. Log-in on "bora" and call <span style="font-family: Courier New,Courier,monospace;">/usr/bin/opera</span>. <span style="font-weight: bold;">Before that(!!!)</span>, enter the command "<span style="font-family: Courier New,Courier,monospace;">export LD_PRELOAD=libXm.so</span>" ! 89 95 <hr><p style="line-height: 100%;"><br> -
palm/trunk/SCRIPTS/.mrun.config.imuk_ice2_netcdf4
r537 r555 54 54 %netcdf_lib -L/sw/dataformats/pnetcdf/netcdf-4.0.1-mvapich2-intel/lib:-lnetcdf:-lnetcdff:-L/sw/dataformats/phdf5/hdf5-1.8.2-mvapich2-intel/lib:-lhdf5:-lhdf5_hl:-lz lcsgih parallel ice2 55 55 %mopts -j:4 lcsgih parallel ice2 56 %fopts -xSSE4.2:- O3:-cpp:-r8:-align:all:-ftz:-fno-alias:-no-prec-div:-no-prec-sqrt:-ip:-nbs:-convert:little_endian lcsgih parallel ice257 %lopts -xSSE4.2:- O3:-cpp:-r8:-align:all:-ftz:-fno-alias:-no-prec-div:-no-prec-sqrt:-ip:-nbs:-Vaxlib lcsgih parallel ice256 %fopts -xSSE4.2:-fp-model:precise:-O3:-cpp:-r8:-align:all:-ftz:-fno-alias:-no-prec-div:-no-prec-sqrt:-ip:-nbs:-convert:little_endian lcsgih parallel ice2 57 %lopts -xSSE4.2:-fp-model:precise:-O3:-cpp:-r8:-align:all:-ftz:-fno-alias:-no-prec-div:-no-prec-sqrt:-ip:-nbs:-Vaxlib lcsgih parallel ice2 58 58 %memory 1500 lcsgih parallel ice2 59 #%tmp_data_catalog /gfs 1/work/<replace by your HLRN username>/palm_restart_data lcsgih parallel60 #%tmp_user_catalog /gfs 1/tmp/<replace by your HLRN username> lcsgih parallel59 #%tmp_data_catalog /gfs2/work/<replace by your HLRN username>/palm_restart_data lcsgih parallel 60 #%tmp_user_catalog /gfs2/tmp/<replace by your HLRN username> lcsgih parallel 61 61 # 62 62 # -
palm/trunk/SCRIPTS/mbuild
r544 r555 111 111 # 16/08/10 - BjornM- bugfix: call of modules on local host, new workaround 112 112 # for lcxt4 113 # 07/09/10 - Siggi - bugfix for wrong netcdf/3.6.3 module on lcsgi 113 114 114 115 … … 1036 1037 then 1037 1038 module_calls="module load ${modules};" 1039 1040 # bugfix for wrong netcdf module 1041 if [[ $remote_host = lcsgib || $remote_host = lcsgih ]] 1042 then 1043 if [[ $(echo $module_calls | grep -c netcdf/3.6.3-intel) != 0 ]] 1044 then 1045 module_calls="$module_calls export LD_LIBRARY_PATH=/sw/dataformats/netcdf/3.6.3-intel/lib:\$LD_LIBRARY_PATH;" 1046 fi 1047 fi 1038 1048 else 1039 1049 module_calls="" -
palm/trunk/SCRIPTS/mrun
r544 r555 209 209 # hicegate0/bicegate0 instead of the IP addresses 210 210 # 17/08/10 - BjornM - adjustments for interactive runs on lcxt4 211 # 07/09/10 - Siggi - bugfix for wrong netcdf/3.6.3 module on lcsgi 211 212 212 213 … … 2118 2119 fi 2119 2120 2121 # bugfix for wrong netcdf module 2122 if [[ $remote_host = lcsgib || $remote_host = lcsgih ]] 2123 then 2124 if [[ $(echo $module_calls | grep -c netcdf/3.6.3-intel) != 0 ]] 2125 then 2126 module_calls="$module_calls export LD_LIBRARY_PATH=/sw/dataformats/netcdf/3.6.3-intel/lib:\$LD_LIBRARY_PATH;" 2127 fi 2128 fi 2129 2120 2130 2121 2131 # SET DEFAULT VALUE FOR MPI MODULE TO BE USED ON SGI-ALTIX -
palm/trunk/SCRIPTS/subjob
r552 r555 1354 1354 chmod u+x $job_on_remhost 1355 1355 1356 elif [[ $(echo $local_host | cut -c1-5) = lcsgi ]]1357 then1358 eval $submcom $job_on_remhost1359 1356 elif [[ $local_host = nech ]] 1360 1357 then -
palm/trunk/SOURCE/disturb_heatflux.f90
r484 r555 4 4 ! Current revisions: 5 5 ! ----------------- 6 ! 6 ! Bugfix in if statement 7 7 ! 8 8 ! Former revisions: … … 52 52 IF ( nzb_s_inner(j,i) == 0 ) THEN 53 53 shf(j,i) = randomnumber * surface_heatflux 54 ELSE 54 55 ! 55 56 !-- Over topography surface_heatflux is replaced by wall_heatflux(0) 56 57 shf(j,i) = randomnumber * wall_heatflux(0) 57 ELSE58 58 ENDIF 59 59 ENDIF -
palm/trunk/SOURCE/init_grid.f90
r392 r555 4 4 ! Current revisions: 5 5 ! ----------------- 6 ! 6 ! Bugfix: default setting of nzb_local for flat topographie 7 7 ! 8 8 ! Former revisions: … … 344 344 CASE ( 'flat' ) 345 345 ! 346 !-- No actions necessary 346 !-- nzb_local is required for the multigrid solver 347 nzb_local = 0 347 348 348 349 CASE ( 'single_building' ) -
palm/trunk/SOURCE/user_statistics.f90
r494 r555 4 4 ! Current revisions: 5 5 ! ----------------- 6 ! 6 ! Bugfix: wrong dimension used for ts_value_l 7 7 ! 8 8 ! Former revisions: … … 77 77 !-- velocities u and v. 78 78 ! ts_value_l = 0.0 79 ! ts_value_l(dots_num_palm+1 ,sr) = ABS( u_max )80 ! ts_value_l(dots_num_palm+2 ,sr) = ABS( v_max )79 ! ts_value_l(dots_num_palm+1) = ABS( u_max ) 80 ! ts_value_l(dots_num_palm+2) = ABS( v_max ) 81 81 ! 82 82 !-- Collect / send values to PE0, because only PE0 outputs the time series. -
palm/trunk/UTIL/interpret_config.f90
r313 r555 4 4 ! Actual revisions: 5 5 ! ----------------- 6 ! bugfix in WRITE (2010) statement6 ! bugfix in 2201 statement: closing " was missing 7 7 ! mrun environment variables are read from NAMELIST instead of using GETENV. 8 8 ! Variables are allways assigned a value, also if they already got one. These … … 195 195 IF ( do_trace(1:4) == 'true' ) THEN 196 196 WRITE (2,2201) bs, var(1:ivar), value(1:ivalue) 197 2201 FORMAT ('printf "',A,'n*** ENVIRONMENT-VARIABLE ',A,' = ',A )197 2201 FORMAT ('printf "',A,'n*** ENVIRONMENT-VARIABLE ',A,' = ',A,'"') 198 198 ENDIF 199 199
Note: See TracChangeset
for help on using the changeset viewer.