source:
trunk/anuga_work/development/near_shore_PMD/time_series.m
@
7884
| Last change on this file since 7884 was 5077, checked in by duncan, 16 years ago | |
|---|---|
| File size: 374 bytes | |
| Line | |
|---|---|
| 1 | clear all |
| 2 | clc |
| 3 | |
| 4 | % Time array |
| 5 | t=(0:0.2:1800)'; |
| 6 | |
| 7 | % Monochromatic example |
| 8 | primary=1.2*sin(2*pi*t/10); |
| 9 | mono=[t primary]; |
| 10 | save exp1a_input_waves.dat mono -ascii |
| 11 | |
| 12 | % Modulated example |
| 13 | secondary=1.0*sin(2*pi*t/9.5); |
| 14 | prim_sec=primary+secondary; |
| 15 | modu=[t prim_sec]; |
| 16 | save exp1b_input_waves.dat modu -ascii |
| 17 | |
| 18 | figure(1) |
| 19 | plot(t,primary) |
| 20 | |
| 21 | figure(2) |
| 22 | plot(t,prim_sec) |
| 23 | |
| 24 |
Note: See TracBrowser
for help on using the repository browser.
