* SAS program to read any of the original CRU data files
  from  CDIAC's NDP032; 

DATA CRUDATA;
INFILE 'orig_tmax.dat';
INPUT @1 COLUMN1 $ @;
IF COLUMN1 EQ ' ' THEN INPUT
 STANUM 1-6 LAT 9-13 LON 14-19 NAME $ 24-45 POR $ 56-63
ELSE INPUT
 YEAR 1-4 JAN 5-9 FEB 10-14 MAR 15-19 APR 20-24 MAY 25-29
 JUN 30-34 JUL 35-39 AUG 40-44 SEP 45-49 OCT 50-54 NOV 55-59
 DEC 60-64 ANN 65-69;
RUN;