equal
deleted
inserted
replaced
|
1 ;************************************************ |
|
2 ; Read ascii, Write nc |
|
3 ;************************************************ |
|
4 load "$NCARG_ROOT/lib/ncarg/nclscripts/csm/gsn_code.ncl" |
|
5 load "$NCARG_ROOT/lib/ncarg/nclscripts/csm/gsn_csm.ncl" |
|
6 load "$NCARG_ROOT/lib/ncarg/nclscripts/csm/contributed.ncl" |
|
7 ;************************************************ |
|
8 begin |
|
9 diri = "/fis/cgd/cseg/people/jeff/clamp_data/co2/globalView-C4Mip/seas/" |
|
10 b = (/"zot005_45D2_seas.co2", "zot015_45D2_seas.co2"/) |
|
11 do n = 0,1 |
|
12 print (b(n)) |
|
13 ncol1 = 4 |
|
14 data1 = readAsciiTable(diri+b(n), ncol1, "float", (/10,17/)) |
|
15 print (data1) |
|
16 |
|
17 ncol2 = 5 |
|
18 data2 = readAsciiTable(diri+b(n), ncol2, "float", 16) |
|
19 print (data2) |
|
20 end do |
|
21 |
|
22 end |