Changes between Version 7 and Version 8 of doc/app/userint/subd
- Timestamp:
- Sep 15, 2010 9:30:49 AM (14 years ago)
Legend:
- Unmodified
- Added
- Removed
- Modified
-
doc/app/userint/subd
v7 v8 6 6 REAL :: rmask(nysd:nynd,nxld:nxrd,0:9) . 7 7 }}} 8 The first two indices denote the array bounds (including the ghost points) in y and x-direction for each subdomain (see the corresponding description of [../../parallel#parallelization Parallelization]; don't confuse this with the user-defined subdomain!). The third index determines the user-defined subdomain ., where 0 indicates the total model domain and ''1'' to ''9'' the user-defined subdomains.\\\\8 The first two indices denote the array bounds (including the ghost points) in y and x-direction for each subdomain (see the corresponding description of [../../parallel#parallelization Parallelization]; don't confuse this with the user-defined subdomain!). The third index determines the user-defined subdomain, where 0 indicates the total model domain and ''1'' to ''9'' the user-defined subdomains.\\\\ 9 9 The following example should illustrate this. Two subdomains are defined by the user. The first is determined by all grid points which lie within a circle whose center is equal to the (horizontal) center of the model domain and whose diameter is equal to half of the total horizontal domain size (square total domain assumed). The second subdomain should be defined by all points outside of this domain. This may be obtained by the following lines of code in [..\int#user_init user_init]: 10 10 {{{ … … 18 18 disc_center_y = dy * (ny + 1)/2 19 19 disc_radius = 0.5 * disc_center_x 20 DO i = nxl -1, nxr+120 DO i = nxld, nxrd 21 21 x = i * dx 22 DO j = nys -1, nyn+122 DO j = nysd, nynd 23 23 y = j * dy 24 24 radial_distance = SQRT( ( x - disc_center_x )**2 + &