Home > atmlab > arts > xml > xmlWriteGasAbsLookup.m

xmlWriteGasAbsLookup

PURPOSE ^

Writes a GasAbsLookup table to an XML file.

SYNOPSIS ^

function xmlWriteGasAbsLookup(fid, fidb, data, precision)

DESCRIPTION ^

 Writes a GasAbsLookup table to an XML file.

    Internal function that should never be called directly.
    Use *xmlStore* instead.

 FORMAT   xmlWriteGasAbsLookup(fid, fidb, data, precision)

 IN    fid        File descriptor
 IN    fidb       File descriptor for binary file
 IN    data       GasAbsLookup table
 IN    precision  Precision for floats

CROSS-REFERENCE INFORMATION ^

This function calls: This function is called by:

DOWNLOAD ^

xmlWriteGasAbsLookup.m

SOURCE CODE ^

0001 % Writes a GasAbsLookup table to an XML file.
0002 %
0003 %    Internal function that should never be called directly.
0004 %    Use *xmlStore* instead.
0005 %
0006 % FORMAT   xmlWriteGasAbsLookup(fid, fidb, data, precision)
0007 %
0008 % IN    fid        File descriptor
0009 % IN    fidb       File descriptor for binary file
0010 % IN    data       GasAbsLookup table
0011 % IN    precision  Precision for floats
0012 
0013 % 2002-12-16  Created by Oliver Lemke.
0014 
0015 function xmlWriteGasAbsLookup(fid, fidb, data, precision)
0016 
0017 xmlWriteTag (fid, 'GasAbsLookup', []);
0018 
0019 xmlWriteArrayOfArrayOf (fid, fidb, data.species, 'SpeciesTag', precision);
0020 xmlWriteArrayOf (fid, fidb, data.nonlinear_species, 'Index', precision);
0021 xmlWriteVector (fid, fidb, data.f_grid, precision);
0022 xmlWriteVector (fid, fidb, data.p_grid, precision);
0023 xmlWriteMatrix (fid, fidb, data.vmrs_ref, precision);
0024 xmlWriteVector (fid, fidb, data.t_ref, precision);
0025 xmlWriteVector (fid, fidb, data.t_pert, precision);
0026 xmlWriteVector (fid, fidb, data.nls_pert, precision);
0027 xmlWriteTensor4 (fid, fidb, data.xsec, precision);
0028 
0029 xmlWriteCloseTag (fid, 'GasAbsLookup');
0030

Generated on Mon 15-Sep-2014 13:31:28 by m2html © 2005