source: anuga_work/development/continental_margin_0708/wave_value_tester_900.py @ 5066

Last change on this file since 5066 was 5066, checked in by sexton, 16 years ago
File size: 9.3 KB
Line 
1"""Simple water flow example using ANUGA
2
3Water driven up a linear slope and time varying boundary,
4similar to a beach environment
5"""
6
7
8#------------------------------------------------------------------------------
9# Import necessary modules
10#------------------------------------------------------------------------------
11
12from anuga.abstract_2d_finite_volumes.mesh_factory import rectangular_cross
13from anuga.shallow_water import Domain
14from anuga.shallow_water import Reflective_boundary
15from anuga.shallow_water import Dirichlet_boundary
16from anuga.shallow_water import Time_boundary
17from anuga.shallow_water import Transmissive_boundary
18from anuga.shallow_water import Transmissive_Momentum_Set_Stage_boundary
19from anuga.shallow_water.data_manager import start_screen_catcher, copy_code_files
20from time import strftime, gmtime
21from os import sep, environ, getenv, getcwd,umask
22from anuga.utilities.polygon import Polygon_function
23from __future__ import division
24#------------------------------------------------------------------------------
25# Setup computational domain
26#------------------------------------------------------------------------------
27from anuga.pmesh.mesh_interface import create_mesh_from_regions
28
29name = 'wave_value_tester_900a'
30shelf = [50000]
31slope = [150000]
32wave = [-0.5]
33N = len (shelf)
34for i in range(N):
35    M = len (slope)
36    for k in range (M):
37        B = len(wave)
38        for l in range(B): 
39            length = (shelf[i]+slope[k])
40            width = 800.
41            A = 1
42            T = 2700
43            umask(002)
44            time = strftime('%Y%m%d_%H%M%S',gmtime())
45           ## output_dir = 'C:'+sep+'anuga_data'+sep+'topography'+sep+str(name)+sep+str(name)+'_'+str(wave[l])+'_'+str(shelf[i])+'_'+str(slope[k])+sep
46            output_dir = sep+'d'+sep+'sim'+sep+'1'+sep+'mpittard'+sep+'idealised_bathymetry_study'+sep+'wave_value_testers'+sep+str(name)+'_'+str(wave[l])+'_'+str(shelf[i])+'_'+str(slope[k])+sep
47
48            sww_file = str(name)
49            copy_code_files(output_dir,__file__,__file__)
50            start_screen_catcher(output_dir)
51            boundary_polygon = [[0,0],[length,0],[length,width],[0,width]]
52           
53            meshname = str(name)+'.msh'
54            create_mesh_from_regions(boundary_polygon,
55                                     boundary_tags={'bottom': [0],
56                                                    'right': [1],
57                                                    'top': [2],
58                                                    'left': [3]},
59                                     maximum_triangle_area=20000,
60                                     filename=meshname,
61                                     use_cache=False,
62                                     verbose=False)
63
64            domain = Domain(meshname, use_cache=True, verbose=True)
65
66            print 'Number of triangles = ', len(domain)
67            print 'The extent is ', domain.get_extent()
68            print domain.statistics()
69             
70            domain.set_quantities_to_be_stored(['stage', 'xmomentum', 'ymomentum'])
71            domain.set_minimum_storable_height(0.01)
72            domain.set_default_order(2)
73            domain.set_name(sww_file)# Output name
74            domain.set_datadir(output_dir) 
75
76
77            #------------------------------------------------------------------------------
78            # Setup initial conditions
79            #------------------------------------------------------------------------------
80
81            def topography(x,y):
82                """Complex topography defined by a function of vectors x and y
83                """
84                o = 2500/(slope[k]*slope[k]/4)
85                print str(2500/(slope[k]*slope[k]/4))
86               
87                z = o*(x-(shelf[i]+slope[k]))*(x-(shelf[i]+slope[k]))-5125-10
88                S = len (x)
89                for j in range(S):
90
91                    if x[j] < shelf[i]:
92                        z[j] = -125/(shelf[i]*shelf[i])*x[j]*x[j]-10
93
94                    elif shelf[i] <= x[j] < (shelf[i]+slope[k]*0.5) :
95                          z[j] = (-o)*(x[j]-shelf[i])*(x[j]-shelf[i])-125-10
96                       
97                return z
98               
99
100
101            domain.set_quantity('elevation', topography) # Use function for elevation
102            domain.set_quantity('friction', 0)         # Constant friction   
103            domain.set_quantity('stage', 0)            # Constant negative initial stage
104            domain.tight_slope_limiters = 1
105            domain.beta_h = 0
106
107            #------------------------------------------------------------------------------
108            # Setup boundary conditions
109            #------------------------------------------------------------------------------
110
111            from math import sin, pi, exp, cos, sqrt, cosh
112            Br = Reflective_boundary(domain)      # Solid reflective wall
113            Bt = Transmissive_boundary(domain)    # Continue all values on boundary
114            Bd = Dirichlet_boundary([0.,0.,0.])   # Constant boundary values
115       
116            g = 9.81
117            offshore_depth = 5145 
118            H_d_ratio = 0.0004
119            Xo = 100000
120            po = 130
121            def waveform(t):
122                return wave[l]*offshore_depth*(sqrt(g/offshore_depth)*t-Xo/offshore_depth)*sqrt(H_d_ratio*po)*H_d_ratio/cosh(sqrt(3*H_d_ratio*po/4)*(sqrt(g/offshore_depth)*t-Xo/offshore_depth))/cosh(sqrt(3*H_d_ratio*po/4)*(sqrt(g/offshore_depth)*t-Xo/offshore_depth))
123         
124            Bf = Transmissive_Momentum_Set_Stage_boundary(domain, waveform)
125            # Associate boundary tags with boundary objects
126            domain.set_boundary({'left': Bd, 'right': Bf, 'top': Br, 'bottom': Br})
127
128
129            #------------------------------------------------------------------------------
130            # Evolve system through time
131            #------------------------------------------------------------------------------
132
133            for t in domain.evolve(yieldstep = 45, finaltime = (length/25)+2700+((length/50000)+1)*600+((shelf[i]/25000+1)*1000)): 
134                domain.write_time()     
135            for t in domain.evolve(yieldstep = 120, finaltime = (length/25)+2700+((length/50000)+1)*600+((shelf[i]/25000+1)*1000), 
136                                   skip_initial_step = True):
137                domain.write_time()
138
139            from anuga.shallow_water.data_manager import sww2dem
140            from os import sep
141
142            name = 'wave_value_tester_900a' 
143            time_dir = str(name)+'_'+str(wave[l])+'_50000_150000'
144            cellsize = 50
145            timestep = None
146            output_dir = sep+'d'+sep+'sim'+sep+'1'+sep+'mpittard'+sep+'idealised_bathymetry_study'+sep+'wave_value_testers'+sep
147            directory = output_dir
148            name = directory+time_dir+sep+str(name)
149            is_parallel = False
150            if is_parallel == True: nodes = 4
151            print 'output dir:', name
152
153            #var = [0,2,3] # stage, depth and speed
154            var = [0]
155
156            for which_var in var:
157                if which_var == 0:  # Stage
158                    outname = name + '_stage'
159                    quantityname = 'stage'
160
161                if which_var == 1:  # Absolute Momentum
162                    outname = name + '_momentum_i1'
163                    quantityname = '(xmomentum**2 + ymomentum**2)**0.5' 
164
165                if which_var == 2:  # Depth
166                    outname = name + '_depth'
167                    quantityname = 'stage-elevation' 
168
169                if which_var == 3:  # Speed
170                    outname = name + '_speed'
171                    quantityname = '(xmomentum**2 + ymomentum**2)**0.5/(stage-elevation+1.e-6/(stage-elevation))'  #Speed
172
173                if which_var == 4:  # Elevation
174                    outname = name + '_elevation'
175                    quantityname = 'elevation'  #Elevation
176
177                if is_parallel == True:
178                #    print 'is_parallel',is_parallel
179                    for i in range(0,nodes):
180                        namei = name + '_P%d_%d' %(i,nodes)
181                        outnamei = outname + '_P%d_%d' %(i,nodes)
182                        print 'start sww2dem for sww file %d' %(i)
183                        sww2dem(namei, basename_out = outnamei,
184                                    quantity = quantityname,
185                                    timestep = timestep,
186                                    cellsize = cellsize,     
187                                    easting_min = 0,
188                                    easting_max = 150000,
189                                    northing_min = 0,
190                                    northing_max = 400,       
191                                    reduction = max, 
192                                    verbose = True,
193                                    format = 'asc')
194                else:
195                    print 'start sww2dem'
196                    sww2dem(name, basename_out = outname,
197                                quantity = quantityname,
198                                timestep = timestep,
199                                cellsize = cellsize,     
200            ##                    easting_min = 0,
201            ##                    easting_max = 150000,
202            ##                    northing_min = 0,
203            ##                    northing_max = 400,     
204                                reduction = max, 
205                                verbose = True,
206                                format = 'asc')
207
Note: See TracBrowser for help on using the repository browser.