% From Fran's template for creating actual IPF files for asc2epic.m
%
% Input Parameter File (IPF)


%%% START USGS BOILERPLATE -------------% There is no published documentation for these programs- use the 
%  internal comments and help function.
% Programs written in Matlab- as early as 7.2.0.232 (R2006a) and 
% most recent modifications in  v7.8.0 (R2009a)
% Programs ran on PC with Windows XP Professional OS, and RHEL4 linux.
%
% "Although this program has been used by the USGS, no warranty, 
% expressed or implied, is made by the USGS or the United States 
% Government as to the accuracy and functioning of the program 
% and related program material nor shall the fact of distribution 
% constitute any such warranty, and no responsibility is assumed 
% by the USGS in connection therewith."
%%% END USGS BOILERPLATE --------------

 
% opening input and output files
ascfile	='7871mc.raw'				% input data name including search path
eval(['load ',ascfile,';']);				% load input data
netnam	='7871mc-cal.cdf';				% output name including search path
f=netcdf(netnam,'clobber');				% open netCDF file

f=fatnames(f,100);							% for program purposes

% specifying global information
f.inlat      =ncchar(['42 22 38.852N']);				%can be either deg and minutes
f.inlon      =ncchar(['70 46 54.906W']);					%or in decimal degrees
f.tstart   =ncfloat([2005 5 17 00 00 00]);		% yyyy mm dd hh mm ss 
f.samp_rate     =ncfloat(300);						% in seconds
f.DELTA_T     =ncchar('300');						% in seconds
f.water_depth   =ncfloat(34.7);						% in meters
f.inst_depth   =ncfloat(8.7);					% in meters
f.DATA_CMNT      ='Microcat Boston Longterm';		% any comment
f.magnetic_variation       =ncfloat(-15.5);		% magnetic variation, negative is west
f.scipi    ='Brad Butman';			% responsible scientist
f.EXPERIMENT    ='Boston Longterm';				% experiment designation
f.moortype ='subsurface';				% mooring type
% other f.xxx may be included, but the above are required
f.MOORING = ncchar('7871');
f.INST_TYPE = ncchar('Seabird Microcat');
f.VAR_DESC = ncchar('T:C:Mo:Da:Yr:Hr:Mi:Se');

% specifying variable information
% specifying variable information
varnum=[1 2 3 4 5 6 7 8 ];						%column numbers of input variables
epcode=[28 ; 51 ; 1901 ; 1902 ; 1900 ; 1903 ; 1904 ; 1900 ];					% epic code values
sdepth=[8.7; 8.7; 8.7; 8.7; 8.7; 8.7; 8.7; 8.7];			% sensor depth if different from instrument depth
% creating cell array {} so one doesn;t have to worry about length of variable
varin={'T_28'; 'C_51'; 'Mo'; 'Da'; 'Yr'; 'Hr'; 'Mi'; 'Se'};
varunit={'C'; 'S/m' ; 'month'; 'day'; 'year'; 'hour'; 'min'; 's' };
instru={'MC-726'; 'MC-726'; 'MC-726'; 'MC-726'; 'MC-726'; 'MC-726'; 'MC-726'; 'MC-726'};	% instrument and sensor identifiers
%end of IPF