Last change
on this file since 9 was
9,
checked in by pinsard, 15 years ago
|
make_base_image.m : header and octave compatibility (bis)
|
File size:
1.3 KB
|
Line | |
---|
1 | %save Thetas Thetav Dphi Rho670 Rho765 Rho865 of one day. |
---|
2 | |
---|
3 | %+ |
---|
4 | % module |
---|
5 | % ====== |
---|
6 | % |
---|
7 | % ++ |
---|
8 | % |
---|
9 | % DESCRIPTION |
---|
10 | % =========== |
---|
11 | % |
---|
12 | % From ANGLES\_\ *day*\_*.dat, |
---|
13 | % ``make_base_image.m`` produce a ASCII data file base_image\_\ *day*\_.dat |
---|
14 | % containing Thetas Thetav Dphi Rho670 Rho765 Rho865 of one day. |
---|
15 | % |
---|
16 | % EXAMPLES |
---|
17 | % ========== |
---|
18 | % |
---|
19 | % :: |
---|
20 | % |
---|
21 | % >> addpath('../toolbox') |
---|
22 | % >> tp_mlp_aerosols_startup |
---|
23 | % >> make_base_image |
---|
24 | % |
---|
25 | % SEE ALSO |
---|
26 | % ======== |
---|
27 | % |
---|
28 | % tp_mlp_aerosols_startup.m_ |
---|
29 | % |
---|
30 | % .. _tp_mlp_aerosols_startup.m : eof_df.m.html |
---|
31 | % |
---|
32 | % TODO |
---|
33 | % ==== |
---|
34 | % |
---|
35 | % avoid overriding existing output file |
---|
36 | % |
---|
37 | % make it launchable from everywhere (path and IO directories) |
---|
38 | % |
---|
39 | % EVOLUTIONS |
---|
40 | % ========== |
---|
41 | % |
---|
42 | % $Id$ |
---|
43 | % |
---|
44 | % - fplod 2009-08-13T10:57:39Z aedon.locean-ipsl.upmc.fr (Darwin) |
---|
45 | % |
---|
46 | % * add header |
---|
47 | % * add octave save instruction |
---|
48 | % |
---|
49 | %- |
---|
50 | |
---|
51 | sday='251'; |
---|
52 | indir='../Images/'; |
---|
53 | Thetas=load([indir 'ANGLES_' sday '_Thetas.dat']); |
---|
54 | Thetav=load([indir 'ANGLES_' sday '_Thetav.dat']); |
---|
55 | Dphi=load([indir 'ANGLES_' sday '_Phiv.dat']); |
---|
56 | Rho670=load([indir 'SEAWIFS_' sday '_670.dat']); |
---|
57 | Rho765=load([indir 'SEAWIFS_' sday '_765.dat']); |
---|
58 | Rho865=load([indir 'SEAWIFS_' sday '_865.dat']); |
---|
59 | |
---|
60 | base_image_251=[Thetas Thetav Dphi Rho670 Rho765 Rho865]; |
---|
61 | |
---|
62 | if (run_octave == 0) |
---|
63 | save([indir 'base_image_251.dat'],'base_image_251','-ascii'); |
---|
64 | else |
---|
65 | save('-ascii',[indir 'base_image_251.dat'],'base_image_251'); |
---|
66 | end |
---|
Note: See
TracBrowser
for help on using the repository browser.