1.1 --- /dev/null	Thu Jan 01 00:00:00 1970 +0000
     1.2 +++ b/co2/01.test.read.ncl	Mon Jan 26 22:08:20 2009 -0500
     1.3 @@ -0,0 +1,19 @@
     1.4 +;************************************************
     1.5 +;    Read ascii, Write nc                         
     1.6 +;************************************************
     1.7 +load "$NCARG_ROOT/lib/ncarg/nclscripts/csm/gsn_code.ncl"  
     1.8 +load "$NCARG_ROOT/lib/ncarg/nclscripts/csm/gsn_csm.ncl"  
     1.9 +load "$NCARG_ROOT/lib/ncarg/nclscripts/csm/contributed.ncl"   
    1.10 +;************************************************
    1.11 +begin
    1.12 +
    1.13 +  b = "zot005_45D2_seas.co2"                    
    1.14 +   ncol = 4
    1.15 +   data = readAsciiTable(b, ncol, "float", (/10,17/))
    1.16 +   print (data)
    1.17 +
    1.18 +   ncol = 5
    1.19 +   data2 = readAsciiTable(b, ncol, "float", 16)
    1.20 +   print (data2)
    1.21 +  
    1.22 +end