; $Id: some_c4_data.dat,v 1.3 2003/02/24 21:48:21 bhaxo Exp $

; Extract from gasXdata c4_data.dat

;

;  datafile_name="some_c4_data.dat"

;  ;; MUST read the first column if a char is to work as a comment symbol

;

;  datafile_fmt='I,F,F,F,F,F,F,X,F'

;  READCOL,datafile_name,F=datafile_fmt, $

;    date,apar_umol,Tc,ci_ppm,cs_ppm,hs,assimn_umol,wgt,/SILENT

;

; Format and fields strings for the READCOL routine.

; Strings contain comma separated fields, no spaces

;

format I,F,F,F,F,F,F,X,F

fields date,APAR_umol,Tc,Ci_ppm,Cs_ppm,hs,assimn_umol,wgt

;

; Drop the APAR_umol & Tc columns for testing testing testing testing 

;format I,X,X,F,F,F,F,X,F

;fields date,Ci_ppm,Cs_ppm,hs,assimn_umol,wgt

;

; DATE     I      TL      CI      CS       HS      AN      GS   wgt

; ----    ----    --      ---     ---     ---     ----    ---   ---

  718     1360    25      113     255     .67     29.3    .35    1.

  718     1360    25      59      139     .73     25.1    .52    1.

  718     1360    25      38      104     .73     21.6    .53    1.

  718     1360    25      23      67      .74     15.3    .57    1.

  718     1360    25      21      49      .75     11.2    .65    1.

  705     1360    25      136     281     .74     29.0    .32    1.

  705     1360    25      44      133     .77     24.6    .45    1.

  705     1360    25      26      73      .77     15.8    .55    1.

  705     1360    25      14      41      .76     9.0     .57    1.

  705     1360    25      176     363     .76     28.5    .25    1.

  705     1360    25      10      31      .79     6.0     .49    1.

  705     1360    25      164     283     .77     27.4    .39    1.

;EOF