Ignore:
Timestamp:
Oct 13, 2006, 3:38:40 PM (18 years ago)
Author:
ole
Message:

New test of runup timeseries - are they consistent across computer architectures?

File:
1 edited

Legend:

Unmodified
Added
Removed
  • anuga_core/source/anuga/shallow_water/test_shallow_water_domain.py

    r3704 r3778  
    943943        assert allclose(wet_elevations, z)       
    944944       
     945
     946
     947    def test_another_runup_example(self):
     948        """test_another_runup_example
     949
     950        Test runup example where actual timeseries at interpolated
     951        points are tested.
     952        """
     953
     954        #-----------------------------------------------------------------
     955        # Import necessary modules
     956        #-----------------------------------------------------------------
     957
     958        from anuga.pmesh.mesh_interface import create_mesh_from_regions
     959        from anuga.abstract_2d_finite_volumes.mesh_factory import rectangular_cross
     960        from anuga.shallow_water import Domain
     961        from anuga.shallow_water import Reflective_boundary
     962        from anuga.shallow_water import Dirichlet_boundary
     963
     964
     965        #-----------------------------------------------------------------
     966        # Setup computational domain
     967        #-----------------------------------------------------------------
     968        points, vertices, boundary = rectangular_cross(10, 10) # Basic mesh
     969        domain = Domain(points, vertices, boundary) # Create domain
     970        domain.set_quantities_to_be_stored(None)
     971       
     972
     973        #-----------------------------------------------------------------
     974        # Setup initial conditions
     975        #-----------------------------------------------------------------
     976
     977        def topography(x,y):
     978            return -x/2                              # linear bed slope
     979
     980        domain.set_quantity('elevation', topography)
     981        domain.set_quantity('friction', 0.0)         
     982        domain.set_quantity('stage', expression='elevation')           
     983
     984
     985        #----------------------------------------------------------------
     986        # Setup boundary conditions
     987        #----------------------------------------------------------------
     988
     989        Br = Reflective_boundary(domain)      # Solid reflective wall
     990        Bd = Dirichlet_boundary([-0.2,0.,0.]) # Constant boundary values
     991        domain.set_boundary({'left': Br, 'right': Bd, 'top': Br, 'bottom': Br})
     992
     993
     994        #----------------------------------------------------------------
     995        # Evolve system through time
     996        #----------------------------------------------------------------
     997
     998        interpolation_points = [[0.4,0.5], [0.6,0.5], [0.8,0.5], [0.9,0.5]]
     999        gauge_values = []
     1000        for _ in interpolation_points:
     1001            gauge_values.append([])
     1002
     1003        time = []
     1004        for t in domain.evolve(yieldstep = 0.1, finaltime = 5.0):
     1005            # Record time series at known points
     1006            time.append(domain.get_time())
     1007           
     1008            stage = domain.get_quantity('stage')
     1009            w = stage.get_values(interpolation_points=interpolation_points)
     1010           
     1011            for i, _ in enumerate(interpolation_points):
     1012                gauge_values[i].append(w[i])
     1013
     1014
     1015        #print
     1016        #print time
     1017        #print
     1018        #for i, (x,y) in enumerate(interpolation_points):
     1019        #    print i, gauge_values[i]
     1020        #    print
     1021
     1022        #Reference (nautilus 13/10/2006)
     1023
     1024        G0 = [-0.20000000000000001, -0.19999681443389281, -0.1986192343695303, -0.19147413648863046, -0.19132688908678019, -0.17642317476621105, -0.167376262630034, -0.16192452887426961, -0.15609171725778803, -0.15127107084302249, -0.14048864340360018, -0.19296484125327093, -0.19997006390580363, -0.19999999999937063, -0.19999999999937063, -0.19999999999938772, -0.19999999999938772, -0.19999999999938772, -0.19999999999938772, -0.19974288463035494, -0.19951636867991712, -0.19966301435195755, -0.19981082259800226, -0.19978575003960128, -0.19992942471933109, -0.19999999931029933, -0.19999999999906989, -0.19999999999906989, -0.19999999999906989, -0.19999999999906989, -0.19999999999906989, -0.19999999999906989, -0.19999999999906989, -0.19999999999906989, -0.19999999999906989, -0.19999999999906989, -0.19999999999906989, -0.19999999999906989, -0.19999999999906989, -0.19999999999906989, -0.19999999999906989, -0.19999999999906989, -0.19999999999906989, -0.19999999999906989, -0.19999999999906989, -0.19999999999906989, -0.19999999999906989, -0.19999999999906989, -0.19999999999906989, -0.19999999999906989, -0.19999999999906989]
     1025
     1026
     1027        G1 = [-0.29999999999999993, -0.29988962537199199, -0.29293904425532025, -0.28329367722887888, -0.25999146407696289, -0.22613875068011896, -0.21190705052094994, -0.19900707995208217, -0.18876305176191882, -0.18132447501091936, -0.17395459512711151, -0.15562414200985644, -0.16212999953643359, -0.18964422820514618, -0.20871181844346975, -0.21672207791083464, -0.21774940291862779, -0.21482868050219833, -0.21057786776704043, -0.20649663432591045, -0.20294932949211578, -0.19974459897911329, -0.19733648772704043, -0.19641404599824669, -0.19654095699184146, -0.19709942852191994, -0.19780873983410741, -0.19853259125123518, -0.19916495938961168, -0.19965391267799168, -0.19993539587158982, -0.2001383705551133, -0.20029344332295113, -0.20035349748150011, -0.20029886541561631, -0.20015541958920294, -0.19997273066429103, -0.19979879448668514, -0.19966016997024041, -0.19957558009501869, -0.19955725674938532, -0.19958083002853366, -0.19961752462568647, -0.19965296611330258, -0.19968998132634594, -0.19972532942208607, -0.19975372922008239, -0.19977196116929855, -0.19977951443660594, -0.19977792107284789, -0.19976991595502003]
     1028
     1029        G2 = [-0.40000000000000002, -0.39011996186687281, -0.33359026016903887, -0.29757449757405952, -0.27594124995715791, -0.25970211955309436, -0.24482929492054245, -0.23156757139219822, -0.21956485769139392, -0.20844522129026694, -0.19856327660654355, -0.18962303467030903, -0.17371085465024955, -0.16429840256208336, -0.17793711732368575, -0.19287799702389993, -0.20236271260796762, -0.20700727993623128, -0.20847704371373174, -0.20796895600687262, -0.20653398626186478, -0.20480656169870676, -0.20295863990994492, -0.20100199602968896, -0.19940642689498472, -0.19858371478015749, -0.19838672154605322, -0.19851093923669558, -0.19878191998909323, -0.19910827645394291, -0.19943514333832094, -0.19971231361970535, -0.19992429278849655, -0.20010744405928019, -0.20025927002359642, -0.20034751667523681, -0.20035504591467249, -0.20029401385620157, -0.20019492358237226, -0.20008934249434918, -0.19999808924091636, -0.19993869218976712, -0.19991589568150098, -0.19991815777945968, -0.19993012995477188, -0.19994576118144997, -0.19996497193815974, -0.19998586151236197, -0.20000487253824847, -0.20001903000364174, -0.20002698661385457]
     1030
     1031        G3 = [-0.45000000000000001, -0.37713945714588398, -0.33029565026933816, -0.30598209033945367, -0.28847101155177313, -0.27211191064563195, -0.25701544058818926, -0.24298945948410997, -0.23010402733784807, -0.21820351802867713, -0.20709938367218383, -0.19719881806182216, -0.18568281604361933, -0.16828653906676322, -0.16977310768235579, -0.1832707289594605, -0.19483524345250974, -0.20233480051649216, -0.20630757214159207, -0.20763927857964531, -0.20724458160595791, -0.20599191745446047, -0.20438329669495012, -0.20256105512496606, -0.20071269486729407, -0.19934403619901719, -0.19866860191898347, -0.19849975056296071, -0.19860870923007437, -0.19885838217851401, -0.19916422433758982, -0.19946861981642039, -0.19972267778871666, -0.19993013816258154, -0.20011063428833351, -0.20024891930311628, -0.20031882555219671, -0.20031326268593497, -0.20024881068472311, -0.20015443214902759, -0.20005669097631221, -0.19997542564643309, -0.19992564006223304, -0.19990746148869892, -0.19990923999172872, -0.19991956416813192, -0.19993484556273733, -0.1999538628054662, -0.19997381636620407, -0.19999130900268777, -0.20000388227457688]
     1032
     1033        assert allclose(gauge_values[0], G0)
     1034        assert allclose(gauge_values[1], G1)
     1035        assert allclose(gauge_values[2], G2)
     1036        assert allclose(gauge_values[3], G3)       
     1037
     1038
     1039
     1040
     1041
    9451042
    9461043
Note: See TracChangeset for help on using the changeset viewer.