Changeset 1226 for palm/trunk/TUTORIAL/SOURCE/program_structure.tex
- Timestamp:
- Sep 18, 2013 1:19:19 PM (11 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
palm/trunk/TUTORIAL/SOURCE/program_structure.tex
r945 r1226 84 84 \frametitle{PALM Code: General Features} 85 85 \begin{itemize} 86 \item<2->{PALM is written in FORTRAN90. Current version number is 3. 8.}86 \item<2->{PALM is written in FORTRAN90. Current version number is 3.9.} 87 87 \item<3->{With some very minor exceptions, the code is using the FORTRAN standard, so it should compile without error on any FORTRAN90/95 compiler.} 88 88 \item<4->{Data handling between subroutines is mostly done using FORTRAN90-modules instead of using parameter lists. … … 107 107 \end{lstlisting} 108 108 \end{minipage} 109 \mbox{ Allmodules can be found in file .../trunk/SOURCE/modules.f90}}109 \mbox{Most modules can be found in file .../trunk/SOURCE/modules.f90}} 110 110 \end{itemize} 111 111 \end{frame} … … 129 129 \tikzstyle{white2} = [rectangle, text width=0] 130 130 \tikzstyle{yellow} = [rectangle, draw, fill=yellow!20, text width=0.2\textwidth, minimum size=15pt, font=\tiny] 131 \tikzstyle{green} = [rectangle, draw, fill=green!20, text width=0.2\textwidth, minimum size=15pt, font=\tiny] 131 132 \tikzstyle{line} = [draw, -] 132 133 … … 134 135 \uncover<1->{\node [yellow] (PALM) {PALM};} 135 136 \uncover<1->{\node [white2, right=0.2cm of PALM] (PALMspace) {};} 136 137 \uncover<2->{\node [yellow, below=0.2cm of PALMspace] (localtre) {local\_tremain\_ini};} 138 \path<2-> [line] (PALM.south) |- (localtre.west); 139 140 \uncover<3->{\node [yellow, below=0.05cm of localtre] (initdvrp) {init\_dvrp\_logging};} 141 \path<3-> [line] (PALM.south) |- (initdvrp.west); 142 143 \uncover<4->{\node [yellow, below=0.05cm of initdvrp] (parin) {parin};} 144 \path<4-> [line] (PALM.south) |- (parin.west); 145 \uncover<4->{\node [white, right=0.2cm of parin] (parinspace) {};} 137 138 \uncover<2->{\node [yellow, below=0.2cm of PALMspace] (initcoup) {init\_coupling};} 139 \path<2-> [line] (PALM.south) |- (initcoup.west); 140 141 \uncover<3->{\node [yellow, below=0.05cm of initcoup] (localtre) {local\_tremain\_ini};} 142 \path<3-> [line] (PALM.south) |- (localtre.west); 143 144 \uncover<4->{\node [yellow, below=0.05cm of localtre] (initdvrp) {init\_dvrp\_logging};} 145 \path<4-> [line] (PALM.south) |- (initdvrp.west); 146 147 \uncover<5->{\node [yellow, below=0.05cm of initdvrp] (parin) {parin};} 148 \path<5-> [line] (PALM.south) |- (parin.west); 149 \uncover<5->{\node [white, right=0.2cm of parin] (parinspace) {};} 146 150 147 151 \uncover<5->{\node [yellow, below=0cm of parinspace] (readvar) {read\_var\_list};} 148 152 \path<5-> [line,dashed] (parin.south) |- (readvar.west); 149 153 150 \uncover<6->{\node [yellow, below=0.05cm of readvar] (packageparin) {package\_parin};} 151 \path<6-> [line,dashed] (parin.south) |- (packageparin.west); 152 153 \uncover<7->{\node [yellow, below=0.05cm of packageparin] (userparin) {user\_parin};} 154 \path<7-> [line] (parin.south) |- (userparin.west); 155 156 \uncover<8->{\node [yellow, below=1.4cm of parin] (initpeg) {init\_pegrid};} 157 \path<8-> [line] (PALM.south) |- (initpeg.west); 158 \uncover<8->{\node [white, right=0.2cm of initpeg] (initpegspace) {};} 159 160 \uncover<9->{\node [yellow, below=0cm of initpegspace] (poisfftinit) {poisfft\_init};} 161 \path<9-> [line] (initpeg.south) |- (poisfftinit.west); 162 163 \uncover<10->{\node [yellow, below=0.3cm of initpeg] (initgrid) {init\_grid};} 164 \path<10-> [line] (PALM.south) |- (initgrid.west); 165 166 \uncover<11->{\node [yellow, below=0.05cm of initgrid] (checkpara) {check\_parameters};} 167 \path<11-> [line] (PALM.south) |- (checkpara.west); 168 169 \uncover<12->{\node [yellow, below=0.05cm of checkpara] (header) {header};} 170 \path<12-> [line] (PALM.south) |- (header.west); 171 \uncover<12->{\node [white, right=0.2cm of header] (headerspace) {};} 172 173 \uncover<13->{\node [yellow, below=0cm of headerspace] (userheader) {user\_header};} 174 \path<13-> [line,dashed] (header.south) |- (userheader.west); 154 \uncover<5->{\node [yellow, below=0.05cm of readvar] (packageparin) {package\_parin};} 155 \path<5-> [line,dashed] (parin.south) |- (packageparin.west); 156 157 \uncover<5->{\node [green, below=0.05cm of packageparin] (userparin) {user\_parin};} 158 \path<5-> [line] (parin.south) |- (userparin.west); 159 160 \uncover<6->{\node [yellow, below=1.4cm of parin] (initpeg) {init\_pegrid};} 161 \path<6-> [line] (PALM.south) |- (initpeg.west); 162 \uncover<6->{\node [white, right=0.2cm of initpeg] (initpegspace) {};} 163 164 \uncover<7->{\node [yellow, below=0.05cm of initpeg] (initgrid) {init\_grid};} 165 \path<7-> [line] (PALM.south) |- (initgrid.west); 166 \uncover<7->{\node [white, right=0.2cm of initgrid] (initgridspace) {};} 167 168 \uncover<7->{\node [green, below=0cm of initgridspace] (userinitgrid) {user\_init\_grid};} 169 \path<7-> [line,dashed] (initgrid.south) |- (userinitgrid.west); 175 170 176 171 \uncover<1->{\node [white, below=5.8cm of PALM] (continu2) {};} … … 194 189 \tikzstyle{yellowlarge} = [rectangle, draw, fill=yellow!20, text width=0.2\textwidth, minimum size=13pt, font=\tiny] 195 190 \tikzstyle{yellowLarge} = [rectangle, draw, fill=yellow!20, text width=0.43\textwidth, minimum size=13pt, font=\tiny] 191 \tikzstyle{green} = [rectangle, draw, fill=green!20, text width=0.2\textwidth, minimum size=13pt, font=\tiny] 192 \tikzstyle{green1} = [rectangle, draw, fill=green!20, text width=0.23\textwidth, minimum size=13pt, font=\tiny] 196 193 \tikzstyle{line} = [draw, -] 197 194 … … 200 197 \uncover<1->{\node [white2, below=0.26cm of contino1] (PALM) {};} 201 198 202 \uncover<2->{\node [yellow, right=0.2cm of PALM] (init3d) {init\_3d\_model};} 203 \path<2-> [line] (PALM.south) |- (init3d.west); 204 \uncover<2->{\node [white, right=0.05cm of init3d] (init3dspace) {};} 205 \uncover<2->{\node [whitelarge, right=0.05cm of init3d] (init3dspacelarge) {};} 206 207 \uncover<3->{\node [yellowLarge, below=-0.05cm of init3dspacelarge] (init1d) {init\_1d\_model (calls various subroutines)};} 208 \path<3-> [line,dashed] (init3d.south) |- (init1d.west); 199 \uncover<1->{\node [yellow, right=0.2cm of PALM] (checkpara) {check\_parameters};} 200 \path<1-> [line] (PALM.south) |- (checkpara.west); 201 \uncover<1->{\node [white, right=0.2cm of checkpara] (checkparaspace) {};} 202 \uncover<1->{\node [white, right=0.365cm of checkpara] (checkparaspacelarge) {};} 203 204 \uncover<2->{\node [green1, below=0cm of checkparaspacelarge] (usercheckdatapr) {user\_check\_data\_output\_pr};} 205 \path<2-> [line] (checkpara.south) |- (usercheckdatapr.west); 206 207 \uncover<2->{\node [green, below=0.52cm of checkparaspace] (usercheckdata) {user\_check\_data\_output};} 208 \path<2-> [line] (checkpara.south) |- (usercheckdata.west); 209 210 \uncover<2->{\node [yellow, below=0.05cm of usercheckdata] (initmasks) {init\_masks};} 211 \path<2-> [line,dashed] (checkpara.south) |- (initmasks.west); 212 213 \uncover<2->{\node [green, right=0.2cm of initmasks] (usercheckdata2) {user\_check\_data\_output};} 214 \path<2-> [line] (initmasks.east) |- (usercheckdata2.west); 215 216 \uncover<2->{\node [yellow, below=0.05cm of initmasks] (usercheckpara) {user\_check\_parameters};} 217 \path<2-> [line] (checkpara.south) |- (usercheckpara.west); 218 219 \uncover<3->{\node [yellow, below=1.9cm of checkpara] (init3d) {init\_3d\_model};} 220 \path<3-> [line] (PALM.south) |- (init3d.west); 221 \uncover<3->{\node [white, right=0.05cm of init3d] (init3dspace) {};} 222 \uncover<3->{\node [whitelarge, right=0.05cm of init3d] (init3dspacelarge) {};} 223 224 \uncover<4->{\node [yellowLarge, below=-0.05cm of init3dspacelarge] (init1d) {init\_1d\_model (calls various subroutines)};} 225 \path<4-> [line,dashed] (init3d.south) |- (init1d.west); 209 226 210 227 \uncover<4->{\node [yellow, below=0.5cm of init3dspace] (initslope) {init\_slope};} 211 228 \path<4-> [line,dashed] (init3d.south) |- (initslope.west); 212 229 213 \uncover<5->{\node [yellow, below=0.05cm of initslope] (disturbh) {disturb\_heatflux};} 214 \path<5-> [line,dashed] (init3d.south) |- (disturbh.west); 215 216 \uncover<6->{\node [yellow, below=0.05cm of disturbh] (initrank) {init\_rankine};} 217 \path<6-> [line,dashed] (init3d.south) |- (initrank.west); 218 219 \uncover<7->{\node [yellow, right=0.05cm of initrank] (initpt) {init\_pt\_anomaly};} 220 \path<7-> [line] (initrank.east) -- (initpt.west); 221 222 \uncover<8->{\node [yellow, below=0.05cm of initrank] (disturbf) {disturb\_field};} 223 \path<8-> [line,dashed] (init3d.south) |- (disturbf.west); 224 225 \uncover<9->{\node [yellow, right=0.05cm of disturbf] (pres) {pres};} 226 \path<9-> [line] (disturbf.east) -- (pres.west); 227 \uncover<9->{\node [white, below=-0.05cm of pres] (presspace) {};} 228 229 \uncover<10->{\node [yellowsmall, right=0.05cm of presspace] (poisfft) {poisfft};} 230 \path<10-> [line] (pres.east) -| (poisfft.north); 231 232 \uncover<11->{\node [yellowsmall, right=0.05cm of poisfft] (sor) {sor};} 233 \path<11-> [line] (pres.east) -| (sor.north); 234 235 \uncover<12->{\node [yellowsmall, right=0.05cm of sor] (poismg) {poismg};} 236 \path<12-> [line] (pres.east) -| (poismg.north); 237 238 \uncover<13->{\node [yellow, below=0.4cm of disturbf] (read3d) {read\_3d\_binary};} 239 \path<13-> [line,dashed] (init3d.south) |- (read3d.west); 240 241 \uncover<14->{\node [yellow, right=0.05cm of read3d] (initdvrp) {init\_dvrp};} 242 \path<14-> [line] (read3d.east) -- (initdvrp.west); 243 244 \uncover<15->{\node [yellowlarge, right=0.05cm of initdvrp] (initcloud) {init\_cloud\_physics};} 245 \path<15-> [line] (initdvrp.east) -- (initcloud.west); 246 247 \uncover<16->{\node [yellow, below=0.05cm of read3d] (initpart) {init\_particles};} 248 \path<16-> [line] (init3d.south) |- (initpart.west); 249 \uncover<16->{\node [white, right=0.05cm of initpart] (initpartspace) {};} 250 251 \uncover<17->{\node [yellow, below=-0.05cm of initpartspace] (userinitpart) {user\_init\_particles};} 252 \path<17-> [line] (initpart.south) |- (userinitpart.west); 253 254 \uncover<18->{\node [yellow, below=0.05cm of userinitpart] (sortpart) {sort\_particles};} 255 \path<18-> [line] (initpart.south) |- (sortpart.west); 256 257 \uncover<19->{\node [yellow, below=0.05cm of sortpart] (dataoutput) {data\_output\_dvrp};} 258 \path<19-> [line,dashed] (initpart.south) |- (dataoutput.west); 259 260 \uncover<20->{\node [yellow, right=0.05cm of dataoutput] (userdvrp) {user\_dvrp\_coltab};} 261 \path<20-> [line,dashed] (dataoutput.east) -- (userdvrp.west); 262 263 \uncover<21->{\node [yellow, below=1.45cm of initpart] (initadvec) {init\_advec};} 264 \path<21-> [line] (init3d.south) |- (initadvec.west); 265 266 \uncover<22->{\node [yellow, right=0.05cm of initadvec] (userinit) {user\_init};} 267 \path<22-> [line] (initadvec.east) -- (userinit.west); 268 269 \uncover<23->{\node [yellow, below=5.8cm of init3d] (dataout2d) {data\_output\_2d};} 270 \path<23-> [line,dashed] (PALM.south) |- (dataout2d.west); 271 272 \uncover<24->{\node [yellow, right=0.05cm of dataout2d] (dataout3d) {data\_output\_3d};} 273 \path<24-> [line] (dataout2d.east) -- (dataout3d.west); 230 \uncover<4->{\node [green, below=0.05cm of initslope] (userinit3d) {user\_init\_3d\_model};} 231 \path<4-> [line,dashed] (init3d.south) |- (userinit3d.west); 232 233 \uncover<4->{\node [yellow, below=0.05cm of userinit3d] (disturbh) {disturb\_heatflux};} 234 \path<4-> [line,dashed] (init3d.south) |- (disturbh.west); 235 236 \uncover<4->{\node [yellow, below=0.05cm of disturbh] (initrank) {init\_rankine};} 237 \path<4-> [line,dashed] (init3d.south) |- (initrank.west); 238 239 \uncover<4->{\node [yellow, right=0.05cm of initrank] (pres) {pres};} 240 \path<4-> [line] (initrank.east) -- (pres.west); 241 \uncover<4->{\node [white, below=-0.05cm of pres] (presspace) {};} 242 243 \uncover<4->{\node [yellowsmall, right=0.05cm of presspace] (poisfft) {poisfft};} 244 \path<4-> [line] (pres.east) -| (poisfft.north); 245 246 \uncover<4->{\node [yellowsmall, right=0.05cm of poisfft] (sor) {sor};} 247 \path<4-> [line] (pres.east) -| (sor.north); 248 249 \uncover<4->{\node [yellowsmall, right=0.05cm of sor] (poismg) {poismg};} 250 \path<4-> [line] (pres.east) -| (poismg.north); 251 252 \uncover<4->{\node [yellow, below=0.05cm of initrank] (initpt) {init\_pt\_anomaly};} 253 \path<4-> [line,dashed] (init3d.south) |- (initpt.west); 254 255 \uncover<4->{\node [yellow, below=0.05cm of initpt] (randomfuncini) {random\_function\_ini};} 256 \path<4-> [line] (init3d.south) |- (randomfuncini.west); 274 257 275 258 \uncover<1->{\node [white2, below=6.6cm of PALM] (continu2) {};} … … 278 261 \uncover<1->{\node [white2, below=6.0cm of PALM] (continu1) {};} 279 262 \path<1-> [line] (PALM.south) |- (continu1.north); 263 264 \uncover<4->{\node [white2, below=6.6cm of checkpara] (continu3) {};} 265 \path<4-> [line,dashed] (init3d.south) |- (continu3.north); 266 267 \uncover<4->{\node [white2, below=6.0cm of checkpara] (continu4) {};} 268 \path<4-> [line] (init3d.south) |- (continu4.north); 269 280 270 \end{tikzpicture} 281 271 \end{frame} 282 272 283 284 273 %Folie 07 285 274 \begin{frame} 286 275 \frametitle{PALM Flow Chart (III)} 276 277 \tikzstyle{white} = [rectangle, text width=0.2\textwidth, font=\tiny] 278 \tikzstyle{whitelarge} = [rectangle, text width=0.43\textwidth, font=\tiny] 279 \tikzstyle{whitesmall} = [rectangle, text width=0.08\textwidth, minimum size=13pt, font=\tiny] 280 \tikzstyle{white2} = [rectangle, text width=0] 281 \tikzstyle{yellow} = [rectangle, draw, fill=yellow!20, text width=0.2\textwidth, minimum size=13pt, font=\tiny] 282 \tikzstyle{yellowsmall} = [rectangle, draw, fill=yellow!20, text width=0.08\textwidth, minimum size=13pt, font=\tiny] 283 \tikzstyle{yellowlarge} = [rectangle, draw, fill=yellow!20, text width=0.2\textwidth, minimum size=13pt, font=\tiny] 284 \tikzstyle{yellowLarge} = [rectangle, draw, fill=yellow!20, text width=0.43\textwidth, minimum size=13pt, font=\tiny] 285 \tikzstyle{green} = [rectangle, draw, fill=green!20, text width=0.2\textwidth, minimum size=13pt, font=\tiny] 286 \tikzstyle{green1} = [rectangle, draw, fill=green!20, text width=0.23\textwidth, minimum size=13pt, font=\tiny] 287 \tikzstyle{line} = [draw, -] 288 289 \begin{tikzpicture}[auto, node distance=0] 290 \uncover<1->{\node [white2] (contino1) {};} 291 \uncover<1->{\node [white2, below=0.26cm of contino1] (PALM) {};} 292 293 \uncover<1->{\node [yellow, right=0.2cm of PALM] (init3d) {init\_3d\_model};} 294 \path<1-> [line] (PALM.south) |- (init3d.west); 295 \uncover<1->{\node [white, right=0.05cm of init3d] (init3dspace) {};} 296 \uncover<1->{\node [whitelarge, right=0.05cm of init3d] (init3dspacelarge) {};} 297 298 \uncover<2->{\node [yellow, below=0.05cm of init3dspace] (read3d) {read\_3d\_binary};} 299 \path<2-> [line,dashed] (init3d.south) |- (read3d.west); 300 301 \uncover<2->{\node [green, right=0.05cm of read3d] (userreadrestart) {user\_read\_restart\_data};} 302 \path<2-> [line] (read3d.east) -- (userreadrestart.west); 303 304 \uncover<2->{\node [yellow, below=0.5cm of init3dspace] (initslope) {init\_slope};} 305 \path<2-> [line,dashed] (init3d.south) |- (initslope.west); 306 307 \uncover<2->{\node [yellow, below=0.05cm of initslope] (initadvec) {init\_advec};} 308 \path<2-> [line] (init3d.south) |- (initadvec.west); 309 310 \uncover<2->{\node [yellow, below=0.05cm of initadvec] (distfield) {disturb\_field};} 311 \path<2-> [line,dashed] (init3d.south) |- (distfield.west); 312 313 \uncover<2->{\node [yellow, below=0.05cm of distfield] (pres) {pres};} 314 \path<2-> [line,dashed] (init3d.south) |- (pres.west); 315 \uncover<2->{\node [white, below=-0.05cm of pres] (presspace) {};} 316 317 \uncover<2->{\node [yellowsmall, right=0.05cm of presspace] (poisfft) {poisfft};} 318 \path<2-> [line] (pres.east) -| (poisfft.north); 319 320 \uncover<2->{\node [yellowsmall, right=0.05cm of poisfft] (sor) {sor};} 321 \path<2-> [line] (pres.east) -| (sor.north); 322 323 \uncover<2->{\node [yellowsmall, right=0.05cm of sor] (poismg) {poismg};} 324 \path<2-> [line] (pres.east) -| (poismg.north); 325 326 \uncover<2->{\node [green, below=0.05cm of pres] (userinitplant) {user\_init\_plant\_canopy};} 327 \path<2-> [line,dashed] (init3d.south) |- (userinitplant.west); 328 329 \uncover<2->{\node [yellow, below=0.05cm of userinitplant] (initdvrp) {init\_dvrp};} 330 \path<2-> [line,dashed] (init3d.south) |- (initdvrp.west); 331 332 \uncover<2->{\node [yellow, below=0.05cm of initdvrp] (initocean) {init\_ocean};} 333 \path<2-> [line,dashed] (init3d.south) |- (initocean.west); 334 335 \uncover<2->{\node [yellow, right=0.05cm of initocean] (eqnstsea) {eqn\_state\_seawater};} 336 \path<2-> [line] (initocean.east) -| (eqnstsea.west); 337 338 \uncover<2->{\node [yellow, below=0.05cm of initocean] (initcloudphys) {init\_cloud\_physics};} 339 \path<2-> [line,dashed] (init3d.south) |- (initcloudphys.west); 340 341 \uncover<2->{\node [yellow, below=0.05cm of initcloudphys] (lpminit) {lpm\_init};} 342 \path<2-> [line,dashed] (init3d.south) |- (lpminit.west); 343 \uncover<2->{\node [white, right=0.2cm of lpminit] (lpminspace) {};} 344 345 \uncover<2->{\node [yellow, below=0.05cm of lpminspace] (lpmreadrestart) {lpm\_read\_restart\_file};} 346 \path<2-> [line,dashed] (lpminit.south) |- (lpmreadrestart.west); 347 348 \uncover<2->{\node [green, below=0.05cm of lpmreadrestart] (userlpmin) {user\_lpm\_init};} 349 \path<2-> [line] (lpminit.south) |- (userlpmin.west); 350 351 \uncover<1->{\node [white2, below=6.6cm of PALM] (continu2) {};} 352 \path<1-> [line,dashed] (contino1.south) |- (continu2.north); 353 354 \uncover<1->{\node [white2, below=6.0cm of PALM] (continu1) {};} 355 \path<1-> [line] (PALM.south) |- (continu1.north); 356 357 \uncover<2->{\node [white2, below=6.6cm of init3d] (continu3) {};} 358 \path<2-> [line,dashed] (init3d.south) |- (continu3.north); 359 360 \uncover<2->{\node [white2, below=6.0cm of init3d] (continu4) {};} 361 \path<2-> [line] (init3d.south) |- (continu4.north); 362 363 \end{tikzpicture} 364 \end{frame} 365 366 %Folie 08 367 \begin{frame} 368 \frametitle{PALM Flow Chart (IV)} 369 370 \tikzstyle{white} = [rectangle, text width=0.2\textwidth, font=\tiny] 371 \tikzstyle{whitelarge} = [rectangle, text width=0.43\textwidth, font=\tiny] 372 \tikzstyle{whitesmall} = [rectangle, text width=0.08\textwidth, minimum size=13pt, font=\tiny] 373 \tikzstyle{white2} = [rectangle, text width=0] 374 \tikzstyle{yellow} = [rectangle, draw, fill=yellow!20, text width=0.2\textwidth, minimum size=13pt, font=\tiny] 375 \tikzstyle{yellowsmall} = [rectangle, draw, fill=yellow!20, text width=0.08\textwidth, minimum size=13pt, font=\tiny] 376 \tikzstyle{yellowlarge} = [rectangle, draw, fill=yellow!20, text width=0.2\textwidth, minimum size=13pt, font=\tiny] 377 \tikzstyle{yellowLarge} = [rectangle, draw, fill=yellow!20, text width=0.43\textwidth, minimum size=13pt, font=\tiny] 378 \tikzstyle{green} = [rectangle, draw, fill=green!20, text width=0.2\textwidth, minimum size=13pt, font=\tiny] 379 \tikzstyle{green1} = [rectangle, draw, fill=green!20, text width=0.23\textwidth, minimum size=13pt, font=\tiny] 380 \tikzstyle{line} = [draw, -] 381 382 \begin{tikzpicture}[auto, node distance=0] 383 \uncover<1->{\node [white2] (contino1) {};} 384 \uncover<1->{\node [white2, below=0.26cm of contino1] (PALM) {};} 385 386 \uncover<2->{\node [yellow, right=0.2cm of PALM] (init3d) {init\_3d\_model};} 387 \path<2-> [line] (PALM.south) |- (init3d.west); 388 \uncover<2->{\node [white, right=0.05cm of init3d] (init3dspace) {};} 389 \uncover<2->{\node [whitelarge, right=0.05cm of init3d] (init3dspacelarge) {};} 390 391 \uncover<3->{\node [yellow, below=0.05cm of init3dspace] (lpminit) {lpm\_init};} 392 \path<3-> [line,dashed] (init3d.south) |- (lpminit.west); 393 \uncover<3->{\node [white, right=0.2cm of lpminit] (lpminspace) {};} 394 395 \uncover<4->{\node [yellow, below=0.05cm of lpminspace] (lpmsortar) {lpm\_sort\_arrays};} 396 \path<4-> [line,dashed] (lpminit.south) |- (lpmsortar.west); 397 398 \uncover<5->{\node [yellow, below=0.05cm of lpmsortar] (dataoutpdvrp) {data\_output\_dvrp};} 399 \path<5-> [line,dashed] (lpminit.south) |- (dataoutpdvrp.west); 400 \uncover<5->{\node [white, right=0.2cm of dataoutpdvrp] (dataoutpdvrpspace) {};} 401 402 \uncover<6->{\node [green, below=0.05cm of dataoutpdvrpspace] (usercoltap) {user\_dvrp\_coltab};} 403 \path<6-> [line,dashed] (dataoutpdvrp.south) |- (usercoltap.west); 404 405 \uncover<7->{\node [green, below=0.05cm of usercoltap] (userdataoutdvrp) {user\_data\_output\_dvrp};} 406 \path<7-> [line] (dataoutpdvrp.south) |- (userdataoutdvrp.west); 407 408 \uncover<8->{\node [green, below=1cm of lpminit] (userinit) {user\_init};} 409 \path<8-> [line] (init3d.south) |- (userinit.west); 410 411 \uncover<9->{\node [yellow, below=2.3cm of init3d] (header) {header};} 412 \path<9-> [line] (PALM.south) |- (header.west); 413 414 \uncover<10->{\node [green, right=0.05cm of header] (userheader) {user\_header};} 415 \path<10-> [line] (header.east) |- (userheader.west); 416 417 \uncover<11->{\node [yellow, below=0.05cm of header] (dataoutput2d) {data\_output\_2d};} 418 \path<11-> [line,dashed] (PALM.south) |- (dataoutput2d.west); 419 420 \uncover<12->{\node [green, right=0.05cm of dataoutput2d] (userdataoutput2d) {user\_data\_output\_2d};} 421 \path<12-> [line] (dataoutput2d.east) |- (userdataoutput2d.west); 422 423 \uncover<13->{\node [yellow, below=0.05cm of dataoutput2d] (dataoutput3d) {data\_output\_3d};} 424 \path<13-> [line,dashed] (PALM.south) |- (dataoutput3d.west); 425 426 \uncover<14->{\node [green, right=0.05cm of dataoutput3d] (userdataoutput3d) {user\_data\_output\_3d};} 427 \path<14-> [line] (dataoutput3d.east) |- (userdataoutput3d.west); 428 429 \uncover<15->{\node [yellow, below=0.05cm of dataoutput3d] (timeintegr) {time\_integration};} 430 \path<15-> [line] (PALM.south) |- (timeintegr.west); 431 \uncover<15->{\node [white, right=0.2cm of timeintegr] (timeintspace) {};} 432 433 \uncover<16->{\node [yellow, below=0.05cm of timeintspace] (runcontr) {run\_control};} 434 \path<16-> [line] (timeintegr.south) |- (runcontr.west); 435 \uncover<16->{\node [white, right=0.2cm of runcontr] (runcontrspace) {};} 436 437 \uncover<17->{\node [yellow, below=0.05cm of runcontrspace] (flowstat1) {flow\_statistics};} 438 \path<17-> [line,dashed] (runcontr.south) |- (flowstat1.west); 439 440 \uncover<18->{\node [green, right=0.05cm of flowstat1] (userstat1) {user\_statistics};} 441 \path<18-> [line] (flowstat1.east) |- (userstat1.west); 442 443 \uncover<19->{\node [yellow, below=0.5cm of runcontr] (surfcoup) {surface\_coupler};} 444 \path<19-> [line,dashed] (timeintegr.south) |- (surfcoup.west); 445 446 447 \uncover<1->{\node [white2, below=6.6cm of PALM] (continu2) {};} 448 \path<1-> [line,dashed] (contino1.south) |- (continu2.north); 449 450 \uncover<1->{\node [white2, below=6.0cm of PALM] (continu1) {};} 451 \path<1-> [line] (PALM.south) |- (continu1.north); 452 453 \end{tikzpicture} 454 \end{frame} 455 456 457 %Folie 09 458 \begin{frame} 459 \frametitle{PALM Flow Chart (V)} 287 460 288 461 \tikzstyle{white} = [rectangle, text width=0.2\textwidth, font=\tiny] … … 294 467 \tikzstyle{yellowlarge} = [rectangle, draw, fill=yellow!20, text width=0.2\textwidth, minimum size=12pt, font=\tiny] 295 468 \tikzstyle{yellowLarge} = [rectangle, draw, fill=yellow!20, text width=0.3\textwidth, minimum size=12pt, font=\tiny] 469 \tikzstyle{green} = [rectangle, draw, fill=green!20, text width=0.2\textwidth, minimum size=13pt, font=\tiny] 470 \tikzstyle{green1} = [rectangle, draw, fill=green!20, text width=0.23\textwidth, minimum size=13pt, font=\tiny] 471 \tikzstyle{greenLarge} = [rectangle, draw, fill=green!20, text width=0.3\textwidth, minimum size=12pt, font=\tiny] 296 472 \tikzstyle{line} = [draw, -] 297 473 \tikzstyle{linered} = [draw, color=red, -] … … 318 494 \path<1-> [line] (timeintegr.south) |- (timestep.west); 319 495 320 \uncover<1->{\node [yellow, below=0.05cm of timestep] (runcontrol) {run\_control};} 321 \path<1-> [line] (timeintegr.south) |- (runcontrol.west); 322 323 \uncover<1->{\node [yellow, right=0.05cm of runcontrol] (flowstatistics) {flow\_statistics};} 324 \path<1-> [line] (runcontrol.east) -- (flowstatistics.west); 325 326 \uncover<1->{\node [yellowLarge, below=0.95cm of timeintegrspacelarge] (useractions) {user\_actions (before\_timestep)};} 496 \uncover<1->{\node [yellow, right=0.05cm of timestep] (globminmax) {global\_min\_max};} 497 \path<1-> [line] (timestep.east) |- (globminmax.west); 498 499 \uncover<1->{\node [greenLarge, below=0.5cm of timeintegrspacelarge] (useractions) {user\_actions (before\_timestep)};} 327 500 \path<1-> [line] (timeintegr.south) |- (useractions.west); 328 501 … … 330 503 \path<1-> [line] (timeintegr.south) |- (timestepscheme.west); 331 504 332 \uncover<1->{\node [Bigbox, below=1. 75cm of timeintegrspacebox] (bigbox) {};}505 \uncover<1->{\node [Bigbox, below=1.3cm of timeintegrspacebox] (bigbox) {};} 333 506 % \path<1-> [line] (timeintegr.south) |- (bigbox.west); 334 \uncover<1->{\node [white, below= 2cm of timeintegrline] (boxlinespace) {};}335 \path<1-> [line] (timeintegr line.south) |- (boxlinespace.north);336 337 \uncover<1->{\node [yellowLarge, below=0.4cm of timestepscheme] (prognosticequ no) {prognostic\_equations\_noopt};}338 \uncover<1->{\node [yellowLarge, right=0.05cm of prognosticequ no] (prognosticequca) {prognostic\_equations\_cache};}339 \uncover<1->{\node [yellowLarge, below=0.05cm of prognosticequca] (prognosticequve) {prognostic\_equations\_vector};}340 \uncover<1->{\node [boxinfo, below=-0.025cm of prognosticequ no] (Boxinfo) {For details, see \\ PALM Flow Chart (V).};}507 \uncover<1->{\node [white, below=1.6cm of timeintegrline] (boxlinespace) {};} 508 \path<1-> [line] (timeintegr.south) |- (boxlinespace.north); 509 510 \uncover<1->{\node [yellowLarge, below=0.4cm of timestepscheme] (prognosticequve) {prognostic\_equations\_vector};} 511 \uncover<1->{\node [yellowLarge, right=0.05cm of prognosticequve] (prognosticequca) {prognostic\_equations\_cache};} 512 % \uncover<1->{\node [yellowLarge, below=0.05cm of prognosticequca] (prognosticequve) {prognostic\_equations\_vector};} 513 \uncover<1->{\node [boxinfo, below=-0.025cm of prognosticequve] (Boxinfo) {For details, see \\ PALM Flow Chart (VIII).};} 341 514 \path<1-> [linered] (boxlinespace.north) -| (prognosticequca.north); 342 \path<1-> [line] (boxlinespace.north) -| (prognosticequ no.north);515 \path<1-> [line] (boxlinespace.north) -| (prognosticequve.north); 343 516 \uncover<1->{\node [redsmall, above=0.3cm of prognosticequca] (redadv) {standard\\advection};} 344 517 345 \uncover<1->{\node [yellow, below= 2.7cm of runcontrol] (advecpart) {advec\_particles};}346 \path<1-> [line,dashed] ( advecpart.west) -| (timeintegr.south);347 348 \uncover<1->{\node [yellowLarge, right=0.05cm of advecpart] (userpartatt) {user\_particle\_attributes+ more};}349 \path<1-> [line] ( advecpart.east) -- (userpartatt.west);518 \uncover<1->{\node [yellow, below=3.1cm of timeintegrspace] (lpm) {lpm};} 519 \path<1-> [line,dashed] (timeintegr.south) |- (lpm.west) ; 520 521 \uncover<1->{\node [yellowLarge, right=0.05cm of lpm] (lpmmore) {user\_lpm\_advec + more};} 522 \path<1-> [line] (lpm.east) -- (lpmmore.west); 350 523 351 524 \uncover<1->{\node [yellowLarge, below=2.15cm of timestepscheme] (interactiondrop) {interaction\_droplets\_ptq};} 352 525 \path<1-> [line,dashed] (interactiondrop.west) -| (timeintegr.south); 353 526 354 \uncover<1->{\node [yellow, below=0. 535cm of advecpart] (asselinfilter) {asselin\_filter};}355 \path<1-> [line,dashed] ( asselinfilter.west) -| (timeintegr.south);356 357 \uncover<1->{\node [yellow, below=0.05cm of asselinfilter] (swaptimelevel) {swap\_timelevel};}527 \uncover<1->{\node [yellow, below=0.65cm of lpm] (boundconds) {boundary\_conds};} 528 \path<1-> [line,dashed] (boundconds.west) -| (timeintegr.south); 529 530 \uncover<1->{\node [yellow, below=0.05cm of boundconds] (swaptimelevel) {swap\_timelevel};} 358 531 \path<1-> [line] (swaptimelevel.west) -| (timeintegr.south); 359 532 360 \uncover<1->{\node [yellow, right=0.05cm of swaptimelevel] (boundaryconds) {boundary\_conds};}361 \path<1-> [line] (swaptimelevel.east) -- (boundaryconds.west);362 363 \uncover<1->{\node [yellow, below=0.05cm of swaptimelevel] (disturbfield) {disturb\_field};}364 \path<1-> [line,dashed] (dist urbfield.west) -| (timeintegr.south);533 \uncover<1->{\node [yellow, below=0.05cm of swaptimelevel] (inflowturb) {inflow\_turbulence};} 534 \path<1-> [line,dashed] (inflowturb.west) -| (timeintegr.south); 535 536 \uncover<1->{\node [yellow, below=0.05cm of inflowturb] (distfield) {disturb\_field};} 537 \path<1-> [line,dashed] (distfield.west) -| (timeintegr.south); 365 538 366 539 \uncover<1->{\node [white2, below=6.6cm of PALM] (continu2) {};} … … 372 545 \end{frame} 373 546 374 375 %Folie 08 376 \begin{frame} 377 \frametitle{PALM Flow Chart (IV)} 547 %Folie 10 548 \begin{frame} 549 \frametitle{PALM Flow Chart (VI)} 378 550 379 551 \tikzstyle{white} = [rectangle, text width=0.2\textwidth, font=\tiny] … … 385 557 \tikzstyle{yellowlarge} = [rectangle, draw, fill=yellow!20, text width=0.2\textwidth, minimum size=13pt, font=\tiny] 386 558 \tikzstyle{yellowLarge} = [rectangle, draw, fill=yellow!20, text width=0.3\textwidth, minimum size=13pt, font=\tiny] 559 \tikzstyle{green} = [rectangle, draw, fill=green!20, text width=0.2\textwidth, minimum size=13pt, font=\tiny] 560 \tikzstyle{greenLarge} = [rectangle, draw, fill=green!20, text width=0.3\textwidth, minimum size=13pt, font=\tiny] 387 561 \tikzstyle{line} = [draw, -] 388 562 \tikzstyle{linered} = [draw, color=red, -] … … 417 591 \path<1-> [line] (pres.east) -| (poismg.north); 418 592 419 \uncover<1->{\node [yellow , below=0.355cm of pres] (boundaryconds) {boundary\_conds};}420 \path<1-> [line,dashed] (timeintegr.south) |- ( boundaryconds.west);421 422 \uncover<1->{\node [yellow, below=0. 05cm of boundaryconds] (computevpt) {compute\_vpt};}593 \uncover<1->{\node [yellowLarge, below=0.8cm of timeintegrspacelarge] (calcliquidwatercontent) {calc\_liquid\_water\_content};} 594 \path<1-> [line,dashed] (timeintegr.south) |- (calcliquidwatercontent.west); 595 596 \uncover<1->{\node [yellow, below=0.9cm of pres] (computevpt) {compute\_vpt};} 423 597 \path<1-> [line,dashed] (timeintegr.south) |- (computevpt.west); 424 425 \uncover<1->{\node [yellowLarge, right=0.05cm of computevpt] (calcliquidwatercontent) {calc\_liquid\_water\_content};}426 \path<1-> [line] (computevpt.east) -- (calcliquidwatercontent.west);427 598 428 599 \uncover<1->{\node [yellow, below=0.05cm of computevpt] (prandtlfluxes) {prandtl\_fluxes};} … … 430 601 431 602 \uncover<1->{\node [yellow, below=0.05cm of prandtlfluxes] (diffusivities) {diffusivities};} 432 \path<1-> [line ] (timeintegr.south) |- (diffusivities.west);433 434 \uncover<1->{\node [ yellowLarge, below=2.855cm of timeintegrspacelarge] (useractionsafter) {user\_actions (after\_integration)};}603 \path<1-> [line,dashed] (timeintegr.south) |- (diffusivities.west); 604 605 \uncover<1->{\node [greenLarge, below=2.88cm of timeintegrspacelarge] (useractionsafter) {user\_actions (after\_integration)};} 435 606 \path<1-> [line] (timeintegr.south) |- (useractionsafter.west); 436 607 437 608 \uncover<1->{\node [yellow, below=0.575cm of diffusivities] (checkforrestart) {check\_for\_restart};} 438 \path<1-> [line ] (timeintegr.south) |- (checkforrestart.west);609 \path<1-> [line,dashed] (timeintegr.south) |- (checkforrestart.west); 439 610 440 611 \uncover<1->{\node [yellow, right=0.05cm of checkforrestart] (localtremain) {local\_tremain};} … … 444 615 \path<1-> [line,dashed] (timeintegr.south) |- (flowstatistics.west); 445 616 446 \uncover<1->{\node [yellow, right=0.05cm of flowstatistics] (sumup3ddata) {sum\_up\_3d\_data};} 447 \path<1-> [line] (flowstatistics.east) -- (sumup3ddata.west); 448 449 \uncover<1->{\node [yellow, right=0.05cm of sumup3ddata] (calcspectra) {calc\_spectra};} 450 \path<1-> [line] (sumup3ddata.east) -- (calcspectra.west); 451 452 \uncover<1->{\node [yellow, below=0.05cm of flowstatistics] (runcontrol) {run\_control};} 453 \path<1-> [line,dashed] (timeintegr.south) |- (runcontrol.west); 454 455 \uncover<1->{\node [yellow, right=0.05cm of runcontrol] (dataoutput) {data\_output\_***};} 456 \path<1-> [line] (runcontrol.east) -- (dataoutput.west); 457 458 \uncover<1->{\node [yellow, below=0.05cm of runcontrol] (disturbheatflux) {disturb\_heatflux};} 459 \path<1-> [line,dashed] (timeintegr.south) |- (disturbheatflux.west); 460 461 \uncover<1->{\node [yellowLarge, below=2.125cm of useractionsafter] (useractionsaftert) {user\_actions (after\_timestep)};} 462 \path<1-> [line] (timeintegr.south) |- (useractionsaftert.west); 617 \uncover<1->{\node [green, right=0.05cm of flowstatistics] (userstat) {user\_statistics};} 618 \path<1-> [line] (flowstatistics.east) -- (userstat.west); 619 620 \uncover<1->{\node [yellow, below=0.05cm of flowstatistics] (sumup3d) {sum\_up\_3d\_data};} 621 \path<1-> [line,dashed] (timeintegr.south) |- (sumup3d.west); 622 623 \uncover<1->{\node [greenLarge, right=0.05cm of sumup3d] (user3ddataav) {user\_3d\_data\_averaging};} 624 \path<1-> [line] (sumup3d.east) -- (user3ddataav.west); 625 626 \uncover<1->{\node [yellow, below=0.05cm of sumup3d] (calcspec) {calc\_spectra};} 627 \path<1-> [line,dashed] (timeintegr.south) |- (calcspec.west); 628 629 \uncover<1->{\node [green, right=0.05cm of calcspec] (userspec) {user\_spectra};} 630 \path<1-> [line] (calcspec.east) -- (userspec.west); 463 631 464 632 \uncover<1->{\node [white2, below=6.6cm of PALM] (continu2) {};} … … 470 638 \end{frame} 471 639 472 473 %Folie 09 474 \begin{frame} 475 \frametitle{PALM Flow Chart (V)} 640 %Folie 11 641 \begin{frame} 642 \frametitle{PALM Flow Chart (VII)} 643 644 \tikzstyle{white} = [rectangle, text width=0.2\textwidth, font=\tiny] 645 \tikzstyle{whitelarge} = [rectangle, text width=0.3\textwidth, font=\tiny] 646 \tikzstyle{whitesmall} = [rectangle, text width=0.08\textwidth, minimum size=13pt, font=\tiny] 647 \tikzstyle{white2} = [rectangle, text width=0] 648 \tikzstyle{yellow} = [rectangle, draw, fill=yellow!20, text width=0.2\textwidth, minimum size=13pt, font=\tiny] 649 \tikzstyle{yellowsmall} = [rectangle, draw, fill=yellow!20, text width=0.08\textwidth, minimum size=13pt, font=\tiny] 650 \tikzstyle{yellowlarge} = [rectangle, draw, fill=yellow!20, text width=0.2\textwidth, minimum size=13pt, font=\tiny] 651 \tikzstyle{yellowLarge} = [rectangle, draw, fill=yellow!20, text width=0.3\textwidth, minimum size=13pt, font=\tiny] 652 \tikzstyle{green} = [rectangle, draw, fill=green!20, text width=0.2\textwidth, minimum size=13pt, font=\tiny] 653 \tikzstyle{greenLarge} = [rectangle, draw, fill=green!20, text width=0.3\textwidth, minimum size=13pt, font=\tiny] 654 \tikzstyle{line} = [draw, -] 655 \tikzstyle{linered} = [draw, color=red, -] 656 \tikzstyle{Bigwhite} = [rectangle, text width=0.63\textwidth, minimum size=35pt, font=\tiny] 657 \tikzstyle{Bigbox} = [rectangle, draw, fill=gray!20, text width=0.65\textwidth, minimum size=33pt, font=\tiny] 658 \tikzstyle{redsmall} = [rectangle, draw, align=center, fill=red!100, text width=0.08\textwidth, minimum size=12pt, font=\tiny] 659 \tikzstyle{boxinfo} = [rectangle, align=center, text width=0.3\textwidth, minimum size=12pt, font=\tiny] 660 \tikzstyle{whitebox} = [rectangle, text width=0.2\textwidth, minimum size=12pt, font=\tiny] 661 662 %"align=center" hinzufÃŒgen, um in den boxen zu zentrieren. 663 664 \begin{tikzpicture}[auto, node distance=0] 665 \uncover<1->{\node [white2] (contino1) {};} 666 \uncover<1->{\node [white2, below=0.26cm of contino1] (PALM) {};} 667 668 \uncover<1->{\node [yellow, right=0.2cm of PALM] (timeintegr) {time\_integration};} 669 \path<1-> [line] (PALM.south) |- (timeintegr.west); 670 \uncover<1->{\node [white, right=0.05cm of timeintegr] (timeintegrspace) {};} 671 \uncover<1->{\node [whitelarge, right=0.05cm of timeintegr] (timeintegrspacelarge) {};} 672 673 \uncover<1->{\node [yellow, below=-0.05cm of timeintegrspace] (runcontr) {run\_control};} 674 \path<1-> [line,dashed] (timeintegr.south) |- (runcontr.west); 675 \uncover<1->{\node [white, right=0.2cm of runcontr] (runcontrspace) {};} 676 677 \uncover<1->{\node [yellow, below=0.05cm of runcontrspace] (flowstat1) {flow\_statistics};} 678 \path<1-> [line,dashed] (runcontr.south) |- (flowstat1.west); 679 680 \uncover<1->{\node [green, right=0.05cm of flowstat1] (userstat1) {user\_statistics};} 681 \path<1-> [line] (flowstat1.east) |- (userstat1.west); 682 683 \uncover<1->{\node [yellow, below=1cm of timeintegrspace] (print1d) {print\_1d};} 684 \path<1-> [line,dashed] (timeintegr.south) |- (print1d.west); 685 686 \uncover<1->{\node [yellow, below=0.05cm of print1d] (dataoutp) {data\_output\_***};} 687 \path<1-> [line,dashed] (timeintegr.south) |- (dataoutp.west); 688 689 \uncover<1->{\node [greenLarge, below=2.15cm of timeintegrspacelarge] (useractionsaftert) {user\_actions (after\_timestep)};} 690 \path<1-> [line] (timeintegr.south) |- (useractionsaftert.west); 691 692 \uncover<1->{\node [white2, below=6.6cm of PALM] (continu2) {};} 693 \path<1-> [line,dashed] (contino1.south) |- (continu2.north); 694 695 \uncover<1->{\node [white2, below=6.0cm of PALM] (continu1) {};} 696 \path<1-> [line] (PALM.south) |- (continu1.north); 697 \end{tikzpicture} 698 \end{frame} 699 700 701 %Folie 12 702 \begin{frame} 703 \frametitle{PALM Flow Chart (VIII)} 476 704 477 705 \tikzstyle{white} = [rectangle, text width=0.2\textwidth, font=\tiny] … … 506 734 \uncover<1->{\node [yellow, below=0.1cm of redadv] (calcmeanptprofile) {calc\_mean\_pt\_profile};} 507 735 508 \uncover<1->{\node [yellowLarge, left=0.5cm of calcmeanptprofile] (prognosticequationsnoopt) {prognostic\_equations\_noopt};}509 \uncover<1->{\node [yellowLarge, right=0.5cm of calcmeanptprofile] (prognosticequationscache) {prognostic\_equations\_cache};}510 \uncover<1->{\node [yellowLarge, below=2.35cm of prognosticequationscache] (prognosticequationsvector) {prognostic\_equations\_vector};}736 % \uncover<1->{\node [yellowLarge, left=0.5cm of calcmeanptprofile] (prognosticequationsnoopt) {prognostic\_equations\_noopt};} 737 \uncover<1->{\node [yellowLarge, left=0.5cm of calcmeanptprofile] (prognosticequationscache) {prognostic\_equations\_cache};} 738 \uncover<1->{\node [yellowLarge, right=0.5cm of calcmeanptprofile] (prognosticequationsvector) {prognostic\_equations\_vector};} 511 739 512 740 \uncover<1->{\node [yellow, below=-0.05cm of calcmeanptprofile] (calcradiation) {calc\_radiation};} … … 540 768 .\\ 541 769 .\\ 542 !within subroutines:\\543 DO i=nxl,nxr\\544 \quad DO j=nys,nyn\\545 \quad \quad DO k=nzb+1,nzt\\546 \quad \quad \quad \quad ...\\547 \quad \quad ENDDO\\548 \quad ENDDO\\549 ENDDO\\770 % !within subroutines:\\ 771 % DO i=nxl,nxr\\ 772 % \quad DO j=nys,nyn\\ 773 % \quad \quad DO k=nzb+1,nzt\\ 774 % \quad \quad \quad \quad ...\\ 775 % \quad \quad ENDDO\\ 776 % \quad ENDDO\\ 777 % ENDDO\\ 550 778 } 551 779 };} 552 553 \uncover<1->{\node [bigbox, below=0.05cm of prognosticequationsnoopt] (listingsnoopt1) {554 \texttt{\linespread {0.7}\selectfont\noindent555 DO i=nxl,nxr\\556 \quad DO j=nys,nyn\\557 \quad \quad CALL \textcolor{blue}{u-subr}\\558 \quad ENDDO\\559 ENDDO\\560 }561 };}562 563 \uncover<1->{\node [bigbox, below=0.05cm of listingsnoopt1] (listingsnoopt2) {564 \texttt{\linespread {0.7}\selectfont\noindent565 DO i=nxl,nxr\\566 \quad DO j=nys,nyn\\567 \quad \quad CALL \textcolor{blue}{v-subr}\\568 \quad ENDDO\\569 ENDDO\\570 }571 };}572 573 \uncover<1->{\node [bigbox, below=1.95cm of listingsnoopt2] (listingsnoopt3) {574 \texttt{\linespread {0.7}\selectfont\noindent575 DO i=nxl,nxr\\576 \quad DO j=nys,nyn\\577 \quad \quad CALL \textcolor{blue}{e-subr}\\578 \quad ENDDO\\579 ENDDO\\580 }581 };}582 583 \path<1-> [line,dotted] (listingsnoopt2.south) |- (listingsnoopt3.north);584 585 \uncover<1->{\node [whitesmall, right=-1.35cm of listingsnoopt2] (listingsnoopt251) {};}586 \uncover<1->{\node [whitesmall, below=0.8cm of listingsnoopt251] (listingsnoopt252) {\texttt{\textcolor{blue}{w\\pt\\q or s}}};}587 588 780 \uncover<1->{\node [bigbox2, below=-0.25cm of productioneinitspace2] (foreachvariable) { 589 781 \textcolor{blue}{ … … 621 813 622 814 623 \uncover<2->{\node [Endbox, below= 6.05cm of redadv] (endbox) {815 \uncover<2->{\node [Endbox, below=1.5cm of listingscache] (endboxcache) { 624 816 \texttt{\linespread {0.7}\selectfont\noindent 625 817 !within subroutines:\\ … … 630 822 };} 631 823 632 \uncover<2->{\draw [<-,thick] (endbox.east) -- (listingscache.west);} 633 \uncover<2->{\draw [<-,thick] (endbox.west) -- (listingsnoopt1.east);} 634 \uncover<2->{\draw [<-,thick] (endbox.west) -- (listingsnoopt2.east);} 635 \uncover<2->{\draw [<-,thick] (endbox.west) -- (listingsnoopt3.east);} 824 \uncover<2->{\node [Endbox, below=2.5cm of listingsvector] (endboxvec) { 825 \texttt{\linespread {0.7}\selectfont\noindent 826 !within subroutines:\\ 827 DO i = nxl, nxr \\ 828 \quad DO j = nys, nyn \\ 829 \quad \quad DO k=nzb+1,nzt\\ 830 \quad \quad \quad \textcolor{blue}{...}\\ 831 \quad \quad ENDDO \\ 832 \quad ENDDO \\ 833 ENDDO\\ 834 } 835 };} 836 837 \uncover<2->{\draw [<-,thick] (endboxcache.north) -- (listingscache.south);} 838 \uncover<2->{\draw [<-,thick] (endboxvec.north) -- (listingsvector.south);} 636 839 637 840 \end{tikzpicture} 638 841 \end{frame} 639 842 640 641 %Folie 10 642 \begin{frame} 643 \frametitle{PALM Flow Chart (VI)} 843 %Folie 13 844 \begin{frame} 845 \frametitle{PALM Flow Chart (IX)} 644 846 645 847 \tikzstyle{white} = [rectangle, text width=0.2\textwidth, font=\tiny] … … 651 853 \tikzstyle{yellowlarge} = [rectangle, draw, fill=yellow!20, text width=0.2\textwidth, minimum size=13pt, font=\tiny] 652 854 \tikzstyle{yellowLarge} = [rectangle, draw, fill=yellow!20, text width=0.3\textwidth, minimum size=13pt, font=\tiny] 855 \tikzstyle{green} = [rectangle, draw, fill=green!20, text width=0.2\textwidth, minimum size=13pt, font=\tiny] 653 856 \tikzstyle{line} = [draw, -] 654 857 \tikzstyle{linered} = [draw, color=red, -] … … 681 884 \path<1-> [line] (write3dbinary.east) -- (writevarlist.west); 682 885 683 \uncover<1->{\node [yellow, below=0.05cm of write3dbinary] (writeparticles) { write\_particles};}886 \uncover<1->{\node [yellow, below=0.05cm of write3dbinary] (writeparticles) {lpm\_write\_restart\_file};} 684 887 \path<1-> [line] (PALM.south) |- (writeparticles.west); 685 888 … … 687 890 \path<1-> [line] (PALM.south) |- (header.west); 688 891 689 \uncover<1->{\node [ yellow, right=0.05cm of header] (userheader) {user\_header};}892 \uncover<1->{\node [green, right=0.05cm of header] (userheader) {user\_header};} 690 893 \path<1-> [line] (header.east) -- (userheader.west); 691 894 692 \uncover<1->{\node [ yellow, below=0.05cm of header] (userlastactions) {user\_last\_actions};}895 \uncover<1->{\node [green, below=0.05cm of header] (userlastactions) {user\_last\_actions};} 693 896 \path<1-> [line] (PALM.south) |- (userlastactions.west); 694 897 … … 704 907 \end{frame} 705 908 706 %Folie 1 1909 %Folie 14 707 910 \begin{frame}[fragile] 708 911 \frametitle{Important Variables and Their Declaration} … … 731 934 \end{frame} 732 935 733 %Folie 1 2936 %Folie 15 734 937 \begin{frame}[fragile] 735 938 \frametitle{Important Variables and Their Declaration} … … 754 957 \centering 755 958 \begin{lstlisting} 756 REAL, DIMENSION(:,:,:), POINTER :: u, u_ m, u_p, ...959 REAL, DIMENSION(:,:,:), POINTER :: u, u_p, v, v_p, ... 757 960 \end{lstlisting} 758 961 \end{minipage}\\ … … 762 965 \end{frame} 763 966 764 %Folie 1 3967 %Folie 16 765 968 \begin{frame}[fragile] 766 969 \frametitle{Some Other Frequently Used Variables} … … 796 999 797 1000 798 %Folie 1 41001 %Folie 17 799 1002 \begin{frame}[fragile] 800 1003 \frametitle{Preprocessor Directives (I)} … … 840 1043 841 1044 842 %Folie 1 41045 %Folie 18 843 1046 \begin{frame}[fragile] 844 \frametitle{Preprocessor Directives (I )}1047 \frametitle{Preprocessor Directives (II)} 845 1048 \begin{itemize} 846 \item<1->{The preprocessor directives require to include the compiler option ``\texttt{\scriptsize-cpp}'' in any way. Otherwise, the compilation will give error messages. \textbf{The option has to be given in the configuration file} \texttt{\scriptsize .mrun.config.} \textbf{Different compilers may require different options!}}\\ 1049 \item<1->{The preprocessor directives require to include the compiler option ``\texttt{\scriptsize-cpp}'' in any way. Otherwise, the compilation will give error messages. \textbf{The option has to be given in the configuration file} 1050 \texttt{\scriptsize .mrun.config} in the \texttt{\scriptsize \%cpp\_options} line. \textbf{Different compilers may require different options!}}\\ 847 1051 848 1052 \item<2->{Define-string switches can be combined using logical AND / OR operators \&\& / $\lvert \lvert$.\\ … … 861 1065 862 1066 863 %Folie 1 51067 %Folie 19 864 1068 \begin{frame}[fragile] 865 \frametitle{Preprocessor Directives (II )}1069 \frametitle{Preprocessor Directives (III)} 866 1070 In the PALM code, define-string switches are used for following reasons: 867 1071 \begin{itemize} … … 882 1086 883 1087 884 %Folie 151088 %Folie 20 885 1089 \begin{frame}[fragile] 886 \frametitle{Preprocessor Directives (I I)}1090 \frametitle{Preprocessor Directives (IV)} 887 1091 In the PALM code, define-string switches are used for following reasons: 888 1092 \begin{itemize} … … 898 1102 899 1103 900 %Folie 141104 %Folie 21 901 1105 \begin{frame}[fragile] 902 \frametitle{Preprocessor Directives ( III)}1106 \frametitle{Preprocessor Directives (V)} 903 1107 \begin{itemize} 904 1108 \item<1->{Preprocessor directives are also used for string replacement in the code.\\ Example:\\A compiler call with preprocessor option\\ … … 920 1124 \centering 921 1125 \begin{lstlisting} 922 %cpp_options - DMPI_REAL=MPI_DOUBLE_PRECISION:1126 %cpp_options -cpp:-DMPI_REAL=MPI_DOUBLE_PRECISION: 923 1127 -DMPI_2REAL=MPI_2DOUBLE_PRECISION: .... 924 1128 \end{lstlisting}
Note: See TracChangeset
for help on using the changeset viewer.