netcdf-c/nc_test4/tst_camrun.c
Dennis Heimbigner 36102e3c32 Improve UTF8 Support On Windows
re: Issue https://github.com/Unidata/netcdf-c/issues/2190

The primary purpose of this PR is to improve the utf8 support
for windows. This is persuant to a change in Windows that
supports utf8 natively (almost). The almost means that it is
still utf16 internally and the set of characters representable
by utf8 is larger than those representable by utf16.

This leaves open the question in the Issue about handling
the Windows 1252 character set.

This required the following changes:

1. Test the Windows build and major version in order to see if
   native utf8 is supported.
2. If native utf8 is supported, Modify dpathmgr.c to call the 8-bit
   version of the windows fopen() and open() functions.
3. In support of this, programs that use XGetOpt (Windows versions)
   need to get the command line as utf8 and then parse to
   arc+argv as utf8. This requires using a homegrown command line parser
   named XCommandLineToArgvA.
4. Add a utility program called "acpget" that prints out the
   current Windows code page and locale.

Additionally, some technical debt was cleaned up as follows:

1. Unify all the places which attempt to read all or a part
   of a file into the dutil.c#NC_readfile code.
2. Similary unify all the code that creates temp files into
   dutil.c#NC_mktmp code.
3. Convert almost all remaining calls to fopen() and open()
   to NCfopen() and NCopen3(). This is to ensure that path management
   is used consistently. This touches a number of files.
4. extern->EXTERNL as needed to get it to work under Windows.
2022-02-08 20:53:30 -07:00

7404 lines
355 KiB
C

/*
Copyright 2018, UCAR/Unidata
See COPYRIGHT file for copying and redistribution conditions.
This program writes a data file from the CAM model run. (Thanks to
Jim Edwards for contributing this example file.)
This code originally generated by ncgen.
$Id: tst_camrun.c,v 1.2 2010/05/20 13:17:50 ed Exp $
*/
#include <config.h>
#include <nc_tests.h>
#include "err_macros.h"
#include <stdio.h>
#include <stdlib.h>
#include <netcdf.h>
#include <unistd.h>
#define FILE_NAME "tst_camrun.nc"
/* rank (number of dimensions) for each variable */
# define RANK_P0 0
# define RANK_lat 1
# define RANK_lon 1
# define RANK_slat 1
# define RANK_slon 1
# define RANK_w_stag 1
# define RANK_lev 1
# define RANK_ilev 1
# define RANK_isccp_prs 1
# define RANK_isccp_tau 1
# define RANK_isccp_prstau 1
# define RANK_time 1
# define RANK_time_bnds 2
# define RANK_date_written 2
# define RANK_time_written 2
# define RANK_ntrm 0
# define RANK_ntrn 0
# define RANK_ntrk 0
# define RANK_ndbase 0
# define RANK_nsbase 0
# define RANK_nbdate 0
# define RANK_nbsec 0
# define RANK_mdt 0
# define RANK_nlon 1
# define RANK_wnummax 1
# define RANK_hyai 1
# define RANK_hybi 1
# define RANK_hyam 1
# define RANK_hybm 1
# define RANK_gw 1
# define RANK_ndcur 1
# define RANK_nscur 1
# define RANK_date 1
# define RANK_co2vmr 1
# define RANK_ch4vmr 1
# define RANK_n2ovmr 1
# define RANK_f11vmr 1
# define RANK_f12vmr 1
# define RANK_sol_tsi 1
# define RANK_datesec 1
# define RANK_nsteph 1
# define RANK_ABSORB 4
# define RANK_AEROD_v 3
# define RANK_AODABS 3
# define RANK_AODDUST1 3
# define RANK_AODDUST2 3
# define RANK_AODDUST3 3
# define RANK_AODMODE1 3
# define RANK_AODMODE2 3
# define RANK_AODMODE3 3
# define RANK_AODVIS 3
# define RANK_AQSO4_H2O2 3
# define RANK_AQSO4_O3 3
# define RANK_AQ_DMS 3
# define RANK_AQ_H2O2 3
# define RANK_AQ_H2SO4 3
# define RANK_AQ_SO2 3
# define RANK_AQ_SOAG 3
# define RANK_AQ_bc_a1 3
# define RANK_AQ_dst_a1 3
# define RANK_AQ_dst_a3 3
# define RANK_AQ_ncl_a1 3
# define RANK_AQ_ncl_a2 3
# define RANK_AQ_ncl_a3 3
# define RANK_AQ_num_a1 3
# define RANK_AQ_num_a2 3
# define RANK_AQ_num_a3 3
# define RANK_AQ_pom_a1 3
# define RANK_AQ_so4_a1 3
# define RANK_AQ_so4_a2 3
# define RANK_AQ_so4_a3 3
# define RANK_AQ_soa_a1 3
# define RANK_AQ_soa_a2 3
# define RANK_BPROD 4
# define RANK_BURDEN1 3
# define RANK_BURDEN2 3
# define RANK_BURDEN3 3
# define RANK_CCN1 4
# define RANK_CCN2 4
# define RANK_CCN3 4
# define RANK_CCN4 4
# define RANK_CCN5 4
# define RANK_CCN6 4
# define RANK_CLDHGH 3
# define RANK_CLDICE 4
# define RANK_CLDLIQ 4
# define RANK_CLDLOW 3
# define RANK_CLDMED 3
# define RANK_CLDTOT 3
# define RANK_CLOUD 4
# define RANK_CMFDQ 4
# define RANK_CMFDQR 4
# define RANK_CMFDT 4
# define RANK_CMFMC 4
# define RANK_CMFMCDZM 4
# define RANK_CONCLD 4
# define RANK_DCQ 4
# define RANK_DMS 4
# define RANK_DSTODXC 3
# define RANK_DSTSFDRY 3
# define RANK_DSTSFMBL 3
# define RANK_DSTSFWET 3
# define RANK_DTCOND 4
# define RANK_DTV 4
# define RANK_EXTINCT 4
# define RANK_FICE 4
# define RANK_FLDS 3
# define RANK_FLNS 3
# define RANK_FLNSC 3
# define RANK_FLNT 3
# define RANK_FLNTC 3
# define RANK_FLUT 3
# define RANK_FLUTC 3
# define RANK_FREQSH 3
# define RANK_FREQZM 3
# define RANK_FSDS 3
# define RANK_FSDSC 3
# define RANK_FSNS 3
# define RANK_FSNSC 3
# define RANK_FSNT 3
# define RANK_FSNTC 3
# define RANK_FSNTOA 3
# define RANK_FSNTOAC 3
# define RANK_FSUTOA 3
# define RANK_GS_DMS 3
# define RANK_GS_H2O2 3
# define RANK_GS_H2SO4 3
# define RANK_GS_SO2 3
# define RANK_GS_SOAG 3
# define RANK_GS_bc_a1 3
# define RANK_GS_dst_a1 3
# define RANK_GS_dst_a3 3
# define RANK_GS_ncl_a1 3
# define RANK_GS_ncl_a2 3
# define RANK_GS_ncl_a3 3
# define RANK_GS_num_a1 3
# define RANK_GS_num_a2 3
# define RANK_GS_num_a3 3
# define RANK_GS_pom_a1 3
# define RANK_GS_so4_a1 3
# define RANK_GS_so4_a2 3
# define RANK_GS_so4_a3 3
# define RANK_GS_soa_a1 3
# define RANK_GS_soa_a2 3
# define RANK_H2O2 4
# define RANK_H2SO4 4
# define RANK_H2SO4_sfgaex1 3
# define RANK_H2SO4_sfnnuc1 3
# define RANK_ICEFRAC 3
# define RANK_ICIMR 4
# define RANK_ICWMR 4
# define RANK_KVH 4
# define RANK_KVM 4
# define RANK_LANDFRAC 3
# define RANK_LCLOUD 4
# define RANK_LHFLX 3
# define RANK_LND_MBL 3
# define RANK_LWCF 3
# define RANK_NDROPCOL 3
# define RANK_NDROPMIX 4
# define RANK_NDROPSNK 4
# define RANK_NDROPSRC 4
# define RANK_NUMICE 4
# define RANK_NUMLIQ 4
# define RANK_OCNFRAC 3
# define RANK_ODV_bc_a1 3
# define RANK_ODV_dst_a1 3
# define RANK_ODV_dst_a3 3
# define RANK_ODV_ncl_a1 3
# define RANK_ODV_ncl_a3 3
# define RANK_ODV_pom_a1 3
# define RANK_ODV_so4_a1 3
# define RANK_ODV_soa_a1 3
# define RANK_OMEGA 4
# define RANK_OMEGAT 4
# define RANK_ORO 3
# define RANK_PBLH 3
# define RANK_PCONVB 3
# define RANK_PCONVT 3
# define RANK_PHIS 3
# define RANK_PRECC 3
# define RANK_PRECCDZM 3
# define RANK_PRECL 3
# define RANK_PRECSC 3
# define RANK_PRECSH 3
# define RANK_PRECSL 3
# define RANK_PRECT 3
# define RANK_PS 3
# define RANK_PSL 3
# define RANK_Q 4
# define RANK_QC 4
# define RANK_QFLX 3
# define RANK_QREFHT 3
# define RANK_QRL 4
# define RANK_QRS 4
# define RANK_QT 4
# define RANK_QTFLX 4
# define RANK_RAM1 3
# define RANK_RELHUM 4
# define RANK_RHREFHT 3
# define RANK_SFCLDICE 3
# define RANK_SFCLDLIQ 3
# define RANK_SFI 4
# define RANK_SFNUMICE 3
# define RANK_SFNUMLIQ 3
# define RANK_SHFLX 3
# define RANK_SL 4
# define RANK_SLFLX 4
# define RANK_SLV 4
# define RANK_SNOWHICE 3
# define RANK_SNOWHLND 3
# define RANK_SO2 4
# define RANK_SO2_CLXF 3
# define RANK_SO2_XFRC 4
# define RANK_SOAG 4
# define RANK_SOAG_sfgaex1 3
# define RANK_SOLIN 3
# define RANK_SPROD 4
# define RANK_SRFRAD 3
# define RANK_SSAVIS 3
# define RANK_SSTODXC 3
# define RANK_SSTSFDRY 3
# define RANK_SSTSFMBL 3
# define RANK_SSTSFWET 3
# define RANK_SWCF 3
# define RANK_T 4
# define RANK_TAUTMSX 3
# define RANK_TAUTMSY 3
# define RANK_TAUX 3
# define RANK_TAUY 3
# define RANK_TGCLDCWP 3
# define RANK_TGCLDIWP 3
# define RANK_TGCLDLWP 3
# define RANK_TKE 4
# define RANK_TMQ 3
# define RANK_TREFHT 3
# define RANK_TREFMNAV 3
# define RANK_TREFMXAV 3
# define RANK_TROP_FD 3
# define RANK_TROP_P 3
# define RANK_TROP_PD 4
# define RANK_TROP_T 3
# define RANK_TROP_Z 3
# define RANK_TS 3
# define RANK_TSMN 3
# define RANK_TSMX 3
# define RANK_U 4
# define RANK_UFLX 4
# define RANK_US 4
# define RANK_UU 4
# define RANK_V 4
# define RANK_VD01 4
# define RANK_VFLX 4
# define RANK_VQ 4
# define RANK_VS 4
# define RANK_VT 4
# define RANK_VU 4
# define RANK_VV 4
# define RANK_WGUSTD 3
# define RANK_WTKE 4
# define RANK_XPH_LWC 4
# define RANK_Z3 4
# define RANK_airFV 3
# define RANK_bc_a1 4
# define RANK_bc_a1DDF 3
# define RANK_bc_a1GVF 3
# define RANK_bc_a1SFSBC 3
# define RANK_bc_a1SFSBS 3
# define RANK_bc_a1SFSIC 3
# define RANK_bc_a1SFSIS 3
# define RANK_bc_a1SFWET 3
# define RANK_bc_a1TBF 3
# define RANK_bc_a1_CLXF 3
# define RANK_bc_a1_XFRC 4
# define RANK_bc_c1 4
# define RANK_bc_c1DDF 3
# define RANK_bc_c1GVF 3
# define RANK_bc_c1SFSBC 3
# define RANK_bc_c1SFSBS 3
# define RANK_bc_c1SFSIC 3
# define RANK_bc_c1SFSIS 3
# define RANK_bc_c1SFWET 3
# define RANK_bc_c1TBF 3
# define RANK_chem_trop 4
# define RANK_chem_trop_tropop 4
# define RANK_dgnd_a01 4
# define RANK_dgnd_a02 4
# define RANK_dgnd_a03 4
# define RANK_dgnw_a01 4
# define RANK_dgnw_a02 4
# define RANK_dgnw_a03 4
# define RANK_dst_a1 4
# define RANK_dst_a1DDF 3
# define RANK_dst_a1GVF 3
# define RANK_dst_a1SF 3
# define RANK_dst_a1SFSBC 3
# define RANK_dst_a1SFSBS 3
# define RANK_dst_a1SFSIC 3
# define RANK_dst_a1SFSIS 3
# define RANK_dst_a1SFWET 3
# define RANK_dst_a1TBF 3
# define RANK_dst_a3 4
# define RANK_dst_a3DDF 3
# define RANK_dst_a3GVF 3
# define RANK_dst_a3SF 3
# define RANK_dst_a3SFSBC 3
# define RANK_dst_a3SFSBS 3
# define RANK_dst_a3SFSIC 3
# define RANK_dst_a3SFSIS 3
# define RANK_dst_a3SFWET 3
# define RANK_dst_a3TBF 3
# define RANK_dst_c1 4
# define RANK_dst_c1DDF 3
# define RANK_dst_c1GVF 3
# define RANK_dst_c1SFSBC 3
# define RANK_dst_c1SFSBS 3
# define RANK_dst_c1SFSIC 3
# define RANK_dst_c1SFSIS 3
# define RANK_dst_c1SFWET 3
# define RANK_dst_c1TBF 3
# define RANK_dst_c3 4
# define RANK_dst_c3DDF 3
# define RANK_dst_c3GVF 3
# define RANK_dst_c3SFSBC 3
# define RANK_dst_c3SFSBS 3
# define RANK_dst_c3SFSIC 3
# define RANK_dst_c3SFSIS 3
# define RANK_dst_c3SFWET 3
# define RANK_dst_c3TBF 3
# define RANK_ncl_a1 4
# define RANK_ncl_a1DDF 3
# define RANK_ncl_a1GVF 3
# define RANK_ncl_a1SF 3
# define RANK_ncl_a1SFSBC 3
# define RANK_ncl_a1SFSBS 3
# define RANK_ncl_a1SFSIC 3
# define RANK_ncl_a1SFSIS 3
# define RANK_ncl_a1SFWET 3
# define RANK_ncl_a1TBF 3
# define RANK_ncl_a1_sfcoag1 3
# define RANK_ncl_a1_sfcsiz3 3
# define RANK_ncl_a1_sfcsiz4 3
# define RANK_ncl_a1_sfgaex2 3
# define RANK_ncl_a2 4
# define RANK_ncl_a2DDF 3
# define RANK_ncl_a2GVF 3
# define RANK_ncl_a2SF 3
# define RANK_ncl_a2SFSBC 3
# define RANK_ncl_a2SFSBS 3
# define RANK_ncl_a2SFSIC 3
# define RANK_ncl_a2SFSIS 3
# define RANK_ncl_a2SFWET 3
# define RANK_ncl_a2TBF 3
# define RANK_ncl_a2_sfcoag1 3
# define RANK_ncl_a2_sfcsiz3 3
# define RANK_ncl_a2_sfcsiz4 3
# define RANK_ncl_a2_sfgaex2 3
# define RANK_ncl_a3 4
# define RANK_ncl_a3DDF 3
# define RANK_ncl_a3GVF 3
# define RANK_ncl_a3SF 3
# define RANK_ncl_a3SFSBC 3
# define RANK_ncl_a3SFSBS 3
# define RANK_ncl_a3SFSIC 3
# define RANK_ncl_a3SFSIS 3
# define RANK_ncl_a3SFWET 3
# define RANK_ncl_a3TBF 3
# define RANK_ncl_c1 4
# define RANK_ncl_c1DDF 3
# define RANK_ncl_c1GVF 3
# define RANK_ncl_c1SFSBC 3
# define RANK_ncl_c1SFSBS 3
# define RANK_ncl_c1SFSIC 3
# define RANK_ncl_c1SFSIS 3
# define RANK_ncl_c1SFWET 3
# define RANK_ncl_c1TBF 3
# define RANK_ncl_c1_sfcsiz3 3
# define RANK_ncl_c1_sfcsiz4 3
# define RANK_ncl_c1_sfgaex2 3
# define RANK_ncl_c2 4
# define RANK_ncl_c2DDF 3
# define RANK_ncl_c2GVF 3
# define RANK_ncl_c2SFSBC 3
# define RANK_ncl_c2SFSBS 3
# define RANK_ncl_c2SFSIC 3
# define RANK_ncl_c2SFSIS 3
# define RANK_ncl_c2SFWET 3
# define RANK_ncl_c2TBF 3
# define RANK_ncl_c2_sfcsiz3 3
# define RANK_ncl_c2_sfcsiz4 3
# define RANK_ncl_c2_sfgaex2 3
# define RANK_ncl_c3 4
# define RANK_ncl_c3DDF 3
# define RANK_ncl_c3GVF 3
# define RANK_ncl_c3SFSBC 3
# define RANK_ncl_c3SFSBS 3
# define RANK_ncl_c3SFSIC 3
# define RANK_ncl_c3SFSIS 3
# define RANK_ncl_c3SFWET 3
# define RANK_ncl_c3TBF 3
# define RANK_num_a1 4
# define RANK_num_a1DDF 3
# define RANK_num_a1GVF 3
# define RANK_num_a1SFSBC 3
# define RANK_num_a1SFSBS 3
# define RANK_num_a1SFSIC 3
# define RANK_num_a1SFSIS 3
# define RANK_num_a1SFWET 3
# define RANK_num_a1TBF 3
# define RANK_num_a1_CLXF 3
# define RANK_num_a1_XFRC 4
# define RANK_num_a1_sfcoag1 3
# define RANK_num_a1_sfcsiz1 3
# define RANK_num_a1_sfcsiz2 3
# define RANK_num_a1_sfcsiz3 3
# define RANK_num_a1_sfcsiz4 3
# define RANK_num_a1_sfgaex2 3
# define RANK_num_a2 4
# define RANK_num_a2DDF 3
# define RANK_num_a2GVF 3
# define RANK_num_a2SFSBC 3
# define RANK_num_a2SFSBS 3
# define RANK_num_a2SFSIC 3
# define RANK_num_a2SFSIS 3
# define RANK_num_a2SFWET 3
# define RANK_num_a2TBF 3
# define RANK_num_a2_CLXF 3
# define RANK_num_a2_XFRC 4
# define RANK_num_a2_sfcoag1 3
# define RANK_num_a2_sfcsiz1 3
# define RANK_num_a2_sfcsiz2 3
# define RANK_num_a2_sfcsiz3 3
# define RANK_num_a2_sfcsiz4 3
# define RANK_num_a2_sfgaex2 3
# define RANK_num_a2_sfnnuc1 3
# define RANK_num_a3 4
# define RANK_num_a3DDF 3
# define RANK_num_a3GVF 3
# define RANK_num_a3SFSBC 3
# define RANK_num_a3SFSBS 3
# define RANK_num_a3SFSIC 3
# define RANK_num_a3SFSIS 3
# define RANK_num_a3SFWET 3
# define RANK_num_a3TBF 3
# define RANK_num_a3_sfcsiz1 3
# define RANK_num_a3_sfcsiz2 3
# define RANK_num_c1 4
# define RANK_num_c1DDF 3
# define RANK_num_c1GVF 3
# define RANK_num_c1SFSBC 3
# define RANK_num_c1SFSBS 3
# define RANK_num_c1SFSIC 3
# define RANK_num_c1SFSIS 3
# define RANK_num_c1SFWET 3
# define RANK_num_c1TBF 3
# define RANK_num_c1_sfcsiz1 3
# define RANK_num_c1_sfcsiz2 3
# define RANK_num_c1_sfcsiz3 3
# define RANK_num_c1_sfcsiz4 3
# define RANK_num_c1_sfgaex2 3
# define RANK_num_c2 4
# define RANK_num_c2DDF 3
# define RANK_num_c2GVF 3
# define RANK_num_c2SFSBC 3
# define RANK_num_c2SFSBS 3
# define RANK_num_c2SFSIC 3
# define RANK_num_c2SFSIS 3
# define RANK_num_c2SFWET 3
# define RANK_num_c2TBF 3
# define RANK_num_c2_sfcsiz1 3
# define RANK_num_c2_sfcsiz2 3
# define RANK_num_c2_sfcsiz3 3
# define RANK_num_c2_sfcsiz4 3
# define RANK_num_c2_sfgaex2 3
# define RANK_num_c3 4
# define RANK_num_c3DDF 3
# define RANK_num_c3GVF 3
# define RANK_num_c3SFSBC 3
# define RANK_num_c3SFSBS 3
# define RANK_num_c3SFSIC 3
# define RANK_num_c3SFSIS 3
# define RANK_num_c3SFWET 3
# define RANK_num_c3TBF 3
# define RANK_num_c3_sfcsiz1 3
# define RANK_num_c3_sfcsiz2 3
# define RANK_pom_a1 4
# define RANK_pom_a1DDF 3
# define RANK_pom_a1GVF 3
# define RANK_pom_a1SFSBC 3
# define RANK_pom_a1SFSBS 3
# define RANK_pom_a1SFSIC 3
# define RANK_pom_a1SFSIS 3
# define RANK_pom_a1SFWET 3
# define RANK_pom_a1TBF 3
# define RANK_pom_a1_CLXF 3
# define RANK_pom_a1_XFRC 4
# define RANK_pom_c1 4
# define RANK_pom_c1DDF 3
# define RANK_pom_c1GVF 3
# define RANK_pom_c1SFSBC 3
# define RANK_pom_c1SFSBS 3
# define RANK_pom_c1SFSIC 3
# define RANK_pom_c1SFSIS 3
# define RANK_pom_c1SFWET 3
# define RANK_pom_c1TBF 3
# define RANK_so4_a1 4
# define RANK_so4_a1DDF 3
# define RANK_so4_a1GVF 3
# define RANK_so4_a1SFSBC 3
# define RANK_so4_a1SFSBS 3
# define RANK_so4_a1SFSIC 3
# define RANK_so4_a1SFSIS 3
# define RANK_so4_a1SFWET 3
# define RANK_so4_a1TBF 3
# define RANK_so4_a1_CLXF 3
# define RANK_so4_a1_XFRC 4
# define RANK_so4_a1_sfcoag1 3
# define RANK_so4_a1_sfcsiz3 3
# define RANK_so4_a1_sfcsiz4 3
# define RANK_so4_a1_sfgaex1 3
# define RANK_so4_a1_sfgaex2 3
# define RANK_so4_a2 4
# define RANK_so4_a2DDF 3
# define RANK_so4_a2GVF 3
# define RANK_so4_a2SFSBC 3
# define RANK_so4_a2SFSBS 3
# define RANK_so4_a2SFSIC 3
# define RANK_so4_a2SFSIS 3
# define RANK_so4_a2SFWET 3
# define RANK_so4_a2TBF 3
# define RANK_so4_a2_CLXF 3
# define RANK_so4_a2_XFRC 4
# define RANK_so4_a2_sfcoag1 3
# define RANK_so4_a2_sfcsiz3 3
# define RANK_so4_a2_sfcsiz4 3
# define RANK_so4_a2_sfgaex1 3
# define RANK_so4_a2_sfgaex2 3
# define RANK_so4_a2_sfnnuc1 3
# define RANK_so4_a3 4
# define RANK_so4_a3DDF 3
# define RANK_so4_a3GVF 3
# define RANK_so4_a3SFSBC 3
# define RANK_so4_a3SFSBS 3
# define RANK_so4_a3SFSIC 3
# define RANK_so4_a3SFSIS 3
# define RANK_so4_a3SFWET 3
# define RANK_so4_a3TBF 3
# define RANK_so4_a3_sfgaex1 3
# define RANK_so4_c1 4
# define RANK_so4_c1AQH2SO4 3
# define RANK_so4_c1AQSO4 3
# define RANK_so4_c1DDF 3
# define RANK_so4_c1GVF 3
# define RANK_so4_c1SFSBC 3
# define RANK_so4_c1SFSBS 3
# define RANK_so4_c1SFSIC 3
# define RANK_so4_c1SFSIS 3
# define RANK_so4_c1SFWET 3
# define RANK_so4_c1TBF 3
# define RANK_so4_c1_sfcsiz3 3
# define RANK_so4_c1_sfcsiz4 3
# define RANK_so4_c1_sfgaex2 3
# define RANK_so4_c2 4
# define RANK_so4_c2AQH2SO4 3
# define RANK_so4_c2AQSO4 3
# define RANK_so4_c2DDF 3
# define RANK_so4_c2GVF 3
# define RANK_so4_c2SFSBC 3
# define RANK_so4_c2SFSBS 3
# define RANK_so4_c2SFSIC 3
# define RANK_so4_c2SFSIS 3
# define RANK_so4_c2SFWET 3
# define RANK_so4_c2TBF 3
# define RANK_so4_c2_sfcsiz3 3
# define RANK_so4_c2_sfcsiz4 3
# define RANK_so4_c2_sfgaex2 3
# define RANK_so4_c3 4
# define RANK_so4_c3AQH2SO4 3
# define RANK_so4_c3AQSO4 3
# define RANK_so4_c3DDF 3
# define RANK_so4_c3GVF 3
# define RANK_so4_c3SFSBC 3
# define RANK_so4_c3SFSBS 3
# define RANK_so4_c3SFSIC 3
# define RANK_so4_c3SFSIS 3
# define RANK_so4_c3SFWET 3
# define RANK_so4_c3TBF 3
# define RANK_soa_a1 4
# define RANK_soa_a1DDF 3
# define RANK_soa_a1GVF 3
# define RANK_soa_a1SFSBC 3
# define RANK_soa_a1SFSBS 3
# define RANK_soa_a1SFSIC 3
# define RANK_soa_a1SFSIS 3
# define RANK_soa_a1SFWET 3
# define RANK_soa_a1TBF 3
# define RANK_soa_a1_sfcoag1 3
# define RANK_soa_a1_sfcsiz3 3
# define RANK_soa_a1_sfcsiz4 3
# define RANK_soa_a1_sfgaex1 3
# define RANK_soa_a1_sfgaex2 3
# define RANK_soa_a2 4
# define RANK_soa_a2DDF 3
# define RANK_soa_a2GVF 3
# define RANK_soa_a2SFSBC 3
# define RANK_soa_a2SFSBS 3
# define RANK_soa_a2SFSIC 3
# define RANK_soa_a2SFSIS 3
# define RANK_soa_a2SFWET 3
# define RANK_soa_a2TBF 3
# define RANK_soa_a2_sfcoag1 3
# define RANK_soa_a2_sfcsiz3 3
# define RANK_soa_a2_sfcsiz4 3
# define RANK_soa_a2_sfgaex1 3
# define RANK_soa_a2_sfgaex2 3
# define RANK_soa_c1 4
# define RANK_soa_c1DDF 3
# define RANK_soa_c1GVF 3
# define RANK_soa_c1SFSBC 3
# define RANK_soa_c1SFSBS 3
# define RANK_soa_c1SFSIC 3
# define RANK_soa_c1SFSIS 3
# define RANK_soa_c1SFWET 3
# define RANK_soa_c1TBF 3
# define RANK_soa_c1_sfcsiz3 3
# define RANK_soa_c1_sfcsiz4 3
# define RANK_soa_c1_sfgaex2 3
# define RANK_soa_c2 4
# define RANK_soa_c2DDF 3
# define RANK_soa_c2GVF 3
# define RANK_soa_c2SFSBC 3
# define RANK_soa_c2SFSBS 3
# define RANK_soa_c2SFSIC 3
# define RANK_soa_c2SFSIS 3
# define RANK_soa_c2SFWET 3
# define RANK_soa_c2TBF 3
# define RANK_soa_c2_sfcsiz3 3
# define RANK_soa_c2_sfcsiz4 3
# define RANK_soa_c2_sfgaex2 3
# define RANK_wat_a1 4
# define RANK_wat_a2 4
# define RANK_wat_a3 4
#define MEGABYTE 1048576
void
get_mem_used2(int *mem_used)
{
char buf[30];
FILE *pf;
size_t page_size = 4092; /* For spock... */
unsigned size; /* total program size */
unsigned resident;/* resident set size */
unsigned share;/* shared pages */
unsigned text;/* text (code) */
unsigned lib;/* library */
unsigned data;/* data/stack */
/*unsigned dt; dirty pages (unused in Linux 2.6)*/
assert(mem_used);
snprintf(buf, 30, "/proc/%u/statm", (unsigned)getpid());
if ((pf = NCfopen(buf, "r")))
{
(void)fscanf(pf, "%u %u %u %u %u %u", &size, &resident, &share,
&text, &lib, &data);
*mem_used = (data * page_size) / MEGABYTE;
}
else
*mem_used = -1;
fclose(pf);
}
int
main()
{
int ncid; /* netCDF id */
/* dimension ids */
int lat_dim;
int lon_dim;
int slat_dim;
int slon_dim;
int lev_dim;
int ilev_dim;
int isccp_prs_dim;
int isccp_tau_dim;
int isccp_prstau_dim;
int time_dim;
int tbnd_dim;
int chars_dim;
/* dimension lengths */
size_t lat_len = 96;
size_t lon_len = 144;
size_t slat_len = 95;
size_t slon_len = 144;
size_t lev_len = 30;
size_t ilev_len = 31;
size_t isccp_prs_len = 7;
size_t isccp_tau_len = 7;
size_t isccp_prstau_len = 49;
size_t time_len = NC_UNLIMITED;
size_t tbnd_len = 2;
size_t chars_len = 8;
/* variable ids */
int P0_id;
int lat_id;
int lon_id;
int slat_id;
int slon_id;
int w_stag_id;
int lev_id;
int ilev_id;
int isccp_prs_id;
int isccp_tau_id;
int isccp_prstau_id;
int time_id;
int time_bnds_id;
int date_written_id;
int time_written_id;
int ntrm_id;
int ntrn_id;
int ntrk_id;
int ndbase_id;
int nsbase_id;
int nbdate_id;
int nbsec_id;
int mdt_id;
int nlon_id;
int wnummax_id;
int hyai_id;
int hybi_id;
int hyam_id;
int hybm_id;
int gw_id;
int ndcur_id;
int nscur_id;
int date_id;
int co2vmr_id;
int ch4vmr_id;
int n2ovmr_id;
int f11vmr_id;
int f12vmr_id;
int sol_tsi_id;
int datesec_id;
int nsteph_id;
int ABSORB_id;
int AEROD_v_id;
int AODABS_id;
int AODDUST1_id;
int AODDUST2_id;
int AODDUST3_id;
int AODMODE1_id;
int AODMODE2_id;
int AODMODE3_id;
int AODVIS_id;
int AQSO4_H2O2_id;
int AQSO4_O3_id;
int AQ_DMS_id;
int AQ_H2O2_id;
int AQ_H2SO4_id;
int AQ_SO2_id;
int AQ_SOAG_id;
int AQ_bc_a1_id;
int AQ_dst_a1_id;
int AQ_dst_a3_id;
int AQ_ncl_a1_id;
int AQ_ncl_a2_id;
int AQ_ncl_a3_id;
int AQ_num_a1_id;
int AQ_num_a2_id;
int AQ_num_a3_id;
int AQ_pom_a1_id;
int AQ_so4_a1_id;
int AQ_so4_a2_id;
int AQ_so4_a3_id;
int AQ_soa_a1_id;
int AQ_soa_a2_id;
int BPROD_id;
int BURDEN1_id;
int BURDEN2_id;
int BURDEN3_id;
int CCN1_id;
int CCN2_id;
int CCN3_id;
int CCN4_id;
int CCN5_id;
int CCN6_id;
int CLDHGH_id;
int CLDICE_id;
int CLDLIQ_id;
int CLDLOW_id;
int CLDMED_id;
int CLDTOT_id;
int CLOUD_id;
int CMFDQ_id;
int CMFDQR_id;
int CMFDT_id;
int CMFMC_id;
int CMFMCDZM_id;
int CONCLD_id;
int DCQ_id;
int DMS_id;
int DSTODXC_id;
int DSTSFDRY_id;
int DSTSFMBL_id;
int DSTSFWET_id;
int DTCOND_id;
int DTV_id;
int EXTINCT_id;
int FICE_id;
int FLDS_id;
int FLNS_id;
int FLNSC_id;
int FLNT_id;
int FLNTC_id;
int FLUT_id;
int FLUTC_id;
int FREQSH_id;
int FREQZM_id;
int FSDS_id;
int FSDSC_id;
int FSNS_id;
int FSNSC_id;
int FSNT_id;
int FSNTC_id;
int FSNTOA_id;
int FSNTOAC_id;
int FSUTOA_id;
int GS_DMS_id;
int GS_H2O2_id;
int GS_H2SO4_id;
int GS_SO2_id;
int GS_SOAG_id;
int GS_bc_a1_id;
int GS_dst_a1_id;
int GS_dst_a3_id;
int GS_ncl_a1_id;
int GS_ncl_a2_id;
int GS_ncl_a3_id;
int GS_num_a1_id;
int GS_num_a2_id;
int GS_num_a3_id;
int GS_pom_a1_id;
int GS_so4_a1_id;
int GS_so4_a2_id;
int GS_so4_a3_id;
int GS_soa_a1_id;
int GS_soa_a2_id;
int H2O2_id;
int H2SO4_id;
int H2SO4_sfgaex1_id;
int H2SO4_sfnnuc1_id;
int ICEFRAC_id;
int ICIMR_id;
int ICWMR_id;
int KVH_id;
int KVM_id;
int LANDFRAC_id;
int LCLOUD_id;
int LHFLX_id;
int LND_MBL_id;
int LWCF_id;
int NDROPCOL_id;
int NDROPMIX_id;
int NDROPSNK_id;
int NDROPSRC_id;
int NUMICE_id;
int NUMLIQ_id;
int OCNFRAC_id;
int ODV_bc_a1_id;
int ODV_dst_a1_id;
int ODV_dst_a3_id;
int ODV_ncl_a1_id;
int ODV_ncl_a3_id;
int ODV_pom_a1_id;
int ODV_so4_a1_id;
int ODV_soa_a1_id;
int OMEGA_id;
int OMEGAT_id;
int ORO_id;
int PBLH_id;
int PCONVB_id;
int PCONVT_id;
int PHIS_id;
int PRECC_id;
int PRECCDZM_id;
int PRECL_id;
int PRECSC_id;
int PRECSH_id;
int PRECSL_id;
int PRECT_id;
int PS_id;
int PSL_id;
int Q_id;
int QC_id;
int QFLX_id;
int QREFHT_id;
int QRL_id;
int QRS_id;
int QT_id;
int QTFLX_id;
int RAM1_id;
int RELHUM_id;
int RHREFHT_id;
int SFCLDICE_id;
int SFCLDLIQ_id;
int SFI_id;
int SFNUMICE_id;
int SFNUMLIQ_id;
int SHFLX_id;
int SL_id;
int SLFLX_id;
int SLV_id;
int SNOWHICE_id;
int SNOWHLND_id;
int SO2_id;
int SO2_CLXF_id;
int SO2_XFRC_id;
int SOAG_id;
int SOAG_sfgaex1_id;
int SOLIN_id;
int SPROD_id;
int SRFRAD_id;
int SSAVIS_id;
int SSTODXC_id;
int SSTSFDRY_id;
int SSTSFMBL_id;
int SSTSFWET_id;
int SWCF_id;
int T_id;
int TAUTMSX_id;
int TAUTMSY_id;
int TAUX_id;
int TAUY_id;
int TGCLDCWP_id;
int TGCLDIWP_id;
int TGCLDLWP_id;
int TKE_id;
int TMQ_id;
int TREFHT_id;
int TREFMNAV_id;
int TREFMXAV_id;
int TROP_FD_id;
int TROP_P_id;
int TROP_PD_id;
int TROP_T_id;
int TROP_Z_id;
int TS_id;
int TSMN_id;
int TSMX_id;
int U_id;
int UFLX_id;
int US_id;
int UU_id;
int V_id;
int VD01_id;
int VFLX_id;
int VQ_id;
int VS_id;
int VT_id;
int VU_id;
int VV_id;
int WGUSTD_id;
int WTKE_id;
int XPH_LWC_id;
int Z3_id;
int airFV_id;
int bc_a1_id;
int bc_a1DDF_id;
int bc_a1GVF_id;
int bc_a1SFSBC_id;
int bc_a1SFSBS_id;
int bc_a1SFSIC_id;
int bc_a1SFSIS_id;
int bc_a1SFWET_id;
int bc_a1TBF_id;
int bc_a1_CLXF_id;
int bc_a1_XFRC_id;
int bc_c1_id;
int bc_c1DDF_id;
int bc_c1GVF_id;
int bc_c1SFSBC_id;
int bc_c1SFSBS_id;
int bc_c1SFSIC_id;
int bc_c1SFSIS_id;
int bc_c1SFWET_id;
int bc_c1TBF_id;
int chem_trop_id;
int chem_trop_tropop_id;
int dgnd_a01_id;
int dgnd_a02_id;
int dgnd_a03_id;
int dgnw_a01_id;
int dgnw_a02_id;
int dgnw_a03_id;
int dst_a1_id;
int dst_a1DDF_id;
int dst_a1GVF_id;
int dst_a1SF_id;
int dst_a1SFSBC_id;
int dst_a1SFSBS_id;
int dst_a1SFSIC_id;
int dst_a1SFSIS_id;
int dst_a1SFWET_id;
int dst_a1TBF_id;
int dst_a3_id;
int dst_a3DDF_id;
int dst_a3GVF_id;
int dst_a3SF_id;
int dst_a3SFSBC_id;
int dst_a3SFSBS_id;
int dst_a3SFSIC_id;
int dst_a3SFSIS_id;
int dst_a3SFWET_id;
int dst_a3TBF_id;
int dst_c1_id;
int dst_c1DDF_id;
int dst_c1GVF_id;
int dst_c1SFSBC_id;
int dst_c1SFSBS_id;
int dst_c1SFSIC_id;
int dst_c1SFSIS_id;
int dst_c1SFWET_id;
int dst_c1TBF_id;
int dst_c3_id;
int dst_c3DDF_id;
int dst_c3GVF_id;
int dst_c3SFSBC_id;
int dst_c3SFSBS_id;
int dst_c3SFSIC_id;
int dst_c3SFSIS_id;
int dst_c3SFWET_id;
int dst_c3TBF_id;
int ncl_a1_id;
int ncl_a1DDF_id;
int ncl_a1GVF_id;
int ncl_a1SF_id;
int ncl_a1SFSBC_id;
int ncl_a1SFSBS_id;
int ncl_a1SFSIC_id;
int ncl_a1SFSIS_id;
int ncl_a1SFWET_id;
int ncl_a1TBF_id;
int ncl_a1_sfcoag1_id;
int ncl_a1_sfcsiz3_id;
int ncl_a1_sfcsiz4_id;
int ncl_a1_sfgaex2_id;
int ncl_a2_id;
int ncl_a2DDF_id;
int ncl_a2GVF_id;
int ncl_a2SF_id;
int ncl_a2SFSBC_id;
int ncl_a2SFSBS_id;
int ncl_a2SFSIC_id;
int ncl_a2SFSIS_id;
int ncl_a2SFWET_id;
int ncl_a2TBF_id;
int ncl_a2_sfcoag1_id;
int ncl_a2_sfcsiz3_id;
int ncl_a2_sfcsiz4_id;
int ncl_a2_sfgaex2_id;
int ncl_a3_id;
int ncl_a3DDF_id;
int ncl_a3GVF_id;
int ncl_a3SF_id;
int ncl_a3SFSBC_id;
int ncl_a3SFSBS_id;
int ncl_a3SFSIC_id;
int ncl_a3SFSIS_id;
int ncl_a3SFWET_id;
int ncl_a3TBF_id;
int ncl_c1_id;
int ncl_c1DDF_id;
int ncl_c1GVF_id;
int ncl_c1SFSBC_id;
int ncl_c1SFSBS_id;
int ncl_c1SFSIC_id;
int ncl_c1SFSIS_id;
int ncl_c1SFWET_id;
int ncl_c1TBF_id;
int ncl_c1_sfcsiz3_id;
int ncl_c1_sfcsiz4_id;
int ncl_c1_sfgaex2_id;
int ncl_c2_id;
int ncl_c2DDF_id;
int ncl_c2GVF_id;
int ncl_c2SFSBC_id;
int ncl_c2SFSBS_id;
int ncl_c2SFSIC_id;
int ncl_c2SFSIS_id;
int ncl_c2SFWET_id;
int ncl_c2TBF_id;
int ncl_c2_sfcsiz3_id;
int ncl_c2_sfcsiz4_id;
int ncl_c2_sfgaex2_id;
int ncl_c3_id;
int ncl_c3DDF_id;
int ncl_c3GVF_id;
int ncl_c3SFSBC_id;
int ncl_c3SFSBS_id;
int ncl_c3SFSIC_id;
int ncl_c3SFSIS_id;
int ncl_c3SFWET_id;
int ncl_c3TBF_id;
int num_a1_id;
int num_a1DDF_id;
int num_a1GVF_id;
int num_a1SFSBC_id;
int num_a1SFSBS_id;
int num_a1SFSIC_id;
int num_a1SFSIS_id;
int num_a1SFWET_id;
int num_a1TBF_id;
int num_a1_CLXF_id;
int num_a1_XFRC_id;
int num_a1_sfcoag1_id;
int num_a1_sfcsiz1_id;
int num_a1_sfcsiz2_id;
int num_a1_sfcsiz3_id;
int num_a1_sfcsiz4_id;
int num_a1_sfgaex2_id;
int num_a2_id;
int num_a2DDF_id;
int num_a2GVF_id;
int num_a2SFSBC_id;
int num_a2SFSBS_id;
int num_a2SFSIC_id;
int num_a2SFSIS_id;
int num_a2SFWET_id;
int num_a2TBF_id;
int num_a2_CLXF_id;
int num_a2_XFRC_id;
int num_a2_sfcoag1_id;
int num_a2_sfcsiz1_id;
int num_a2_sfcsiz2_id;
int num_a2_sfcsiz3_id;
int num_a2_sfcsiz4_id;
int num_a2_sfgaex2_id;
int num_a2_sfnnuc1_id;
int num_a3_id;
int num_a3DDF_id;
int num_a3GVF_id;
int num_a3SFSBC_id;
int num_a3SFSBS_id;
int num_a3SFSIC_id;
int num_a3SFSIS_id;
int num_a3SFWET_id;
int num_a3TBF_id;
int num_a3_sfcsiz1_id;
int num_a3_sfcsiz2_id;
int num_c1_id;
int num_c1DDF_id;
int num_c1GVF_id;
int num_c1SFSBC_id;
int num_c1SFSBS_id;
int num_c1SFSIC_id;
int num_c1SFSIS_id;
int num_c1SFWET_id;
int num_c1TBF_id;
int num_c1_sfcsiz1_id;
int num_c1_sfcsiz2_id;
int num_c1_sfcsiz3_id;
int num_c1_sfcsiz4_id;
int num_c1_sfgaex2_id;
int num_c2_id;
int num_c2DDF_id;
int num_c2GVF_id;
int num_c2SFSBC_id;
int num_c2SFSBS_id;
int num_c2SFSIC_id;
int num_c2SFSIS_id;
int num_c2SFWET_id;
int num_c2TBF_id;
int num_c2_sfcsiz1_id;
int num_c2_sfcsiz2_id;
int num_c2_sfcsiz3_id;
int num_c2_sfcsiz4_id;
int num_c2_sfgaex2_id;
int num_c3_id;
int num_c3DDF_id;
int num_c3GVF_id;
int num_c3SFSBC_id;
int num_c3SFSBS_id;
int num_c3SFSIC_id;
int num_c3SFSIS_id;
int num_c3SFWET_id;
int num_c3TBF_id;
int num_c3_sfcsiz1_id;
int num_c3_sfcsiz2_id;
int pom_a1_id;
int pom_a1DDF_id;
int pom_a1GVF_id;
int pom_a1SFSBC_id;
int pom_a1SFSBS_id;
int pom_a1SFSIC_id;
int pom_a1SFSIS_id;
int pom_a1SFWET_id;
int pom_a1TBF_id;
int pom_a1_CLXF_id;
int pom_a1_XFRC_id;
int pom_c1_id;
int pom_c1DDF_id;
int pom_c1GVF_id;
int pom_c1SFSBC_id;
int pom_c1SFSBS_id;
int pom_c1SFSIC_id;
int pom_c1SFSIS_id;
int pom_c1SFWET_id;
int pom_c1TBF_id;
int so4_a1_id;
int so4_a1DDF_id;
int so4_a1GVF_id;
int so4_a1SFSBC_id;
int so4_a1SFSBS_id;
int so4_a1SFSIC_id;
int so4_a1SFSIS_id;
int so4_a1SFWET_id;
int so4_a1TBF_id;
int so4_a1_CLXF_id;
int so4_a1_XFRC_id;
int so4_a1_sfcoag1_id;
int so4_a1_sfcsiz3_id;
int so4_a1_sfcsiz4_id;
int so4_a1_sfgaex1_id;
int so4_a1_sfgaex2_id;
int so4_a2_id;
int so4_a2DDF_id;
int so4_a2GVF_id;
int so4_a2SFSBC_id;
int so4_a2SFSBS_id;
int so4_a2SFSIC_id;
int so4_a2SFSIS_id;
int so4_a2SFWET_id;
int so4_a2TBF_id;
int so4_a2_CLXF_id;
int so4_a2_XFRC_id;
int so4_a2_sfcoag1_id;
int so4_a2_sfcsiz3_id;
int so4_a2_sfcsiz4_id;
int so4_a2_sfgaex1_id;
int so4_a2_sfgaex2_id;
int so4_a2_sfnnuc1_id;
int so4_a3_id;
int so4_a3DDF_id;
int so4_a3GVF_id;
int so4_a3SFSBC_id;
int so4_a3SFSBS_id;
int so4_a3SFSIC_id;
int so4_a3SFSIS_id;
int so4_a3SFWET_id;
int so4_a3TBF_id;
int so4_a3_sfgaex1_id;
int so4_c1_id;
int so4_c1AQH2SO4_id;
int so4_c1AQSO4_id;
int so4_c1DDF_id;
int so4_c1GVF_id;
int so4_c1SFSBC_id;
int so4_c1SFSBS_id;
int so4_c1SFSIC_id;
int so4_c1SFSIS_id;
int so4_c1SFWET_id;
int so4_c1TBF_id;
int so4_c1_sfcsiz3_id;
int so4_c1_sfcsiz4_id;
int so4_c1_sfgaex2_id;
int so4_c2_id;
int so4_c2AQH2SO4_id;
int so4_c2AQSO4_id;
int so4_c2DDF_id;
int so4_c2GVF_id;
int so4_c2SFSBC_id;
int so4_c2SFSBS_id;
int so4_c2SFSIC_id;
int so4_c2SFSIS_id;
int so4_c2SFWET_id;
int so4_c2TBF_id;
int so4_c2_sfcsiz3_id;
int so4_c2_sfcsiz4_id;
int so4_c2_sfgaex2_id;
int so4_c3_id;
int so4_c3AQH2SO4_id;
int so4_c3AQSO4_id;
int so4_c3DDF_id;
int so4_c3GVF_id;
int so4_c3SFSBC_id;
int so4_c3SFSBS_id;
int so4_c3SFSIC_id;
int so4_c3SFSIS_id;
int so4_c3SFWET_id;
int so4_c3TBF_id;
int soa_a1_id;
int soa_a1DDF_id;
int soa_a1GVF_id;
int soa_a1SFSBC_id;
int soa_a1SFSBS_id;
int soa_a1SFSIC_id;
int soa_a1SFSIS_id;
int soa_a1SFWET_id;
int soa_a1TBF_id;
int soa_a1_sfcoag1_id;
int soa_a1_sfcsiz3_id;
int soa_a1_sfcsiz4_id;
int soa_a1_sfgaex1_id;
int soa_a1_sfgaex2_id;
int soa_a2_id;
int soa_a2DDF_id;
int soa_a2GVF_id;
int soa_a2SFSBC_id;
int soa_a2SFSBS_id;
int soa_a2SFSIC_id;
int soa_a2SFSIS_id;
int soa_a2SFWET_id;
int soa_a2TBF_id;
int soa_a2_sfcoag1_id;
int soa_a2_sfcsiz3_id;
int soa_a2_sfcsiz4_id;
int soa_a2_sfgaex1_id;
int soa_a2_sfgaex2_id;
int soa_c1_id;
int soa_c1DDF_id;
int soa_c1GVF_id;
int soa_c1SFSBC_id;
int soa_c1SFSBS_id;
int soa_c1SFSIC_id;
int soa_c1SFSIS_id;
int soa_c1SFWET_id;
int soa_c1TBF_id;
int soa_c1_sfcsiz3_id;
int soa_c1_sfcsiz4_id;
int soa_c1_sfgaex2_id;
int soa_c2_id;
int soa_c2DDF_id;
int soa_c2GVF_id;
int soa_c2SFSBC_id;
int soa_c2SFSBS_id;
int soa_c2SFSIC_id;
int soa_c2SFSIS_id;
int soa_c2SFWET_id;
int soa_c2TBF_id;
int soa_c2_sfcsiz3_id;
int soa_c2_sfcsiz4_id;
int soa_c2_sfgaex2_id;
int wat_a1_id;
int wat_a2_id;
int wat_a3_id;
/* variable shapes */
int lat_dims[RANK_lat];
int lon_dims[RANK_lon];
int slat_dims[RANK_slat];
int slon_dims[RANK_slon];
int w_stag_dims[RANK_w_stag];
int lev_dims[RANK_lev];
int ilev_dims[RANK_ilev];
int isccp_prs_dims[RANK_isccp_prs];
int isccp_tau_dims[RANK_isccp_tau];
int isccp_prstau_dims[RANK_isccp_prstau];
int time_dims[RANK_time];
int time_bnds_dims[RANK_time_bnds];
int date_written_dims[RANK_date_written];
int time_written_dims[RANK_time_written];
int nlon_dims[RANK_nlon];
int wnummax_dims[RANK_wnummax];
int hyai_dims[RANK_hyai];
int hybi_dims[RANK_hybi];
int hyam_dims[RANK_hyam];
int hybm_dims[RANK_hybm];
int gw_dims[RANK_gw];
int ndcur_dims[RANK_ndcur];
int nscur_dims[RANK_nscur];
int date_dims[RANK_date];
int co2vmr_dims[RANK_co2vmr];
int ch4vmr_dims[RANK_ch4vmr];
int n2ovmr_dims[RANK_n2ovmr];
int f11vmr_dims[RANK_f11vmr];
int f12vmr_dims[RANK_f12vmr];
int sol_tsi_dims[RANK_sol_tsi];
int datesec_dims[RANK_datesec];
int nsteph_dims[RANK_nsteph];
int ABSORB_dims[RANK_ABSORB];
int AEROD_v_dims[RANK_AEROD_v];
int AODABS_dims[RANK_AODABS];
int AODDUST1_dims[RANK_AODDUST1];
int AODDUST2_dims[RANK_AODDUST2];
int AODDUST3_dims[RANK_AODDUST3];
int AODMODE1_dims[RANK_AODMODE1];
int AODMODE2_dims[RANK_AODMODE2];
int AODMODE3_dims[RANK_AODMODE3];
int AODVIS_dims[RANK_AODVIS];
int AQSO4_H2O2_dims[RANK_AQSO4_H2O2];
int AQSO4_O3_dims[RANK_AQSO4_O3];
int AQ_DMS_dims[RANK_AQ_DMS];
int AQ_H2O2_dims[RANK_AQ_H2O2];
int AQ_H2SO4_dims[RANK_AQ_H2SO4];
int AQ_SO2_dims[RANK_AQ_SO2];
int AQ_SOAG_dims[RANK_AQ_SOAG];
int AQ_bc_a1_dims[RANK_AQ_bc_a1];
int AQ_dst_a1_dims[RANK_AQ_dst_a1];
int AQ_dst_a3_dims[RANK_AQ_dst_a3];
int AQ_ncl_a1_dims[RANK_AQ_ncl_a1];
int AQ_ncl_a2_dims[RANK_AQ_ncl_a2];
int AQ_ncl_a3_dims[RANK_AQ_ncl_a3];
int AQ_num_a1_dims[RANK_AQ_num_a1];
int AQ_num_a2_dims[RANK_AQ_num_a2];
int AQ_num_a3_dims[RANK_AQ_num_a3];
int AQ_pom_a1_dims[RANK_AQ_pom_a1];
int AQ_so4_a1_dims[RANK_AQ_so4_a1];
int AQ_so4_a2_dims[RANK_AQ_so4_a2];
int AQ_so4_a3_dims[RANK_AQ_so4_a3];
int AQ_soa_a1_dims[RANK_AQ_soa_a1];
int AQ_soa_a2_dims[RANK_AQ_soa_a2];
int BPROD_dims[RANK_BPROD];
int BURDEN1_dims[RANK_BURDEN1];
int BURDEN2_dims[RANK_BURDEN2];
int BURDEN3_dims[RANK_BURDEN3];
int CCN1_dims[RANK_CCN1];
int CCN2_dims[RANK_CCN2];
int CCN3_dims[RANK_CCN3];
int CCN4_dims[RANK_CCN4];
int CCN5_dims[RANK_CCN5];
int CCN6_dims[RANK_CCN6];
int CLDHGH_dims[RANK_CLDHGH];
int CLDICE_dims[RANK_CLDICE];
int CLDLIQ_dims[RANK_CLDLIQ];
int CLDLOW_dims[RANK_CLDLOW];
int CLDMED_dims[RANK_CLDMED];
int CLDTOT_dims[RANK_CLDTOT];
int CLOUD_dims[RANK_CLOUD];
int CMFDQ_dims[RANK_CMFDQ];
int CMFDQR_dims[RANK_CMFDQR];
int CMFDT_dims[RANK_CMFDT];
int CMFMC_dims[RANK_CMFMC];
int CMFMCDZM_dims[RANK_CMFMCDZM];
int CONCLD_dims[RANK_CONCLD];
int DCQ_dims[RANK_DCQ];
int DMS_dims[RANK_DMS];
int DSTODXC_dims[RANK_DSTODXC];
int DSTSFDRY_dims[RANK_DSTSFDRY];
int DSTSFMBL_dims[RANK_DSTSFMBL];
int DSTSFWET_dims[RANK_DSTSFWET];
int DTCOND_dims[RANK_DTCOND];
int DTV_dims[RANK_DTV];
int EXTINCT_dims[RANK_EXTINCT];
int FICE_dims[RANK_FICE];
int FLDS_dims[RANK_FLDS];
int FLNS_dims[RANK_FLNS];
int FLNSC_dims[RANK_FLNSC];
int FLNT_dims[RANK_FLNT];
int FLNTC_dims[RANK_FLNTC];
int FLUT_dims[RANK_FLUT];
int FLUTC_dims[RANK_FLUTC];
int FREQSH_dims[RANK_FREQSH];
int FREQZM_dims[RANK_FREQZM];
int FSDS_dims[RANK_FSDS];
int FSDSC_dims[RANK_FSDSC];
int FSNS_dims[RANK_FSNS];
int FSNSC_dims[RANK_FSNSC];
int FSNT_dims[RANK_FSNT];
int FSNTC_dims[RANK_FSNTC];
int FSNTOA_dims[RANK_FSNTOA];
int FSNTOAC_dims[RANK_FSNTOAC];
int FSUTOA_dims[RANK_FSUTOA];
int GS_DMS_dims[RANK_GS_DMS];
int GS_H2O2_dims[RANK_GS_H2O2];
int GS_H2SO4_dims[RANK_GS_H2SO4];
int GS_SO2_dims[RANK_GS_SO2];
int GS_SOAG_dims[RANK_GS_SOAG];
int GS_bc_a1_dims[RANK_GS_bc_a1];
int GS_dst_a1_dims[RANK_GS_dst_a1];
int GS_dst_a3_dims[RANK_GS_dst_a3];
int GS_ncl_a1_dims[RANK_GS_ncl_a1];
int GS_ncl_a2_dims[RANK_GS_ncl_a2];
int GS_ncl_a3_dims[RANK_GS_ncl_a3];
int GS_num_a1_dims[RANK_GS_num_a1];
int GS_num_a2_dims[RANK_GS_num_a2];
int GS_num_a3_dims[RANK_GS_num_a3];
int GS_pom_a1_dims[RANK_GS_pom_a1];
int GS_so4_a1_dims[RANK_GS_so4_a1];
int GS_so4_a2_dims[RANK_GS_so4_a2];
int GS_so4_a3_dims[RANK_GS_so4_a3];
int GS_soa_a1_dims[RANK_GS_soa_a1];
int GS_soa_a2_dims[RANK_GS_soa_a2];
int H2O2_dims[RANK_H2O2];
int H2SO4_dims[RANK_H2SO4];
int H2SO4_sfgaex1_dims[RANK_H2SO4_sfgaex1];
int H2SO4_sfnnuc1_dims[RANK_H2SO4_sfnnuc1];
int ICEFRAC_dims[RANK_ICEFRAC];
int ICIMR_dims[RANK_ICIMR];
int ICWMR_dims[RANK_ICWMR];
int KVH_dims[RANK_KVH];
int KVM_dims[RANK_KVM];
int LANDFRAC_dims[RANK_LANDFRAC];
int LCLOUD_dims[RANK_LCLOUD];
int LHFLX_dims[RANK_LHFLX];
int LND_MBL_dims[RANK_LND_MBL];
int LWCF_dims[RANK_LWCF];
int NDROPCOL_dims[RANK_NDROPCOL];
int NDROPMIX_dims[RANK_NDROPMIX];
int NDROPSNK_dims[RANK_NDROPSNK];
int NDROPSRC_dims[RANK_NDROPSRC];
int NUMICE_dims[RANK_NUMICE];
int NUMLIQ_dims[RANK_NUMLIQ];
int OCNFRAC_dims[RANK_OCNFRAC];
int ODV_bc_a1_dims[RANK_ODV_bc_a1];
int ODV_dst_a1_dims[RANK_ODV_dst_a1];
int ODV_dst_a3_dims[RANK_ODV_dst_a3];
int ODV_ncl_a1_dims[RANK_ODV_ncl_a1];
int ODV_ncl_a3_dims[RANK_ODV_ncl_a3];
int ODV_pom_a1_dims[RANK_ODV_pom_a1];
int ODV_so4_a1_dims[RANK_ODV_so4_a1];
int ODV_soa_a1_dims[RANK_ODV_soa_a1];
int OMEGA_dims[RANK_OMEGA];
int OMEGAT_dims[RANK_OMEGAT];
int ORO_dims[RANK_ORO];
int PBLH_dims[RANK_PBLH];
int PCONVB_dims[RANK_PCONVB];
int PCONVT_dims[RANK_PCONVT];
int PHIS_dims[RANK_PHIS];
int PRECC_dims[RANK_PRECC];
int PRECCDZM_dims[RANK_PRECCDZM];
int PRECL_dims[RANK_PRECL];
int PRECSC_dims[RANK_PRECSC];
int PRECSH_dims[RANK_PRECSH];
int PRECSL_dims[RANK_PRECSL];
int PRECT_dims[RANK_PRECT];
int PS_dims[RANK_PS];
int PSL_dims[RANK_PSL];
int Q_dims[RANK_Q];
int QC_dims[RANK_QC];
int QFLX_dims[RANK_QFLX];
int QREFHT_dims[RANK_QREFHT];
int QRL_dims[RANK_QRL];
int QRS_dims[RANK_QRS];
int QT_dims[RANK_QT];
int QTFLX_dims[RANK_QTFLX];
int RAM1_dims[RANK_RAM1];
int RELHUM_dims[RANK_RELHUM];
int RHREFHT_dims[RANK_RHREFHT];
int SFCLDICE_dims[RANK_SFCLDICE];
int SFCLDLIQ_dims[RANK_SFCLDLIQ];
int SFI_dims[RANK_SFI];
int SFNUMICE_dims[RANK_SFNUMICE];
int SFNUMLIQ_dims[RANK_SFNUMLIQ];
int SHFLX_dims[RANK_SHFLX];
int SL_dims[RANK_SL];
int SLFLX_dims[RANK_SLFLX];
int SLV_dims[RANK_SLV];
int SNOWHICE_dims[RANK_SNOWHICE];
int SNOWHLND_dims[RANK_SNOWHLND];
int SO2_dims[RANK_SO2];
int SO2_CLXF_dims[RANK_SO2_CLXF];
int SO2_XFRC_dims[RANK_SO2_XFRC];
int SOAG_dims[RANK_SOAG];
int SOAG_sfgaex1_dims[RANK_SOAG_sfgaex1];
int SOLIN_dims[RANK_SOLIN];
int SPROD_dims[RANK_SPROD];
int SRFRAD_dims[RANK_SRFRAD];
int SSAVIS_dims[RANK_SSAVIS];
int SSTODXC_dims[RANK_SSTODXC];
int SSTSFDRY_dims[RANK_SSTSFDRY];
int SSTSFMBL_dims[RANK_SSTSFMBL];
int SSTSFWET_dims[RANK_SSTSFWET];
int SWCF_dims[RANK_SWCF];
int T_dims[RANK_T];
int TAUTMSX_dims[RANK_TAUTMSX];
int TAUTMSY_dims[RANK_TAUTMSY];
int TAUX_dims[RANK_TAUX];
int TAUY_dims[RANK_TAUY];
int TGCLDCWP_dims[RANK_TGCLDCWP];
int TGCLDIWP_dims[RANK_TGCLDIWP];
int TGCLDLWP_dims[RANK_TGCLDLWP];
int TKE_dims[RANK_TKE];
int TMQ_dims[RANK_TMQ];
int TREFHT_dims[RANK_TREFHT];
int TREFMNAV_dims[RANK_TREFMNAV];
int TREFMXAV_dims[RANK_TREFMXAV];
int TROP_FD_dims[RANK_TROP_FD];
int TROP_P_dims[RANK_TROP_P];
int TROP_PD_dims[RANK_TROP_PD];
int TROP_T_dims[RANK_TROP_T];
int TROP_Z_dims[RANK_TROP_Z];
int TS_dims[RANK_TS];
int TSMN_dims[RANK_TSMN];
int TSMX_dims[RANK_TSMX];
int U_dims[RANK_U];
int UFLX_dims[RANK_UFLX];
int US_dims[RANK_US];
int UU_dims[RANK_UU];
int V_dims[RANK_V];
int VD01_dims[RANK_VD01];
int VFLX_dims[RANK_VFLX];
int VQ_dims[RANK_VQ];
int VS_dims[RANK_VS];
int VT_dims[RANK_VT];
int VU_dims[RANK_VU];
int VV_dims[RANK_VV];
int WGUSTD_dims[RANK_WGUSTD];
int WTKE_dims[RANK_WTKE];
int XPH_LWC_dims[RANK_XPH_LWC];
int Z3_dims[RANK_Z3];
int airFV_dims[RANK_airFV];
int bc_a1_dims[RANK_bc_a1];
int bc_a1DDF_dims[RANK_bc_a1DDF];
int bc_a1GVF_dims[RANK_bc_a1GVF];
int bc_a1SFSBC_dims[RANK_bc_a1SFSBC];
int bc_a1SFSBS_dims[RANK_bc_a1SFSBS];
int bc_a1SFSIC_dims[RANK_bc_a1SFSIC];
int bc_a1SFSIS_dims[RANK_bc_a1SFSIS];
int bc_a1SFWET_dims[RANK_bc_a1SFWET];
int bc_a1TBF_dims[RANK_bc_a1TBF];
int bc_a1_CLXF_dims[RANK_bc_a1_CLXF];
int bc_a1_XFRC_dims[RANK_bc_a1_XFRC];
int bc_c1_dims[RANK_bc_c1];
int bc_c1DDF_dims[RANK_bc_c1DDF];
int bc_c1GVF_dims[RANK_bc_c1GVF];
int bc_c1SFSBC_dims[RANK_bc_c1SFSBC];
int bc_c1SFSBS_dims[RANK_bc_c1SFSBS];
int bc_c1SFSIC_dims[RANK_bc_c1SFSIC];
int bc_c1SFSIS_dims[RANK_bc_c1SFSIS];
int bc_c1SFWET_dims[RANK_bc_c1SFWET];
int bc_c1TBF_dims[RANK_bc_c1TBF];
int chem_trop_dims[RANK_chem_trop];
int chem_trop_tropop_dims[RANK_chem_trop_tropop];
int dgnd_a01_dims[RANK_dgnd_a01];
int dgnd_a02_dims[RANK_dgnd_a02];
int dgnd_a03_dims[RANK_dgnd_a03];
int dgnw_a01_dims[RANK_dgnw_a01];
int dgnw_a02_dims[RANK_dgnw_a02];
int dgnw_a03_dims[RANK_dgnw_a03];
int dst_a1_dims[RANK_dst_a1];
int dst_a1DDF_dims[RANK_dst_a1DDF];
int dst_a1GVF_dims[RANK_dst_a1GVF];
int dst_a1SF_dims[RANK_dst_a1SF];
int dst_a1SFSBC_dims[RANK_dst_a1SFSBC];
int dst_a1SFSBS_dims[RANK_dst_a1SFSBS];
int dst_a1SFSIC_dims[RANK_dst_a1SFSIC];
int dst_a1SFSIS_dims[RANK_dst_a1SFSIS];
int dst_a1SFWET_dims[RANK_dst_a1SFWET];
int dst_a1TBF_dims[RANK_dst_a1TBF];
int dst_a3_dims[RANK_dst_a3];
int dst_a3DDF_dims[RANK_dst_a3DDF];
int dst_a3GVF_dims[RANK_dst_a3GVF];
int dst_a3SF_dims[RANK_dst_a3SF];
int dst_a3SFSBC_dims[RANK_dst_a3SFSBC];
int dst_a3SFSBS_dims[RANK_dst_a3SFSBS];
int dst_a3SFSIC_dims[RANK_dst_a3SFSIC];
int dst_a3SFSIS_dims[RANK_dst_a3SFSIS];
int dst_a3SFWET_dims[RANK_dst_a3SFWET];
int dst_a3TBF_dims[RANK_dst_a3TBF];
int dst_c1_dims[RANK_dst_c1];
int dst_c1DDF_dims[RANK_dst_c1DDF];
int dst_c1GVF_dims[RANK_dst_c1GVF];
int dst_c1SFSBC_dims[RANK_dst_c1SFSBC];
int dst_c1SFSBS_dims[RANK_dst_c1SFSBS];
int dst_c1SFSIC_dims[RANK_dst_c1SFSIC];
int dst_c1SFSIS_dims[RANK_dst_c1SFSIS];
int dst_c1SFWET_dims[RANK_dst_c1SFWET];
int dst_c1TBF_dims[RANK_dst_c1TBF];
int dst_c3_dims[RANK_dst_c3];
int dst_c3DDF_dims[RANK_dst_c3DDF];
int dst_c3GVF_dims[RANK_dst_c3GVF];
int dst_c3SFSBC_dims[RANK_dst_c3SFSBC];
int dst_c3SFSBS_dims[RANK_dst_c3SFSBS];
int dst_c3SFSIC_dims[RANK_dst_c3SFSIC];
int dst_c3SFSIS_dims[RANK_dst_c3SFSIS];
int dst_c3SFWET_dims[RANK_dst_c3SFWET];
int dst_c3TBF_dims[RANK_dst_c3TBF];
int ncl_a1_dims[RANK_ncl_a1];
int ncl_a1DDF_dims[RANK_ncl_a1DDF];
int ncl_a1GVF_dims[RANK_ncl_a1GVF];
int ncl_a1SF_dims[RANK_ncl_a1SF];
int ncl_a1SFSBC_dims[RANK_ncl_a1SFSBC];
int ncl_a1SFSBS_dims[RANK_ncl_a1SFSBS];
int ncl_a1SFSIC_dims[RANK_ncl_a1SFSIC];
int ncl_a1SFSIS_dims[RANK_ncl_a1SFSIS];
int ncl_a1SFWET_dims[RANK_ncl_a1SFWET];
int ncl_a1TBF_dims[RANK_ncl_a1TBF];
int ncl_a1_sfcoag1_dims[RANK_ncl_a1_sfcoag1];
int ncl_a1_sfcsiz3_dims[RANK_ncl_a1_sfcsiz3];
int ncl_a1_sfcsiz4_dims[RANK_ncl_a1_sfcsiz4];
int ncl_a1_sfgaex2_dims[RANK_ncl_a1_sfgaex2];
int ncl_a2_dims[RANK_ncl_a2];
int ncl_a2DDF_dims[RANK_ncl_a2DDF];
int ncl_a2GVF_dims[RANK_ncl_a2GVF];
int ncl_a2SF_dims[RANK_ncl_a2SF];
int ncl_a2SFSBC_dims[RANK_ncl_a2SFSBC];
int ncl_a2SFSBS_dims[RANK_ncl_a2SFSBS];
int ncl_a2SFSIC_dims[RANK_ncl_a2SFSIC];
int ncl_a2SFSIS_dims[RANK_ncl_a2SFSIS];
int ncl_a2SFWET_dims[RANK_ncl_a2SFWET];
int ncl_a2TBF_dims[RANK_ncl_a2TBF];
int ncl_a2_sfcoag1_dims[RANK_ncl_a2_sfcoag1];
int ncl_a2_sfcsiz3_dims[RANK_ncl_a2_sfcsiz3];
int ncl_a2_sfcsiz4_dims[RANK_ncl_a2_sfcsiz4];
int ncl_a2_sfgaex2_dims[RANK_ncl_a2_sfgaex2];
int ncl_a3_dims[RANK_ncl_a3];
int ncl_a3DDF_dims[RANK_ncl_a3DDF];
int ncl_a3GVF_dims[RANK_ncl_a3GVF];
int ncl_a3SF_dims[RANK_ncl_a3SF];
int ncl_a3SFSBC_dims[RANK_ncl_a3SFSBC];
int ncl_a3SFSBS_dims[RANK_ncl_a3SFSBS];
int ncl_a3SFSIC_dims[RANK_ncl_a3SFSIC];
int ncl_a3SFSIS_dims[RANK_ncl_a3SFSIS];
int ncl_a3SFWET_dims[RANK_ncl_a3SFWET];
int ncl_a3TBF_dims[RANK_ncl_a3TBF];
int ncl_c1_dims[RANK_ncl_c1];
int ncl_c1DDF_dims[RANK_ncl_c1DDF];
int ncl_c1GVF_dims[RANK_ncl_c1GVF];
int ncl_c1SFSBC_dims[RANK_ncl_c1SFSBC];
int ncl_c1SFSBS_dims[RANK_ncl_c1SFSBS];
int ncl_c1SFSIC_dims[RANK_ncl_c1SFSIC];
int ncl_c1SFSIS_dims[RANK_ncl_c1SFSIS];
int ncl_c1SFWET_dims[RANK_ncl_c1SFWET];
int ncl_c1TBF_dims[RANK_ncl_c1TBF];
int ncl_c1_sfcsiz3_dims[RANK_ncl_c1_sfcsiz3];
int ncl_c1_sfcsiz4_dims[RANK_ncl_c1_sfcsiz4];
int ncl_c1_sfgaex2_dims[RANK_ncl_c1_sfgaex2];
int ncl_c2_dims[RANK_ncl_c2];
int ncl_c2DDF_dims[RANK_ncl_c2DDF];
int ncl_c2GVF_dims[RANK_ncl_c2GVF];
int ncl_c2SFSBC_dims[RANK_ncl_c2SFSBC];
int ncl_c2SFSBS_dims[RANK_ncl_c2SFSBS];
int ncl_c2SFSIC_dims[RANK_ncl_c2SFSIC];
int ncl_c2SFSIS_dims[RANK_ncl_c2SFSIS];
int ncl_c2SFWET_dims[RANK_ncl_c2SFWET];
int ncl_c2TBF_dims[RANK_ncl_c2TBF];
int ncl_c2_sfcsiz3_dims[RANK_ncl_c2_sfcsiz3];
int ncl_c2_sfcsiz4_dims[RANK_ncl_c2_sfcsiz4];
int ncl_c2_sfgaex2_dims[RANK_ncl_c2_sfgaex2];
int ncl_c3_dims[RANK_ncl_c3];
int ncl_c3DDF_dims[RANK_ncl_c3DDF];
int ncl_c3GVF_dims[RANK_ncl_c3GVF];
int ncl_c3SFSBC_dims[RANK_ncl_c3SFSBC];
int ncl_c3SFSBS_dims[RANK_ncl_c3SFSBS];
int ncl_c3SFSIC_dims[RANK_ncl_c3SFSIC];
int ncl_c3SFSIS_dims[RANK_ncl_c3SFSIS];
int ncl_c3SFWET_dims[RANK_ncl_c3SFWET];
int ncl_c3TBF_dims[RANK_ncl_c3TBF];
int num_a1_dims[RANK_num_a1];
int num_a1DDF_dims[RANK_num_a1DDF];
int num_a1GVF_dims[RANK_num_a1GVF];
int num_a1SFSBC_dims[RANK_num_a1SFSBC];
int num_a1SFSBS_dims[RANK_num_a1SFSBS];
int num_a1SFSIC_dims[RANK_num_a1SFSIC];
int num_a1SFSIS_dims[RANK_num_a1SFSIS];
int num_a1SFWET_dims[RANK_num_a1SFWET];
int num_a1TBF_dims[RANK_num_a1TBF];
int num_a1_CLXF_dims[RANK_num_a1_CLXF];
int num_a1_XFRC_dims[RANK_num_a1_XFRC];
int num_a1_sfcoag1_dims[RANK_num_a1_sfcoag1];
int num_a1_sfcsiz1_dims[RANK_num_a1_sfcsiz1];
int num_a1_sfcsiz2_dims[RANK_num_a1_sfcsiz2];
int num_a1_sfcsiz3_dims[RANK_num_a1_sfcsiz3];
int num_a1_sfcsiz4_dims[RANK_num_a1_sfcsiz4];
int num_a1_sfgaex2_dims[RANK_num_a1_sfgaex2];
int num_a2_dims[RANK_num_a2];
int num_a2DDF_dims[RANK_num_a2DDF];
int num_a2GVF_dims[RANK_num_a2GVF];
int num_a2SFSBC_dims[RANK_num_a2SFSBC];
int num_a2SFSBS_dims[RANK_num_a2SFSBS];
int num_a2SFSIC_dims[RANK_num_a2SFSIC];
int num_a2SFSIS_dims[RANK_num_a2SFSIS];
int num_a2SFWET_dims[RANK_num_a2SFWET];
int num_a2TBF_dims[RANK_num_a2TBF];
int num_a2_CLXF_dims[RANK_num_a2_CLXF];
int num_a2_XFRC_dims[RANK_num_a2_XFRC];
int num_a2_sfcoag1_dims[RANK_num_a2_sfcoag1];
int num_a2_sfcsiz1_dims[RANK_num_a2_sfcsiz1];
int num_a2_sfcsiz2_dims[RANK_num_a2_sfcsiz2];
int num_a2_sfcsiz3_dims[RANK_num_a2_sfcsiz3];
int num_a2_sfcsiz4_dims[RANK_num_a2_sfcsiz4];
int num_a2_sfgaex2_dims[RANK_num_a2_sfgaex2];
int num_a2_sfnnuc1_dims[RANK_num_a2_sfnnuc1];
int num_a3_dims[RANK_num_a3];
int num_a3DDF_dims[RANK_num_a3DDF];
int num_a3GVF_dims[RANK_num_a3GVF];
int num_a3SFSBC_dims[RANK_num_a3SFSBC];
int num_a3SFSBS_dims[RANK_num_a3SFSBS];
int num_a3SFSIC_dims[RANK_num_a3SFSIC];
int num_a3SFSIS_dims[RANK_num_a3SFSIS];
int num_a3SFWET_dims[RANK_num_a3SFWET];
int num_a3TBF_dims[RANK_num_a3TBF];
int num_a3_sfcsiz1_dims[RANK_num_a3_sfcsiz1];
int num_a3_sfcsiz2_dims[RANK_num_a3_sfcsiz2];
int num_c1_dims[RANK_num_c1];
int num_c1DDF_dims[RANK_num_c1DDF];
int num_c1GVF_dims[RANK_num_c1GVF];
int num_c1SFSBC_dims[RANK_num_c1SFSBC];
int num_c1SFSBS_dims[RANK_num_c1SFSBS];
int num_c1SFSIC_dims[RANK_num_c1SFSIC];
int num_c1SFSIS_dims[RANK_num_c1SFSIS];
int num_c1SFWET_dims[RANK_num_c1SFWET];
int num_c1TBF_dims[RANK_num_c1TBF];
int num_c1_sfcsiz1_dims[RANK_num_c1_sfcsiz1];
int num_c1_sfcsiz2_dims[RANK_num_c1_sfcsiz2];
int num_c1_sfcsiz3_dims[RANK_num_c1_sfcsiz3];
int num_c1_sfcsiz4_dims[RANK_num_c1_sfcsiz4];
int num_c1_sfgaex2_dims[RANK_num_c1_sfgaex2];
int num_c2_dims[RANK_num_c2];
int num_c2DDF_dims[RANK_num_c2DDF];
int num_c2GVF_dims[RANK_num_c2GVF];
int num_c2SFSBC_dims[RANK_num_c2SFSBC];
int num_c2SFSBS_dims[RANK_num_c2SFSBS];
int num_c2SFSIC_dims[RANK_num_c2SFSIC];
int num_c2SFSIS_dims[RANK_num_c2SFSIS];
int num_c2SFWET_dims[RANK_num_c2SFWET];
int num_c2TBF_dims[RANK_num_c2TBF];
int num_c2_sfcsiz1_dims[RANK_num_c2_sfcsiz1];
int num_c2_sfcsiz2_dims[RANK_num_c2_sfcsiz2];
int num_c2_sfcsiz3_dims[RANK_num_c2_sfcsiz3];
int num_c2_sfcsiz4_dims[RANK_num_c2_sfcsiz4];
int num_c2_sfgaex2_dims[RANK_num_c2_sfgaex2];
int num_c3_dims[RANK_num_c3];
int num_c3DDF_dims[RANK_num_c3DDF];
int num_c3GVF_dims[RANK_num_c3GVF];
int num_c3SFSBC_dims[RANK_num_c3SFSBC];
int num_c3SFSBS_dims[RANK_num_c3SFSBS];
int num_c3SFSIC_dims[RANK_num_c3SFSIC];
int num_c3SFSIS_dims[RANK_num_c3SFSIS];
int num_c3SFWET_dims[RANK_num_c3SFWET];
int num_c3TBF_dims[RANK_num_c3TBF];
int num_c3_sfcsiz1_dims[RANK_num_c3_sfcsiz1];
int num_c3_sfcsiz2_dims[RANK_num_c3_sfcsiz2];
int pom_a1_dims[RANK_pom_a1];
int pom_a1DDF_dims[RANK_pom_a1DDF];
int pom_a1GVF_dims[RANK_pom_a1GVF];
int pom_a1SFSBC_dims[RANK_pom_a1SFSBC];
int pom_a1SFSBS_dims[RANK_pom_a1SFSBS];
int pom_a1SFSIC_dims[RANK_pom_a1SFSIC];
int pom_a1SFSIS_dims[RANK_pom_a1SFSIS];
int pom_a1SFWET_dims[RANK_pom_a1SFWET];
int pom_a1TBF_dims[RANK_pom_a1TBF];
int pom_a1_CLXF_dims[RANK_pom_a1_CLXF];
int pom_a1_XFRC_dims[RANK_pom_a1_XFRC];
int pom_c1_dims[RANK_pom_c1];
int pom_c1DDF_dims[RANK_pom_c1DDF];
int pom_c1GVF_dims[RANK_pom_c1GVF];
int pom_c1SFSBC_dims[RANK_pom_c1SFSBC];
int pom_c1SFSBS_dims[RANK_pom_c1SFSBS];
int pom_c1SFSIC_dims[RANK_pom_c1SFSIC];
int pom_c1SFSIS_dims[RANK_pom_c1SFSIS];
int pom_c1SFWET_dims[RANK_pom_c1SFWET];
int pom_c1TBF_dims[RANK_pom_c1TBF];
int so4_a1_dims[RANK_so4_a1];
int so4_a1DDF_dims[RANK_so4_a1DDF];
int so4_a1GVF_dims[RANK_so4_a1GVF];
int so4_a1SFSBC_dims[RANK_so4_a1SFSBC];
int so4_a1SFSBS_dims[RANK_so4_a1SFSBS];
int so4_a1SFSIC_dims[RANK_so4_a1SFSIC];
int so4_a1SFSIS_dims[RANK_so4_a1SFSIS];
int so4_a1SFWET_dims[RANK_so4_a1SFWET];
int so4_a1TBF_dims[RANK_so4_a1TBF];
int so4_a1_CLXF_dims[RANK_so4_a1_CLXF];
int so4_a1_XFRC_dims[RANK_so4_a1_XFRC];
int so4_a1_sfcoag1_dims[RANK_so4_a1_sfcoag1];
int so4_a1_sfcsiz3_dims[RANK_so4_a1_sfcsiz3];
int so4_a1_sfcsiz4_dims[RANK_so4_a1_sfcsiz4];
int so4_a1_sfgaex1_dims[RANK_so4_a1_sfgaex1];
int so4_a1_sfgaex2_dims[RANK_so4_a1_sfgaex2];
int so4_a2_dims[RANK_so4_a2];
int so4_a2DDF_dims[RANK_so4_a2DDF];
int so4_a2GVF_dims[RANK_so4_a2GVF];
int so4_a2SFSBC_dims[RANK_so4_a2SFSBC];
int so4_a2SFSBS_dims[RANK_so4_a2SFSBS];
int so4_a2SFSIC_dims[RANK_so4_a2SFSIC];
int so4_a2SFSIS_dims[RANK_so4_a2SFSIS];
int so4_a2SFWET_dims[RANK_so4_a2SFWET];
int so4_a2TBF_dims[RANK_so4_a2TBF];
int so4_a2_CLXF_dims[RANK_so4_a2_CLXF];
int so4_a2_XFRC_dims[RANK_so4_a2_XFRC];
int so4_a2_sfcoag1_dims[RANK_so4_a2_sfcoag1];
int so4_a2_sfcsiz3_dims[RANK_so4_a2_sfcsiz3];
int so4_a2_sfcsiz4_dims[RANK_so4_a2_sfcsiz4];
int so4_a2_sfgaex1_dims[RANK_so4_a2_sfgaex1];
int so4_a2_sfgaex2_dims[RANK_so4_a2_sfgaex2];
int so4_a2_sfnnuc1_dims[RANK_so4_a2_sfnnuc1];
int so4_a3_dims[RANK_so4_a3];
int so4_a3DDF_dims[RANK_so4_a3DDF];
int so4_a3GVF_dims[RANK_so4_a3GVF];
int so4_a3SFSBC_dims[RANK_so4_a3SFSBC];
int so4_a3SFSBS_dims[RANK_so4_a3SFSBS];
int so4_a3SFSIC_dims[RANK_so4_a3SFSIC];
int so4_a3SFSIS_dims[RANK_so4_a3SFSIS];
int so4_a3SFWET_dims[RANK_so4_a3SFWET];
int so4_a3TBF_dims[RANK_so4_a3TBF];
int so4_a3_sfgaex1_dims[RANK_so4_a3_sfgaex1];
int so4_c1_dims[RANK_so4_c1];
int so4_c1AQH2SO4_dims[RANK_so4_c1AQH2SO4];
int so4_c1AQSO4_dims[RANK_so4_c1AQSO4];
int so4_c1DDF_dims[RANK_so4_c1DDF];
int so4_c1GVF_dims[RANK_so4_c1GVF];
int so4_c1SFSBC_dims[RANK_so4_c1SFSBC];
int so4_c1SFSBS_dims[RANK_so4_c1SFSBS];
int so4_c1SFSIC_dims[RANK_so4_c1SFSIC];
int so4_c1SFSIS_dims[RANK_so4_c1SFSIS];
int so4_c1SFWET_dims[RANK_so4_c1SFWET];
int so4_c1TBF_dims[RANK_so4_c1TBF];
int so4_c1_sfcsiz3_dims[RANK_so4_c1_sfcsiz3];
int so4_c1_sfcsiz4_dims[RANK_so4_c1_sfcsiz4];
int so4_c1_sfgaex2_dims[RANK_so4_c1_sfgaex2];
int so4_c2_dims[RANK_so4_c2];
int so4_c2AQH2SO4_dims[RANK_so4_c2AQH2SO4];
int so4_c2AQSO4_dims[RANK_so4_c2AQSO4];
int so4_c2DDF_dims[RANK_so4_c2DDF];
int so4_c2GVF_dims[RANK_so4_c2GVF];
int so4_c2SFSBC_dims[RANK_so4_c2SFSBC];
int so4_c2SFSBS_dims[RANK_so4_c2SFSBS];
int so4_c2SFSIC_dims[RANK_so4_c2SFSIC];
int so4_c2SFSIS_dims[RANK_so4_c2SFSIS];
int so4_c2SFWET_dims[RANK_so4_c2SFWET];
int so4_c2TBF_dims[RANK_so4_c2TBF];
int so4_c2_sfcsiz3_dims[RANK_so4_c2_sfcsiz3];
int so4_c2_sfcsiz4_dims[RANK_so4_c2_sfcsiz4];
int so4_c2_sfgaex2_dims[RANK_so4_c2_sfgaex2];
int so4_c3_dims[RANK_so4_c3];
int so4_c3AQH2SO4_dims[RANK_so4_c3AQH2SO4];
int so4_c3AQSO4_dims[RANK_so4_c3AQSO4];
int so4_c3DDF_dims[RANK_so4_c3DDF];
int so4_c3GVF_dims[RANK_so4_c3GVF];
int so4_c3SFSBC_dims[RANK_so4_c3SFSBC];
int so4_c3SFSBS_dims[RANK_so4_c3SFSBS];
int so4_c3SFSIC_dims[RANK_so4_c3SFSIC];
int so4_c3SFSIS_dims[RANK_so4_c3SFSIS];
int so4_c3SFWET_dims[RANK_so4_c3SFWET];
int so4_c3TBF_dims[RANK_so4_c3TBF];
int soa_a1_dims[RANK_soa_a1];
int soa_a1DDF_dims[RANK_soa_a1DDF];
int soa_a1GVF_dims[RANK_soa_a1GVF];
int soa_a1SFSBC_dims[RANK_soa_a1SFSBC];
int soa_a1SFSBS_dims[RANK_soa_a1SFSBS];
int soa_a1SFSIC_dims[RANK_soa_a1SFSIC];
int soa_a1SFSIS_dims[RANK_soa_a1SFSIS];
int soa_a1SFWET_dims[RANK_soa_a1SFWET];
int soa_a1TBF_dims[RANK_soa_a1TBF];
int soa_a1_sfcoag1_dims[RANK_soa_a1_sfcoag1];
int soa_a1_sfcsiz3_dims[RANK_soa_a1_sfcsiz3];
int soa_a1_sfcsiz4_dims[RANK_soa_a1_sfcsiz4];
int soa_a1_sfgaex1_dims[RANK_soa_a1_sfgaex1];
int soa_a1_sfgaex2_dims[RANK_soa_a1_sfgaex2];
int soa_a2_dims[RANK_soa_a2];
int soa_a2DDF_dims[RANK_soa_a2DDF];
int soa_a2GVF_dims[RANK_soa_a2GVF];
int soa_a2SFSBC_dims[RANK_soa_a2SFSBC];
int soa_a2SFSBS_dims[RANK_soa_a2SFSBS];
int soa_a2SFSIC_dims[RANK_soa_a2SFSIC];
int soa_a2SFSIS_dims[RANK_soa_a2SFSIS];
int soa_a2SFWET_dims[RANK_soa_a2SFWET];
int soa_a2TBF_dims[RANK_soa_a2TBF];
int soa_a2_sfcoag1_dims[RANK_soa_a2_sfcoag1];
int soa_a2_sfcsiz3_dims[RANK_soa_a2_sfcsiz3];
int soa_a2_sfcsiz4_dims[RANK_soa_a2_sfcsiz4];
int soa_a2_sfgaex1_dims[RANK_soa_a2_sfgaex1];
int soa_a2_sfgaex2_dims[RANK_soa_a2_sfgaex2];
int soa_c1_dims[RANK_soa_c1];
int soa_c1DDF_dims[RANK_soa_c1DDF];
int soa_c1GVF_dims[RANK_soa_c1GVF];
int soa_c1SFSBC_dims[RANK_soa_c1SFSBC];
int soa_c1SFSBS_dims[RANK_soa_c1SFSBS];
int soa_c1SFSIC_dims[RANK_soa_c1SFSIC];
int soa_c1SFSIS_dims[RANK_soa_c1SFSIS];
int soa_c1SFWET_dims[RANK_soa_c1SFWET];
int soa_c1TBF_dims[RANK_soa_c1TBF];
int soa_c1_sfcsiz3_dims[RANK_soa_c1_sfcsiz3];
int soa_c1_sfcsiz4_dims[RANK_soa_c1_sfcsiz4];
int soa_c1_sfgaex2_dims[RANK_soa_c1_sfgaex2];
int soa_c2_dims[RANK_soa_c2];
int soa_c2DDF_dims[RANK_soa_c2DDF];
int soa_c2GVF_dims[RANK_soa_c2GVF];
int soa_c2SFSBC_dims[RANK_soa_c2SFSBC];
int soa_c2SFSBS_dims[RANK_soa_c2SFSBS];
int soa_c2SFSIC_dims[RANK_soa_c2SFSIC];
int soa_c2SFSIS_dims[RANK_soa_c2SFSIS];
int soa_c2SFWET_dims[RANK_soa_c2SFWET];
int soa_c2TBF_dims[RANK_soa_c2TBF];
int soa_c2_sfcsiz3_dims[RANK_soa_c2_sfcsiz3];
int soa_c2_sfcsiz4_dims[RANK_soa_c2_sfcsiz4];
int soa_c2_sfgaex2_dims[RANK_soa_c2_sfgaex2];
int wat_a1_dims[RANK_wat_a1];
int wat_a2_dims[RANK_wat_a2];
int wat_a3_dims[RANK_wat_a3];
int memused;
printf("\n*** Testing CAM output file in netCDF-4.\n");
printf("*** creating file...");
get_mem_used2(&memused);
printf("data memory %d MB\n", memused);
if (nc_set_chunk_cache(0, 1009, .75)) ERR;
/* enter define mode */
if (nc_create(FILE_NAME, NC_NETCDF4, &ncid)) ERR;
/* define dimensions */
if (nc_def_dim(ncid, "lat", lat_len, &lat_dim)) ERR;
if (nc_def_dim(ncid, "lon", lon_len, &lon_dim)) ERR;
if (nc_def_dim(ncid, "slat", slat_len, &slat_dim)) ERR;
if (nc_def_dim(ncid, "slon", slon_len, &slon_dim)) ERR;
if (nc_def_dim(ncid, "lev", lev_len, &lev_dim)) ERR;
if (nc_def_dim(ncid, "ilev", ilev_len, &ilev_dim)) ERR;
if (nc_def_dim(ncid, "isccp_prs", isccp_prs_len, &isccp_prs_dim)) ERR;
if (nc_def_dim(ncid, "isccp_tau", isccp_tau_len, &isccp_tau_dim)) ERR;
if (nc_def_dim(ncid, "isccp_prstau", isccp_prstau_len, &isccp_prstau_dim)) ERR;
if (nc_def_dim(ncid, "time", time_len, &time_dim)) ERR;
if (nc_def_dim(ncid, "tbnd", tbnd_len, &tbnd_dim)) ERR;
if (nc_def_dim(ncid, "chars", chars_len, &chars_dim)) ERR;
/* define variables */
if (nc_def_var(ncid, "P0", NC_DOUBLE, RANK_P0, 0, &P0_id)) ERR;
lat_dims[0] = lat_dim;
if (nc_def_var(ncid, "lat", NC_DOUBLE, RANK_lat, lat_dims, &lat_id)) ERR;
lon_dims[0] = lon_dim;
if (nc_def_var(ncid, "lon", NC_DOUBLE, RANK_lon, lon_dims, &lon_id)) ERR;
slat_dims[0] = slat_dim;
if (nc_def_var(ncid, "slat", NC_DOUBLE, RANK_slat, slat_dims, &slat_id)) ERR;
slon_dims[0] = slon_dim;
if (nc_def_var(ncid, "slon", NC_DOUBLE, RANK_slon, slon_dims, &slon_id)) ERR;
w_stag_dims[0] = slat_dim;
if (nc_def_var(ncid, "w_stag", NC_DOUBLE, RANK_w_stag, w_stag_dims, &w_stag_id)) ERR;
lev_dims[0] = lev_dim;
if (nc_def_var(ncid, "lev", NC_DOUBLE, RANK_lev, lev_dims, &lev_id)) ERR;
ilev_dims[0] = ilev_dim;
if (nc_def_var(ncid, "ilev", NC_DOUBLE, RANK_ilev, ilev_dims, &ilev_id)) ERR;
isccp_prs_dims[0] = isccp_prs_dim;
if (nc_def_var(ncid, "isccp_prs", NC_DOUBLE, RANK_isccp_prs, isccp_prs_dims, &isccp_prs_id)) ERR;
isccp_tau_dims[0] = isccp_tau_dim;
if (nc_def_var(ncid, "isccp_tau", NC_DOUBLE, RANK_isccp_tau, isccp_tau_dims, &isccp_tau_id)) ERR;
isccp_prstau_dims[0] = isccp_prstau_dim;
if (nc_def_var(ncid, "isccp_prstau", NC_DOUBLE, RANK_isccp_prstau, isccp_prstau_dims, &isccp_prstau_id)) ERR;
time_dims[0] = time_dim;
if (nc_def_var(ncid, "time", NC_DOUBLE, RANK_time, time_dims, &time_id)) ERR;
time_bnds_dims[0] = time_dim;
time_bnds_dims[1] = tbnd_dim;
if (nc_def_var(ncid, "time_bnds", NC_DOUBLE, RANK_time_bnds, time_bnds_dims, &time_bnds_id)) ERR;
date_written_dims[0] = time_dim;
date_written_dims[1] = chars_dim;
if (nc_def_var(ncid, "date_written", NC_CHAR, RANK_date_written, date_written_dims, &date_written_id)) ERR;
time_written_dims[0] = time_dim;
time_written_dims[1] = chars_dim;
if (nc_def_var(ncid, "time_written", NC_CHAR, RANK_time_written, time_written_dims, &time_written_id)) ERR;
if (nc_def_var(ncid, "ntrm", NC_INT, RANK_ntrm, 0, &ntrm_id)) ERR;
if (nc_def_var(ncid, "ntrn", NC_INT, RANK_ntrn, 0, &ntrn_id)) ERR;
if (nc_def_var(ncid, "ntrk", NC_INT, RANK_ntrk, 0, &ntrk_id)) ERR;
if (nc_def_var(ncid, "ndbase", NC_INT, RANK_ndbase, 0, &ndbase_id)) ERR;
if (nc_def_var(ncid, "nsbase", NC_INT, RANK_nsbase, 0, &nsbase_id)) ERR;
if (nc_def_var(ncid, "nbdate", NC_INT, RANK_nbdate, 0, &nbdate_id)) ERR;
if (nc_def_var(ncid, "nbsec", NC_INT, RANK_nbsec, 0, &nbsec_id)) ERR;
if (nc_def_var(ncid, "mdt", NC_INT, RANK_mdt, 0, &mdt_id)) ERR;
nlon_dims[0] = lat_dim;
if (nc_def_var(ncid, "nlon", NC_INT, RANK_nlon, nlon_dims, &nlon_id)) ERR;
wnummax_dims[0] = lat_dim;
if (nc_def_var(ncid, "wnummax", NC_INT, RANK_wnummax, wnummax_dims, &wnummax_id)) ERR;
hyai_dims[0] = ilev_dim;
if (nc_def_var(ncid, "hyai", NC_DOUBLE, RANK_hyai, hyai_dims, &hyai_id)) ERR;
hybi_dims[0] = ilev_dim;
if (nc_def_var(ncid, "hybi", NC_DOUBLE, RANK_hybi, hybi_dims, &hybi_id)) ERR;
hyam_dims[0] = lev_dim;
if (nc_def_var(ncid, "hyam", NC_DOUBLE, RANK_hyam, hyam_dims, &hyam_id)) ERR;
hybm_dims[0] = lev_dim;
if (nc_def_var(ncid, "hybm", NC_DOUBLE, RANK_hybm, hybm_dims, &hybm_id)) ERR;
gw_dims[0] = lat_dim;
if (nc_def_var(ncid, "gw", NC_DOUBLE, RANK_gw, gw_dims, &gw_id)) ERR;
ndcur_dims[0] = time_dim;
if (nc_def_var(ncid, "ndcur", NC_INT, RANK_ndcur, ndcur_dims, &ndcur_id)) ERR;
nscur_dims[0] = time_dim;
if (nc_def_var(ncid, "nscur", NC_INT, RANK_nscur, nscur_dims, &nscur_id)) ERR;
date_dims[0] = time_dim;
if (nc_def_var(ncid, "date", NC_INT, RANK_date, date_dims, &date_id)) ERR;
co2vmr_dims[0] = time_dim;
if (nc_def_var(ncid, "co2vmr", NC_DOUBLE, RANK_co2vmr, co2vmr_dims, &co2vmr_id)) ERR;
ch4vmr_dims[0] = time_dim;
if (nc_def_var(ncid, "ch4vmr", NC_DOUBLE, RANK_ch4vmr, ch4vmr_dims, &ch4vmr_id)) ERR;
n2ovmr_dims[0] = time_dim;
if (nc_def_var(ncid, "n2ovmr", NC_DOUBLE, RANK_n2ovmr, n2ovmr_dims, &n2ovmr_id)) ERR;
f11vmr_dims[0] = time_dim;
if (nc_def_var(ncid, "f11vmr", NC_DOUBLE, RANK_f11vmr, f11vmr_dims, &f11vmr_id)) ERR;
f12vmr_dims[0] = time_dim;
if (nc_def_var(ncid, "f12vmr", NC_DOUBLE, RANK_f12vmr, f12vmr_dims, &f12vmr_id)) ERR;
sol_tsi_dims[0] = time_dim;
if (nc_def_var(ncid, "sol_tsi", NC_DOUBLE, RANK_sol_tsi, sol_tsi_dims, &sol_tsi_id)) ERR;
datesec_dims[0] = time_dim;
if (nc_def_var(ncid, "datesec", NC_INT, RANK_datesec, datesec_dims, &datesec_id)) ERR;
nsteph_dims[0] = time_dim;
if (nc_def_var(ncid, "nsteph", NC_INT, RANK_nsteph, nsteph_dims, &nsteph_id)) ERR;
ABSORB_dims[0] = time_dim;
ABSORB_dims[1] = lev_dim;
ABSORB_dims[2] = lat_dim;
ABSORB_dims[3] = lon_dim;
if (nc_def_var(ncid, "ABSORB", NC_DOUBLE, RANK_ABSORB, ABSORB_dims, &ABSORB_id)) ERR;
AEROD_v_dims[0] = time_dim;
AEROD_v_dims[1] = lat_dim;
AEROD_v_dims[2] = lon_dim;
if (nc_def_var(ncid, "AEROD_v", NC_DOUBLE, RANK_AEROD_v, AEROD_v_dims, &AEROD_v_id)) ERR;
AODABS_dims[0] = time_dim;
AODABS_dims[1] = lat_dim;
AODABS_dims[2] = lon_dim;
if (nc_def_var(ncid, "AODABS", NC_DOUBLE, RANK_AODABS, AODABS_dims, &AODABS_id)) ERR;
AODDUST1_dims[0] = time_dim;
AODDUST1_dims[1] = lat_dim;
AODDUST1_dims[2] = lon_dim;
if (nc_def_var(ncid, "AODDUST1", NC_DOUBLE, RANK_AODDUST1, AODDUST1_dims, &AODDUST1_id)) ERR;
AODDUST2_dims[0] = time_dim;
AODDUST2_dims[1] = lat_dim;
AODDUST2_dims[2] = lon_dim;
if (nc_def_var(ncid, "AODDUST2", NC_DOUBLE, RANK_AODDUST2, AODDUST2_dims, &AODDUST2_id)) ERR;
AODDUST3_dims[0] = time_dim;
AODDUST3_dims[1] = lat_dim;
AODDUST3_dims[2] = lon_dim;
if (nc_def_var(ncid, "AODDUST3", NC_DOUBLE, RANK_AODDUST3, AODDUST3_dims, &AODDUST3_id)) ERR;
AODMODE1_dims[0] = time_dim;
AODMODE1_dims[1] = lat_dim;
AODMODE1_dims[2] = lon_dim;
if (nc_def_var(ncid, "AODMODE1", NC_DOUBLE, RANK_AODMODE1, AODMODE1_dims, &AODMODE1_id)) ERR;
AODMODE2_dims[0] = time_dim;
AODMODE2_dims[1] = lat_dim;
AODMODE2_dims[2] = lon_dim;
if (nc_def_var(ncid, "AODMODE2", NC_DOUBLE, RANK_AODMODE2, AODMODE2_dims, &AODMODE2_id)) ERR;
AODMODE3_dims[0] = time_dim;
AODMODE3_dims[1] = lat_dim;
AODMODE3_dims[2] = lon_dim;
if (nc_def_var(ncid, "AODMODE3", NC_DOUBLE, RANK_AODMODE3, AODMODE3_dims, &AODMODE3_id)) ERR;
AODVIS_dims[0] = time_dim;
AODVIS_dims[1] = lat_dim;
AODVIS_dims[2] = lon_dim;
if (nc_def_var(ncid, "AODVIS", NC_DOUBLE, RANK_AODVIS, AODVIS_dims, &AODVIS_id)) ERR;
AQSO4_H2O2_dims[0] = time_dim;
AQSO4_H2O2_dims[1] = lat_dim;
AQSO4_H2O2_dims[2] = lon_dim;
if (nc_def_var(ncid, "AQSO4_H2O2", NC_DOUBLE, RANK_AQSO4_H2O2, AQSO4_H2O2_dims, &AQSO4_H2O2_id)) ERR;
AQSO4_O3_dims[0] = time_dim;
AQSO4_O3_dims[1] = lat_dim;
AQSO4_O3_dims[2] = lon_dim;
if (nc_def_var(ncid, "AQSO4_O3", NC_DOUBLE, RANK_AQSO4_O3, AQSO4_O3_dims, &AQSO4_O3_id)) ERR;
AQ_DMS_dims[0] = time_dim;
AQ_DMS_dims[1] = lat_dim;
AQ_DMS_dims[2] = lon_dim;
if (nc_def_var(ncid, "AQ_DMS", NC_DOUBLE, RANK_AQ_DMS, AQ_DMS_dims, &AQ_DMS_id)) ERR;
AQ_H2O2_dims[0] = time_dim;
AQ_H2O2_dims[1] = lat_dim;
AQ_H2O2_dims[2] = lon_dim;
if (nc_def_var(ncid, "AQ_H2O2", NC_DOUBLE, RANK_AQ_H2O2, AQ_H2O2_dims, &AQ_H2O2_id)) ERR;
AQ_H2SO4_dims[0] = time_dim;
AQ_H2SO4_dims[1] = lat_dim;
AQ_H2SO4_dims[2] = lon_dim;
if (nc_def_var(ncid, "AQ_H2SO4", NC_DOUBLE, RANK_AQ_H2SO4, AQ_H2SO4_dims, &AQ_H2SO4_id)) ERR;
AQ_SO2_dims[0] = time_dim;
AQ_SO2_dims[1] = lat_dim;
AQ_SO2_dims[2] = lon_dim;
if (nc_def_var(ncid, "AQ_SO2", NC_DOUBLE, RANK_AQ_SO2, AQ_SO2_dims, &AQ_SO2_id)) ERR;
AQ_SOAG_dims[0] = time_dim;
AQ_SOAG_dims[1] = lat_dim;
AQ_SOAG_dims[2] = lon_dim;
if (nc_def_var(ncid, "AQ_SOAG", NC_DOUBLE, RANK_AQ_SOAG, AQ_SOAG_dims, &AQ_SOAG_id)) ERR;
AQ_bc_a1_dims[0] = time_dim;
AQ_bc_a1_dims[1] = lat_dim;
AQ_bc_a1_dims[2] = lon_dim;
if (nc_def_var(ncid, "AQ_bc_a1", NC_DOUBLE, RANK_AQ_bc_a1, AQ_bc_a1_dims, &AQ_bc_a1_id)) ERR;
AQ_dst_a1_dims[0] = time_dim;
AQ_dst_a1_dims[1] = lat_dim;
AQ_dst_a1_dims[2] = lon_dim;
if (nc_def_var(ncid, "AQ_dst_a1", NC_DOUBLE, RANK_AQ_dst_a1, AQ_dst_a1_dims, &AQ_dst_a1_id)) ERR;
AQ_dst_a3_dims[0] = time_dim;
AQ_dst_a3_dims[1] = lat_dim;
AQ_dst_a3_dims[2] = lon_dim;
if (nc_def_var(ncid, "AQ_dst_a3", NC_DOUBLE, RANK_AQ_dst_a3, AQ_dst_a3_dims, &AQ_dst_a3_id)) ERR;
AQ_ncl_a1_dims[0] = time_dim;
AQ_ncl_a1_dims[1] = lat_dim;
AQ_ncl_a1_dims[2] = lon_dim;
if (nc_def_var(ncid, "AQ_ncl_a1", NC_DOUBLE, RANK_AQ_ncl_a1, AQ_ncl_a1_dims, &AQ_ncl_a1_id)) ERR;
AQ_ncl_a2_dims[0] = time_dim;
AQ_ncl_a2_dims[1] = lat_dim;
AQ_ncl_a2_dims[2] = lon_dim;
if (nc_def_var(ncid, "AQ_ncl_a2", NC_DOUBLE, RANK_AQ_ncl_a2, AQ_ncl_a2_dims, &AQ_ncl_a2_id)) ERR;
AQ_ncl_a3_dims[0] = time_dim;
AQ_ncl_a3_dims[1] = lat_dim;
AQ_ncl_a3_dims[2] = lon_dim;
if (nc_def_var(ncid, "AQ_ncl_a3", NC_DOUBLE, RANK_AQ_ncl_a3, AQ_ncl_a3_dims, &AQ_ncl_a3_id)) ERR;
AQ_num_a1_dims[0] = time_dim;
AQ_num_a1_dims[1] = lat_dim;
AQ_num_a1_dims[2] = lon_dim;
if (nc_def_var(ncid, "AQ_num_a1", NC_DOUBLE, RANK_AQ_num_a1, AQ_num_a1_dims, &AQ_num_a1_id)) ERR;
AQ_num_a2_dims[0] = time_dim;
AQ_num_a2_dims[1] = lat_dim;
AQ_num_a2_dims[2] = lon_dim;
if (nc_def_var(ncid, "AQ_num_a2", NC_DOUBLE, RANK_AQ_num_a2, AQ_num_a2_dims, &AQ_num_a2_id)) ERR;
AQ_num_a3_dims[0] = time_dim;
AQ_num_a3_dims[1] = lat_dim;
AQ_num_a3_dims[2] = lon_dim;
if (nc_def_var(ncid, "AQ_num_a3", NC_DOUBLE, RANK_AQ_num_a3, AQ_num_a3_dims, &AQ_num_a3_id)) ERR;
AQ_pom_a1_dims[0] = time_dim;
AQ_pom_a1_dims[1] = lat_dim;
AQ_pom_a1_dims[2] = lon_dim;
if (nc_def_var(ncid, "AQ_pom_a1", NC_DOUBLE, RANK_AQ_pom_a1, AQ_pom_a1_dims, &AQ_pom_a1_id)) ERR;
AQ_so4_a1_dims[0] = time_dim;
AQ_so4_a1_dims[1] = lat_dim;
AQ_so4_a1_dims[2] = lon_dim;
if (nc_def_var(ncid, "AQ_so4_a1", NC_DOUBLE, RANK_AQ_so4_a1, AQ_so4_a1_dims, &AQ_so4_a1_id)) ERR;
AQ_so4_a2_dims[0] = time_dim;
AQ_so4_a2_dims[1] = lat_dim;
AQ_so4_a2_dims[2] = lon_dim;
if (nc_def_var(ncid, "AQ_so4_a2", NC_DOUBLE, RANK_AQ_so4_a2, AQ_so4_a2_dims, &AQ_so4_a2_id)) ERR;
AQ_so4_a3_dims[0] = time_dim;
AQ_so4_a3_dims[1] = lat_dim;
AQ_so4_a3_dims[2] = lon_dim;
if (nc_def_var(ncid, "AQ_so4_a3", NC_DOUBLE, RANK_AQ_so4_a3, AQ_so4_a3_dims, &AQ_so4_a3_id)) ERR;
AQ_soa_a1_dims[0] = time_dim;
AQ_soa_a1_dims[1] = lat_dim;
AQ_soa_a1_dims[2] = lon_dim;
if (nc_def_var(ncid, "AQ_soa_a1", NC_DOUBLE, RANK_AQ_soa_a1, AQ_soa_a1_dims, &AQ_soa_a1_id)) ERR;
AQ_soa_a2_dims[0] = time_dim;
AQ_soa_a2_dims[1] = lat_dim;
AQ_soa_a2_dims[2] = lon_dim;
if (nc_def_var(ncid, "AQ_soa_a2", NC_DOUBLE, RANK_AQ_soa_a2, AQ_soa_a2_dims, &AQ_soa_a2_id)) ERR;
BPROD_dims[0] = time_dim;
BPROD_dims[1] = ilev_dim;
BPROD_dims[2] = lat_dim;
BPROD_dims[3] = lon_dim;
if (nc_def_var(ncid, "BPROD", NC_DOUBLE, RANK_BPROD, BPROD_dims, &BPROD_id)) ERR;
BURDEN1_dims[0] = time_dim;
BURDEN1_dims[1] = lat_dim;
BURDEN1_dims[2] = lon_dim;
if (nc_def_var(ncid, "BURDEN1", NC_DOUBLE, RANK_BURDEN1, BURDEN1_dims, &BURDEN1_id)) ERR;
BURDEN2_dims[0] = time_dim;
BURDEN2_dims[1] = lat_dim;
BURDEN2_dims[2] = lon_dim;
if (nc_def_var(ncid, "BURDEN2", NC_DOUBLE, RANK_BURDEN2, BURDEN2_dims, &BURDEN2_id)) ERR;
BURDEN3_dims[0] = time_dim;
BURDEN3_dims[1] = lat_dim;
BURDEN3_dims[2] = lon_dim;
if (nc_def_var(ncid, "BURDEN3", NC_DOUBLE, RANK_BURDEN3, BURDEN3_dims, &BURDEN3_id)) ERR;
CCN1_dims[0] = time_dim;
CCN1_dims[1] = lev_dim;
CCN1_dims[2] = lat_dim;
CCN1_dims[3] = lon_dim;
if (nc_def_var(ncid, "CCN1", NC_DOUBLE, RANK_CCN1, CCN1_dims, &CCN1_id)) ERR;
CCN2_dims[0] = time_dim;
CCN2_dims[1] = lev_dim;
CCN2_dims[2] = lat_dim;
CCN2_dims[3] = lon_dim;
if (nc_def_var(ncid, "CCN2", NC_DOUBLE, RANK_CCN2, CCN2_dims, &CCN2_id)) ERR;
CCN3_dims[0] = time_dim;
CCN3_dims[1] = lev_dim;
CCN3_dims[2] = lat_dim;
CCN3_dims[3] = lon_dim;
if (nc_def_var(ncid, "CCN3", NC_DOUBLE, RANK_CCN3, CCN3_dims, &CCN3_id)) ERR;
CCN4_dims[0] = time_dim;
CCN4_dims[1] = lev_dim;
CCN4_dims[2] = lat_dim;
CCN4_dims[3] = lon_dim;
if (nc_def_var(ncid, "CCN4", NC_DOUBLE, RANK_CCN4, CCN4_dims, &CCN4_id)) ERR;
CCN5_dims[0] = time_dim;
CCN5_dims[1] = lev_dim;
CCN5_dims[2] = lat_dim;
CCN5_dims[3] = lon_dim;
if (nc_def_var(ncid, "CCN5", NC_DOUBLE, RANK_CCN5, CCN5_dims, &CCN5_id)) ERR;
CCN6_dims[0] = time_dim;
CCN6_dims[1] = lev_dim;
CCN6_dims[2] = lat_dim;
CCN6_dims[3] = lon_dim;
if (nc_def_var(ncid, "CCN6", NC_DOUBLE, RANK_CCN6, CCN6_dims, &CCN6_id)) ERR;
CLDHGH_dims[0] = time_dim;
CLDHGH_dims[1] = lat_dim;
CLDHGH_dims[2] = lon_dim;
if (nc_def_var(ncid, "CLDHGH", NC_DOUBLE, RANK_CLDHGH, CLDHGH_dims, &CLDHGH_id)) ERR;
CLDICE_dims[0] = time_dim;
CLDICE_dims[1] = lev_dim;
CLDICE_dims[2] = lat_dim;
CLDICE_dims[3] = lon_dim;
if (nc_def_var(ncid, "CLDICE", NC_DOUBLE, RANK_CLDICE, CLDICE_dims, &CLDICE_id)) ERR;
CLDLIQ_dims[0] = time_dim;
CLDLIQ_dims[1] = lev_dim;
CLDLIQ_dims[2] = lat_dim;
CLDLIQ_dims[3] = lon_dim;
if (nc_def_var(ncid, "CLDLIQ", NC_DOUBLE, RANK_CLDLIQ, CLDLIQ_dims, &CLDLIQ_id)) ERR;
CLDLOW_dims[0] = time_dim;
CLDLOW_dims[1] = lat_dim;
CLDLOW_dims[2] = lon_dim;
if (nc_def_var(ncid, "CLDLOW", NC_DOUBLE, RANK_CLDLOW, CLDLOW_dims, &CLDLOW_id)) ERR;
CLDMED_dims[0] = time_dim;
CLDMED_dims[1] = lat_dim;
CLDMED_dims[2] = lon_dim;
if (nc_def_var(ncid, "CLDMED", NC_DOUBLE, RANK_CLDMED, CLDMED_dims, &CLDMED_id)) ERR;
CLDTOT_dims[0] = time_dim;
CLDTOT_dims[1] = lat_dim;
CLDTOT_dims[2] = lon_dim;
if (nc_def_var(ncid, "CLDTOT", NC_DOUBLE, RANK_CLDTOT, CLDTOT_dims, &CLDTOT_id)) ERR;
CLOUD_dims[0] = time_dim;
CLOUD_dims[1] = lev_dim;
CLOUD_dims[2] = lat_dim;
CLOUD_dims[3] = lon_dim;
if (nc_def_var(ncid, "CLOUD", NC_DOUBLE, RANK_CLOUD, CLOUD_dims, &CLOUD_id)) ERR;
CMFDQ_dims[0] = time_dim;
CMFDQ_dims[1] = lev_dim;
CMFDQ_dims[2] = lat_dim;
CMFDQ_dims[3] = lon_dim;
if (nc_def_var(ncid, "CMFDQ", NC_DOUBLE, RANK_CMFDQ, CMFDQ_dims, &CMFDQ_id)) ERR;
CMFDQR_dims[0] = time_dim;
CMFDQR_dims[1] = lev_dim;
CMFDQR_dims[2] = lat_dim;
CMFDQR_dims[3] = lon_dim;
if (nc_def_var(ncid, "CMFDQR", NC_DOUBLE, RANK_CMFDQR, CMFDQR_dims, &CMFDQR_id)) ERR;
CMFDT_dims[0] = time_dim;
CMFDT_dims[1] = lev_dim;
CMFDT_dims[2] = lat_dim;
CMFDT_dims[3] = lon_dim;
if (nc_def_var(ncid, "CMFDT", NC_DOUBLE, RANK_CMFDT, CMFDT_dims, &CMFDT_id)) ERR;
CMFMC_dims[0] = time_dim;
CMFMC_dims[1] = ilev_dim;
CMFMC_dims[2] = lat_dim;
CMFMC_dims[3] = lon_dim;
if (nc_def_var(ncid, "CMFMC", NC_DOUBLE, RANK_CMFMC, CMFMC_dims, &CMFMC_id)) ERR;
CMFMCDZM_dims[0] = time_dim;
CMFMCDZM_dims[1] = ilev_dim;
CMFMCDZM_dims[2] = lat_dim;
CMFMCDZM_dims[3] = lon_dim;
if (nc_def_var(ncid, "CMFMCDZM", NC_DOUBLE, RANK_CMFMCDZM, CMFMCDZM_dims, &CMFMCDZM_id)) ERR;
CONCLD_dims[0] = time_dim;
CONCLD_dims[1] = lev_dim;
CONCLD_dims[2] = lat_dim;
CONCLD_dims[3] = lon_dim;
if (nc_def_var(ncid, "CONCLD", NC_DOUBLE, RANK_CONCLD, CONCLD_dims, &CONCLD_id)) ERR;
DCQ_dims[0] = time_dim;
DCQ_dims[1] = lev_dim;
DCQ_dims[2] = lat_dim;
DCQ_dims[3] = lon_dim;
if (nc_def_var(ncid, "DCQ", NC_DOUBLE, RANK_DCQ, DCQ_dims, &DCQ_id)) ERR;
DMS_dims[0] = time_dim;
DMS_dims[1] = lev_dim;
DMS_dims[2] = lat_dim;
DMS_dims[3] = lon_dim;
if (nc_def_var(ncid, "DMS", NC_DOUBLE, RANK_DMS, DMS_dims, &DMS_id)) ERR;
DSTODXC_dims[0] = time_dim;
DSTODXC_dims[1] = lat_dim;
DSTODXC_dims[2] = lon_dim;
if (nc_def_var(ncid, "DSTODXC", NC_DOUBLE, RANK_DSTODXC, DSTODXC_dims, &DSTODXC_id)) ERR;
DSTSFDRY_dims[0] = time_dim;
DSTSFDRY_dims[1] = lat_dim;
DSTSFDRY_dims[2] = lon_dim;
if (nc_def_var(ncid, "DSTSFDRY", NC_DOUBLE, RANK_DSTSFDRY, DSTSFDRY_dims, &DSTSFDRY_id)) ERR;
DSTSFMBL_dims[0] = time_dim;
DSTSFMBL_dims[1] = lat_dim;
DSTSFMBL_dims[2] = lon_dim;
if (nc_def_var(ncid, "DSTSFMBL", NC_DOUBLE, RANK_DSTSFMBL, DSTSFMBL_dims, &DSTSFMBL_id)) ERR;
DSTSFWET_dims[0] = time_dim;
DSTSFWET_dims[1] = lat_dim;
DSTSFWET_dims[2] = lon_dim;
if (nc_def_var(ncid, "DSTSFWET", NC_DOUBLE, RANK_DSTSFWET, DSTSFWET_dims, &DSTSFWET_id)) ERR;
DTCOND_dims[0] = time_dim;
DTCOND_dims[1] = lev_dim;
DTCOND_dims[2] = lat_dim;
DTCOND_dims[3] = lon_dim;
if (nc_def_var(ncid, "DTCOND", NC_DOUBLE, RANK_DTCOND, DTCOND_dims, &DTCOND_id)) ERR;
DTV_dims[0] = time_dim;
DTV_dims[1] = lev_dim;
DTV_dims[2] = lat_dim;
DTV_dims[3] = lon_dim;
if (nc_def_var(ncid, "DTV", NC_DOUBLE, RANK_DTV, DTV_dims, &DTV_id)) ERR;
EXTINCT_dims[0] = time_dim;
EXTINCT_dims[1] = lev_dim;
EXTINCT_dims[2] = lat_dim;
EXTINCT_dims[3] = lon_dim;
if (nc_def_var(ncid, "EXTINCT", NC_DOUBLE, RANK_EXTINCT, EXTINCT_dims, &EXTINCT_id)) ERR;
FICE_dims[0] = time_dim;
FICE_dims[1] = lev_dim;
FICE_dims[2] = lat_dim;
FICE_dims[3] = lon_dim;
if (nc_def_var(ncid, "FICE", NC_DOUBLE, RANK_FICE, FICE_dims, &FICE_id)) ERR;
FLDS_dims[0] = time_dim;
FLDS_dims[1] = lat_dim;
FLDS_dims[2] = lon_dim;
if (nc_def_var(ncid, "FLDS", NC_DOUBLE, RANK_FLDS, FLDS_dims, &FLDS_id)) ERR;
FLNS_dims[0] = time_dim;
FLNS_dims[1] = lat_dim;
FLNS_dims[2] = lon_dim;
if (nc_def_var(ncid, "FLNS", NC_DOUBLE, RANK_FLNS, FLNS_dims, &FLNS_id)) ERR;
FLNSC_dims[0] = time_dim;
FLNSC_dims[1] = lat_dim;
FLNSC_dims[2] = lon_dim;
if (nc_def_var(ncid, "FLNSC", NC_DOUBLE, RANK_FLNSC, FLNSC_dims, &FLNSC_id)) ERR;
FLNT_dims[0] = time_dim;
FLNT_dims[1] = lat_dim;
FLNT_dims[2] = lon_dim;
if (nc_def_var(ncid, "FLNT", NC_DOUBLE, RANK_FLNT, FLNT_dims, &FLNT_id)) ERR;
FLNTC_dims[0] = time_dim;
FLNTC_dims[1] = lat_dim;
FLNTC_dims[2] = lon_dim;
if (nc_def_var(ncid, "FLNTC", NC_DOUBLE, RANK_FLNTC, FLNTC_dims, &FLNTC_id)) ERR;
FLUT_dims[0] = time_dim;
FLUT_dims[1] = lat_dim;
FLUT_dims[2] = lon_dim;
if (nc_def_var(ncid, "FLUT", NC_DOUBLE, RANK_FLUT, FLUT_dims, &FLUT_id)) ERR;
FLUTC_dims[0] = time_dim;
FLUTC_dims[1] = lat_dim;
FLUTC_dims[2] = lon_dim;
if (nc_def_var(ncid, "FLUTC", NC_DOUBLE, RANK_FLUTC, FLUTC_dims, &FLUTC_id)) ERR;
FREQSH_dims[0] = time_dim;
FREQSH_dims[1] = lat_dim;
FREQSH_dims[2] = lon_dim;
if (nc_def_var(ncid, "FREQSH", NC_DOUBLE, RANK_FREQSH, FREQSH_dims, &FREQSH_id)) ERR;
FREQZM_dims[0] = time_dim;
FREQZM_dims[1] = lat_dim;
FREQZM_dims[2] = lon_dim;
if (nc_def_var(ncid, "FREQZM", NC_DOUBLE, RANK_FREQZM, FREQZM_dims, &FREQZM_id)) ERR;
FSDS_dims[0] = time_dim;
FSDS_dims[1] = lat_dim;
FSDS_dims[2] = lon_dim;
if (nc_def_var(ncid, "FSDS", NC_DOUBLE, RANK_FSDS, FSDS_dims, &FSDS_id)) ERR;
FSDSC_dims[0] = time_dim;
FSDSC_dims[1] = lat_dim;
FSDSC_dims[2] = lon_dim;
if (nc_def_var(ncid, "FSDSC", NC_DOUBLE, RANK_FSDSC, FSDSC_dims, &FSDSC_id)) ERR;
FSNS_dims[0] = time_dim;
FSNS_dims[1] = lat_dim;
FSNS_dims[2] = lon_dim;
if (nc_def_var(ncid, "FSNS", NC_DOUBLE, RANK_FSNS, FSNS_dims, &FSNS_id)) ERR;
FSNSC_dims[0] = time_dim;
FSNSC_dims[1] = lat_dim;
FSNSC_dims[2] = lon_dim;
if (nc_def_var(ncid, "FSNSC", NC_DOUBLE, RANK_FSNSC, FSNSC_dims, &FSNSC_id)) ERR;
FSNT_dims[0] = time_dim;
FSNT_dims[1] = lat_dim;
FSNT_dims[2] = lon_dim;
if (nc_def_var(ncid, "FSNT", NC_DOUBLE, RANK_FSNT, FSNT_dims, &FSNT_id)) ERR;
FSNTC_dims[0] = time_dim;
FSNTC_dims[1] = lat_dim;
FSNTC_dims[2] = lon_dim;
if (nc_def_var(ncid, "FSNTC", NC_DOUBLE, RANK_FSNTC, FSNTC_dims, &FSNTC_id)) ERR;
FSNTOA_dims[0] = time_dim;
FSNTOA_dims[1] = lat_dim;
FSNTOA_dims[2] = lon_dim;
if (nc_def_var(ncid, "FSNTOA", NC_DOUBLE, RANK_FSNTOA, FSNTOA_dims, &FSNTOA_id)) ERR;
FSNTOAC_dims[0] = time_dim;
FSNTOAC_dims[1] = lat_dim;
FSNTOAC_dims[2] = lon_dim;
if (nc_def_var(ncid, "FSNTOAC", NC_DOUBLE, RANK_FSNTOAC, FSNTOAC_dims, &FSNTOAC_id)) ERR;
FSUTOA_dims[0] = time_dim;
FSUTOA_dims[1] = lat_dim;
FSUTOA_dims[2] = lon_dim;
if (nc_def_var(ncid, "FSUTOA", NC_DOUBLE, RANK_FSUTOA, FSUTOA_dims, &FSUTOA_id)) ERR;
GS_DMS_dims[0] = time_dim;
GS_DMS_dims[1] = lat_dim;
GS_DMS_dims[2] = lon_dim;
if (nc_def_var(ncid, "GS_DMS", NC_DOUBLE, RANK_GS_DMS, GS_DMS_dims, &GS_DMS_id)) ERR;
GS_H2O2_dims[0] = time_dim;
GS_H2O2_dims[1] = lat_dim;
GS_H2O2_dims[2] = lon_dim;
if (nc_def_var(ncid, "GS_H2O2", NC_DOUBLE, RANK_GS_H2O2, GS_H2O2_dims, &GS_H2O2_id)) ERR;
GS_H2SO4_dims[0] = time_dim;
GS_H2SO4_dims[1] = lat_dim;
GS_H2SO4_dims[2] = lon_dim;
if (nc_def_var(ncid, "GS_H2SO4", NC_DOUBLE, RANK_GS_H2SO4, GS_H2SO4_dims, &GS_H2SO4_id)) ERR;
GS_SO2_dims[0] = time_dim;
GS_SO2_dims[1] = lat_dim;
GS_SO2_dims[2] = lon_dim;
if (nc_def_var(ncid, "GS_SO2", NC_DOUBLE, RANK_GS_SO2, GS_SO2_dims, &GS_SO2_id)) ERR;
GS_SOAG_dims[0] = time_dim;
GS_SOAG_dims[1] = lat_dim;
GS_SOAG_dims[2] = lon_dim;
if (nc_def_var(ncid, "GS_SOAG", NC_DOUBLE, RANK_GS_SOAG, GS_SOAG_dims, &GS_SOAG_id)) ERR;
GS_bc_a1_dims[0] = time_dim;
GS_bc_a1_dims[1] = lat_dim;
GS_bc_a1_dims[2] = lon_dim;
if (nc_def_var(ncid, "GS_bc_a1", NC_DOUBLE, RANK_GS_bc_a1, GS_bc_a1_dims, &GS_bc_a1_id)) ERR;
GS_dst_a1_dims[0] = time_dim;
GS_dst_a1_dims[1] = lat_dim;
GS_dst_a1_dims[2] = lon_dim;
if (nc_def_var(ncid, "GS_dst_a1", NC_DOUBLE, RANK_GS_dst_a1, GS_dst_a1_dims, &GS_dst_a1_id)) ERR;
GS_dst_a3_dims[0] = time_dim;
GS_dst_a3_dims[1] = lat_dim;
GS_dst_a3_dims[2] = lon_dim;
if (nc_def_var(ncid, "GS_dst_a3", NC_DOUBLE, RANK_GS_dst_a3, GS_dst_a3_dims, &GS_dst_a3_id)) ERR;
GS_ncl_a1_dims[0] = time_dim;
GS_ncl_a1_dims[1] = lat_dim;
GS_ncl_a1_dims[2] = lon_dim;
if (nc_def_var(ncid, "GS_ncl_a1", NC_DOUBLE, RANK_GS_ncl_a1, GS_ncl_a1_dims, &GS_ncl_a1_id)) ERR;
GS_ncl_a2_dims[0] = time_dim;
GS_ncl_a2_dims[1] = lat_dim;
GS_ncl_a2_dims[2] = lon_dim;
if (nc_def_var(ncid, "GS_ncl_a2", NC_DOUBLE, RANK_GS_ncl_a2, GS_ncl_a2_dims, &GS_ncl_a2_id)) ERR;
GS_ncl_a3_dims[0] = time_dim;
GS_ncl_a3_dims[1] = lat_dim;
GS_ncl_a3_dims[2] = lon_dim;
if (nc_def_var(ncid, "GS_ncl_a3", NC_DOUBLE, RANK_GS_ncl_a3, GS_ncl_a3_dims, &GS_ncl_a3_id)) ERR;
GS_num_a1_dims[0] = time_dim;
GS_num_a1_dims[1] = lat_dim;
GS_num_a1_dims[2] = lon_dim;
if (nc_def_var(ncid, "GS_num_a1", NC_DOUBLE, RANK_GS_num_a1, GS_num_a1_dims, &GS_num_a1_id)) ERR;
GS_num_a2_dims[0] = time_dim;
GS_num_a2_dims[1] = lat_dim;
GS_num_a2_dims[2] = lon_dim;
if (nc_def_var(ncid, "GS_num_a2", NC_DOUBLE, RANK_GS_num_a2, GS_num_a2_dims, &GS_num_a2_id)) ERR;
GS_num_a3_dims[0] = time_dim;
GS_num_a3_dims[1] = lat_dim;
GS_num_a3_dims[2] = lon_dim;
if (nc_def_var(ncid, "GS_num_a3", NC_DOUBLE, RANK_GS_num_a3, GS_num_a3_dims, &GS_num_a3_id)) ERR;
GS_pom_a1_dims[0] = time_dim;
GS_pom_a1_dims[1] = lat_dim;
GS_pom_a1_dims[2] = lon_dim;
if (nc_def_var(ncid, "GS_pom_a1", NC_DOUBLE, RANK_GS_pom_a1, GS_pom_a1_dims, &GS_pom_a1_id)) ERR;
GS_so4_a1_dims[0] = time_dim;
GS_so4_a1_dims[1] = lat_dim;
GS_so4_a1_dims[2] = lon_dim;
if (nc_def_var(ncid, "GS_so4_a1", NC_DOUBLE, RANK_GS_so4_a1, GS_so4_a1_dims, &GS_so4_a1_id)) ERR;
GS_so4_a2_dims[0] = time_dim;
GS_so4_a2_dims[1] = lat_dim;
GS_so4_a2_dims[2] = lon_dim;
if (nc_def_var(ncid, "GS_so4_a2", NC_DOUBLE, RANK_GS_so4_a2, GS_so4_a2_dims, &GS_so4_a2_id)) ERR;
GS_so4_a3_dims[0] = time_dim;
GS_so4_a3_dims[1] = lat_dim;
GS_so4_a3_dims[2] = lon_dim;
if (nc_def_var(ncid, "GS_so4_a3", NC_DOUBLE, RANK_GS_so4_a3, GS_so4_a3_dims, &GS_so4_a3_id)) ERR;
GS_soa_a1_dims[0] = time_dim;
GS_soa_a1_dims[1] = lat_dim;
GS_soa_a1_dims[2] = lon_dim;
if (nc_def_var(ncid, "GS_soa_a1", NC_DOUBLE, RANK_GS_soa_a1, GS_soa_a1_dims, &GS_soa_a1_id)) ERR;
GS_soa_a2_dims[0] = time_dim;
GS_soa_a2_dims[1] = lat_dim;
GS_soa_a2_dims[2] = lon_dim;
if (nc_def_var(ncid, "GS_soa_a2", NC_DOUBLE, RANK_GS_soa_a2, GS_soa_a2_dims, &GS_soa_a2_id)) ERR;
H2O2_dims[0] = time_dim;
H2O2_dims[1] = lev_dim;
H2O2_dims[2] = lat_dim;
H2O2_dims[3] = lon_dim;
if (nc_def_var(ncid, "H2O2", NC_DOUBLE, RANK_H2O2, H2O2_dims, &H2O2_id)) ERR;
H2SO4_dims[0] = time_dim;
H2SO4_dims[1] = lev_dim;
H2SO4_dims[2] = lat_dim;
H2SO4_dims[3] = lon_dim;
if (nc_def_var(ncid, "H2SO4", NC_DOUBLE, RANK_H2SO4, H2SO4_dims, &H2SO4_id)) ERR;
H2SO4_sfgaex1_dims[0] = time_dim;
H2SO4_sfgaex1_dims[1] = lat_dim;
H2SO4_sfgaex1_dims[2] = lon_dim;
if (nc_def_var(ncid, "H2SO4_sfgaex1", NC_DOUBLE, RANK_H2SO4_sfgaex1, H2SO4_sfgaex1_dims, &H2SO4_sfgaex1_id)) ERR;
H2SO4_sfnnuc1_dims[0] = time_dim;
H2SO4_sfnnuc1_dims[1] = lat_dim;
H2SO4_sfnnuc1_dims[2] = lon_dim;
if (nc_def_var(ncid, "H2SO4_sfnnuc1", NC_DOUBLE, RANK_H2SO4_sfnnuc1, H2SO4_sfnnuc1_dims, &H2SO4_sfnnuc1_id)) ERR;
ICEFRAC_dims[0] = time_dim;
ICEFRAC_dims[1] = lat_dim;
ICEFRAC_dims[2] = lon_dim;
if (nc_def_var(ncid, "ICEFRAC", NC_DOUBLE, RANK_ICEFRAC, ICEFRAC_dims, &ICEFRAC_id)) ERR;
ICIMR_dims[0] = time_dim;
ICIMR_dims[1] = lev_dim;
ICIMR_dims[2] = lat_dim;
ICIMR_dims[3] = lon_dim;
if (nc_def_var(ncid, "ICIMR", NC_DOUBLE, RANK_ICIMR, ICIMR_dims, &ICIMR_id)) ERR;
ICWMR_dims[0] = time_dim;
ICWMR_dims[1] = lev_dim;
ICWMR_dims[2] = lat_dim;
ICWMR_dims[3] = lon_dim;
if (nc_def_var(ncid, "ICWMR", NC_DOUBLE, RANK_ICWMR, ICWMR_dims, &ICWMR_id)) ERR;
KVH_dims[0] = time_dim;
KVH_dims[1] = ilev_dim;
KVH_dims[2] = lat_dim;
KVH_dims[3] = lon_dim;
if (nc_def_var(ncid, "KVH", NC_DOUBLE, RANK_KVH, KVH_dims, &KVH_id)) ERR;
KVM_dims[0] = time_dim;
KVM_dims[1] = ilev_dim;
KVM_dims[2] = lat_dim;
KVM_dims[3] = lon_dim;
if (nc_def_var(ncid, "KVM", NC_DOUBLE, RANK_KVM, KVM_dims, &KVM_id)) ERR;
LANDFRAC_dims[0] = time_dim;
LANDFRAC_dims[1] = lat_dim;
LANDFRAC_dims[2] = lon_dim;
if (nc_def_var(ncid, "LANDFRAC", NC_DOUBLE, RANK_LANDFRAC, LANDFRAC_dims, &LANDFRAC_id)) ERR;
LCLOUD_dims[0] = time_dim;
LCLOUD_dims[1] = lev_dim;
LCLOUD_dims[2] = lat_dim;
LCLOUD_dims[3] = lon_dim;
if (nc_def_var(ncid, "LCLOUD", NC_DOUBLE, RANK_LCLOUD, LCLOUD_dims, &LCLOUD_id)) ERR;
LHFLX_dims[0] = time_dim;
LHFLX_dims[1] = lat_dim;
LHFLX_dims[2] = lon_dim;
if (nc_def_var(ncid, "LHFLX", NC_DOUBLE, RANK_LHFLX, LHFLX_dims, &LHFLX_id)) ERR;
LND_MBL_dims[0] = time_dim;
LND_MBL_dims[1] = lat_dim;
LND_MBL_dims[2] = lon_dim;
if (nc_def_var(ncid, "LND_MBL", NC_DOUBLE, RANK_LND_MBL, LND_MBL_dims, &LND_MBL_id)) ERR;
LWCF_dims[0] = time_dim;
LWCF_dims[1] = lat_dim;
LWCF_dims[2] = lon_dim;
if (nc_def_var(ncid, "LWCF", NC_DOUBLE, RANK_LWCF, LWCF_dims, &LWCF_id)) ERR;
NDROPCOL_dims[0] = time_dim;
NDROPCOL_dims[1] = lat_dim;
NDROPCOL_dims[2] = lon_dim;
if (nc_def_var(ncid, "NDROPCOL", NC_DOUBLE, RANK_NDROPCOL, NDROPCOL_dims, &NDROPCOL_id)) ERR;
NDROPMIX_dims[0] = time_dim;
NDROPMIX_dims[1] = lev_dim;
NDROPMIX_dims[2] = lat_dim;
NDROPMIX_dims[3] = lon_dim;
if (nc_def_var(ncid, "NDROPMIX", NC_DOUBLE, RANK_NDROPMIX, NDROPMIX_dims, &NDROPMIX_id)) ERR;
NDROPSNK_dims[0] = time_dim;
NDROPSNK_dims[1] = lev_dim;
NDROPSNK_dims[2] = lat_dim;
NDROPSNK_dims[3] = lon_dim;
if (nc_def_var(ncid, "NDROPSNK", NC_DOUBLE, RANK_NDROPSNK, NDROPSNK_dims, &NDROPSNK_id)) ERR;
NDROPSRC_dims[0] = time_dim;
NDROPSRC_dims[1] = lev_dim;
NDROPSRC_dims[2] = lat_dim;
NDROPSRC_dims[3] = lon_dim;
if (nc_def_var(ncid, "NDROPSRC", NC_DOUBLE, RANK_NDROPSRC, NDROPSRC_dims, &NDROPSRC_id)) ERR;
NUMICE_dims[0] = time_dim;
NUMICE_dims[1] = lev_dim;
NUMICE_dims[2] = lat_dim;
NUMICE_dims[3] = lon_dim;
if (nc_def_var(ncid, "NUMICE", NC_DOUBLE, RANK_NUMICE, NUMICE_dims, &NUMICE_id)) ERR;
NUMLIQ_dims[0] = time_dim;
NUMLIQ_dims[1] = lev_dim;
NUMLIQ_dims[2] = lat_dim;
NUMLIQ_dims[3] = lon_dim;
if (nc_def_var(ncid, "NUMLIQ", NC_DOUBLE, RANK_NUMLIQ, NUMLIQ_dims, &NUMLIQ_id)) ERR;
OCNFRAC_dims[0] = time_dim;
OCNFRAC_dims[1] = lat_dim;
OCNFRAC_dims[2] = lon_dim;
if (nc_def_var(ncid, "OCNFRAC", NC_DOUBLE, RANK_OCNFRAC, OCNFRAC_dims, &OCNFRAC_id)) ERR;
ODV_bc_a1_dims[0] = time_dim;
ODV_bc_a1_dims[1] = lat_dim;
ODV_bc_a1_dims[2] = lon_dim;
if (nc_def_var(ncid, "ODV_bc_a1", NC_DOUBLE, RANK_ODV_bc_a1, ODV_bc_a1_dims, &ODV_bc_a1_id)) ERR;
ODV_dst_a1_dims[0] = time_dim;
ODV_dst_a1_dims[1] = lat_dim;
ODV_dst_a1_dims[2] = lon_dim;
if (nc_def_var(ncid, "ODV_dst_a1", NC_DOUBLE, RANK_ODV_dst_a1, ODV_dst_a1_dims, &ODV_dst_a1_id)) ERR;
ODV_dst_a3_dims[0] = time_dim;
ODV_dst_a3_dims[1] = lat_dim;
ODV_dst_a3_dims[2] = lon_dim;
if (nc_def_var(ncid, "ODV_dst_a3", NC_DOUBLE, RANK_ODV_dst_a3, ODV_dst_a3_dims, &ODV_dst_a3_id)) ERR;
ODV_ncl_a1_dims[0] = time_dim;
ODV_ncl_a1_dims[1] = lat_dim;
ODV_ncl_a1_dims[2] = lon_dim;
if (nc_def_var(ncid, "ODV_ncl_a1", NC_DOUBLE, RANK_ODV_ncl_a1, ODV_ncl_a1_dims, &ODV_ncl_a1_id)) ERR;
ODV_ncl_a3_dims[0] = time_dim;
ODV_ncl_a3_dims[1] = lat_dim;
ODV_ncl_a3_dims[2] = lon_dim;
if (nc_def_var(ncid, "ODV_ncl_a3", NC_DOUBLE, RANK_ODV_ncl_a3, ODV_ncl_a3_dims, &ODV_ncl_a3_id)) ERR;
ODV_pom_a1_dims[0] = time_dim;
ODV_pom_a1_dims[1] = lat_dim;
ODV_pom_a1_dims[2] = lon_dim;
if (nc_def_var(ncid, "ODV_pom_a1", NC_DOUBLE, RANK_ODV_pom_a1, ODV_pom_a1_dims, &ODV_pom_a1_id)) ERR;
ODV_so4_a1_dims[0] = time_dim;
ODV_so4_a1_dims[1] = lat_dim;
ODV_so4_a1_dims[2] = lon_dim;
if (nc_def_var(ncid, "ODV_so4_a1", NC_DOUBLE, RANK_ODV_so4_a1, ODV_so4_a1_dims, &ODV_so4_a1_id)) ERR;
ODV_soa_a1_dims[0] = time_dim;
ODV_soa_a1_dims[1] = lat_dim;
ODV_soa_a1_dims[2] = lon_dim;
if (nc_def_var(ncid, "ODV_soa_a1", NC_DOUBLE, RANK_ODV_soa_a1, ODV_soa_a1_dims, &ODV_soa_a1_id)) ERR;
OMEGA_dims[0] = time_dim;
OMEGA_dims[1] = lev_dim;
OMEGA_dims[2] = lat_dim;
OMEGA_dims[3] = lon_dim;
if (nc_def_var(ncid, "OMEGA", NC_DOUBLE, RANK_OMEGA, OMEGA_dims, &OMEGA_id)) ERR;
OMEGAT_dims[0] = time_dim;
OMEGAT_dims[1] = lev_dim;
OMEGAT_dims[2] = lat_dim;
OMEGAT_dims[3] = lon_dim;
if (nc_def_var(ncid, "OMEGAT", NC_DOUBLE, RANK_OMEGAT, OMEGAT_dims, &OMEGAT_id)) ERR;
ORO_dims[0] = time_dim;
ORO_dims[1] = lat_dim;
ORO_dims[2] = lon_dim;
if (nc_def_var(ncid, "ORO", NC_DOUBLE, RANK_ORO, ORO_dims, &ORO_id)) ERR;
PBLH_dims[0] = time_dim;
PBLH_dims[1] = lat_dim;
PBLH_dims[2] = lon_dim;
if (nc_def_var(ncid, "PBLH", NC_DOUBLE, RANK_PBLH, PBLH_dims, &PBLH_id)) ERR;
PCONVB_dims[0] = time_dim;
PCONVB_dims[1] = lat_dim;
PCONVB_dims[2] = lon_dim;
if (nc_def_var(ncid, "PCONVB", NC_DOUBLE, RANK_PCONVB, PCONVB_dims, &PCONVB_id)) ERR;
PCONVT_dims[0] = time_dim;
PCONVT_dims[1] = lat_dim;
PCONVT_dims[2] = lon_dim;
if (nc_def_var(ncid, "PCONVT", NC_DOUBLE, RANK_PCONVT, PCONVT_dims, &PCONVT_id)) ERR;
PHIS_dims[0] = time_dim;
PHIS_dims[1] = lat_dim;
PHIS_dims[2] = lon_dim;
if (nc_def_var(ncid, "PHIS", NC_DOUBLE, RANK_PHIS, PHIS_dims, &PHIS_id)) ERR;
PRECC_dims[0] = time_dim;
PRECC_dims[1] = lat_dim;
PRECC_dims[2] = lon_dim;
if (nc_def_var(ncid, "PRECC", NC_DOUBLE, RANK_PRECC, PRECC_dims, &PRECC_id)) ERR;
PRECCDZM_dims[0] = time_dim;
PRECCDZM_dims[1] = lat_dim;
PRECCDZM_dims[2] = lon_dim;
if (nc_def_var(ncid, "PRECCDZM", NC_DOUBLE, RANK_PRECCDZM, PRECCDZM_dims, &PRECCDZM_id)) ERR;
PRECL_dims[0] = time_dim;
PRECL_dims[1] = lat_dim;
PRECL_dims[2] = lon_dim;
if (nc_def_var(ncid, "PRECL", NC_DOUBLE, RANK_PRECL, PRECL_dims, &PRECL_id)) ERR;
PRECSC_dims[0] = time_dim;
PRECSC_dims[1] = lat_dim;
PRECSC_dims[2] = lon_dim;
if (nc_def_var(ncid, "PRECSC", NC_DOUBLE, RANK_PRECSC, PRECSC_dims, &PRECSC_id)) ERR;
PRECSH_dims[0] = time_dim;
PRECSH_dims[1] = lat_dim;
PRECSH_dims[2] = lon_dim;
if (nc_def_var(ncid, "PRECSH", NC_DOUBLE, RANK_PRECSH, PRECSH_dims, &PRECSH_id)) ERR;
PRECSL_dims[0] = time_dim;
PRECSL_dims[1] = lat_dim;
PRECSL_dims[2] = lon_dim;
if (nc_def_var(ncid, "PRECSL", NC_DOUBLE, RANK_PRECSL, PRECSL_dims, &PRECSL_id)) ERR;
PRECT_dims[0] = time_dim;
PRECT_dims[1] = lat_dim;
PRECT_dims[2] = lon_dim;
if (nc_def_var(ncid, "PRECT", NC_DOUBLE, RANK_PRECT, PRECT_dims, &PRECT_id)) ERR;
PS_dims[0] = time_dim;
PS_dims[1] = lat_dim;
PS_dims[2] = lon_dim;
if (nc_def_var(ncid, "PS", NC_DOUBLE, RANK_PS, PS_dims, &PS_id)) ERR;
PSL_dims[0] = time_dim;
PSL_dims[1] = lat_dim;
PSL_dims[2] = lon_dim;
if (nc_def_var(ncid, "PSL", NC_DOUBLE, RANK_PSL, PSL_dims, &PSL_id)) ERR;
Q_dims[0] = time_dim;
Q_dims[1] = lev_dim;
Q_dims[2] = lat_dim;
Q_dims[3] = lon_dim;
if (nc_def_var(ncid, "Q", NC_DOUBLE, RANK_Q, Q_dims, &Q_id)) ERR;
QC_dims[0] = time_dim;
QC_dims[1] = lev_dim;
QC_dims[2] = lat_dim;
QC_dims[3] = lon_dim;
if (nc_def_var(ncid, "QC", NC_DOUBLE, RANK_QC, QC_dims, &QC_id)) ERR;
QFLX_dims[0] = time_dim;
QFLX_dims[1] = lat_dim;
QFLX_dims[2] = lon_dim;
if (nc_def_var(ncid, "QFLX", NC_DOUBLE, RANK_QFLX, QFLX_dims, &QFLX_id)) ERR;
QREFHT_dims[0] = time_dim;
QREFHT_dims[1] = lat_dim;
QREFHT_dims[2] = lon_dim;
if (nc_def_var(ncid, "QREFHT", NC_DOUBLE, RANK_QREFHT, QREFHT_dims, &QREFHT_id)) ERR;
QRL_dims[0] = time_dim;
QRL_dims[1] = lev_dim;
QRL_dims[2] = lat_dim;
QRL_dims[3] = lon_dim;
if (nc_def_var(ncid, "QRL", NC_DOUBLE, RANK_QRL, QRL_dims, &QRL_id)) ERR;
QRS_dims[0] = time_dim;
QRS_dims[1] = lev_dim;
QRS_dims[2] = lat_dim;
QRS_dims[3] = lon_dim;
if (nc_def_var(ncid, "QRS", NC_DOUBLE, RANK_QRS, QRS_dims, &QRS_id)) ERR;
QT_dims[0] = time_dim;
QT_dims[1] = lev_dim;
QT_dims[2] = lat_dim;
QT_dims[3] = lon_dim;
if (nc_def_var(ncid, "QT", NC_DOUBLE, RANK_QT, QT_dims, &QT_id)) ERR;
QTFLX_dims[0] = time_dim;
QTFLX_dims[1] = ilev_dim;
QTFLX_dims[2] = lat_dim;
QTFLX_dims[3] = lon_dim;
if (nc_def_var(ncid, "QTFLX", NC_DOUBLE, RANK_QTFLX, QTFLX_dims, &QTFLX_id)) ERR;
RAM1_dims[0] = time_dim;
RAM1_dims[1] = lat_dim;
RAM1_dims[2] = lon_dim;
if (nc_def_var(ncid, "RAM1", NC_DOUBLE, RANK_RAM1, RAM1_dims, &RAM1_id)) ERR;
RELHUM_dims[0] = time_dim;
RELHUM_dims[1] = lev_dim;
RELHUM_dims[2] = lat_dim;
RELHUM_dims[3] = lon_dim;
if (nc_def_var(ncid, "RELHUM", NC_DOUBLE, RANK_RELHUM, RELHUM_dims, &RELHUM_id)) ERR;
RHREFHT_dims[0] = time_dim;
RHREFHT_dims[1] = lat_dim;
RHREFHT_dims[2] = lon_dim;
if (nc_def_var(ncid, "RHREFHT", NC_DOUBLE, RANK_RHREFHT, RHREFHT_dims, &RHREFHT_id)) ERR;
SFCLDICE_dims[0] = time_dim;
SFCLDICE_dims[1] = lat_dim;
SFCLDICE_dims[2] = lon_dim;
if (nc_def_var(ncid, "SFCLDICE", NC_DOUBLE, RANK_SFCLDICE, SFCLDICE_dims, &SFCLDICE_id)) ERR;
SFCLDLIQ_dims[0] = time_dim;
SFCLDLIQ_dims[1] = lat_dim;
SFCLDLIQ_dims[2] = lon_dim;
if (nc_def_var(ncid, "SFCLDLIQ", NC_DOUBLE, RANK_SFCLDLIQ, SFCLDLIQ_dims, &SFCLDLIQ_id)) ERR;
SFI_dims[0] = time_dim;
SFI_dims[1] = ilev_dim;
SFI_dims[2] = lat_dim;
SFI_dims[3] = lon_dim;
if (nc_def_var(ncid, "SFI", NC_DOUBLE, RANK_SFI, SFI_dims, &SFI_id)) ERR;
SFNUMICE_dims[0] = time_dim;
SFNUMICE_dims[1] = lat_dim;
SFNUMICE_dims[2] = lon_dim;
if (nc_def_var(ncid, "SFNUMICE", NC_DOUBLE, RANK_SFNUMICE, SFNUMICE_dims, &SFNUMICE_id)) ERR;
SFNUMLIQ_dims[0] = time_dim;
SFNUMLIQ_dims[1] = lat_dim;
SFNUMLIQ_dims[2] = lon_dim;
if (nc_def_var(ncid, "SFNUMLIQ", NC_DOUBLE, RANK_SFNUMLIQ, SFNUMLIQ_dims, &SFNUMLIQ_id)) ERR;
SHFLX_dims[0] = time_dim;
SHFLX_dims[1] = lat_dim;
SHFLX_dims[2] = lon_dim;
if (nc_def_var(ncid, "SHFLX", NC_DOUBLE, RANK_SHFLX, SHFLX_dims, &SHFLX_id)) ERR;
SL_dims[0] = time_dim;
SL_dims[1] = lev_dim;
SL_dims[2] = lat_dim;
SL_dims[3] = lon_dim;
if (nc_def_var(ncid, "SL", NC_DOUBLE, RANK_SL, SL_dims, &SL_id)) ERR;
SLFLX_dims[0] = time_dim;
SLFLX_dims[1] = ilev_dim;
SLFLX_dims[2] = lat_dim;
SLFLX_dims[3] = lon_dim;
if (nc_def_var(ncid, "SLFLX", NC_DOUBLE, RANK_SLFLX, SLFLX_dims, &SLFLX_id)) ERR;
SLV_dims[0] = time_dim;
SLV_dims[1] = lev_dim;
SLV_dims[2] = lat_dim;
SLV_dims[3] = lon_dim;
if (nc_def_var(ncid, "SLV", NC_DOUBLE, RANK_SLV, SLV_dims, &SLV_id)) ERR;
SNOWHICE_dims[0] = time_dim;
SNOWHICE_dims[1] = lat_dim;
SNOWHICE_dims[2] = lon_dim;
if (nc_def_var(ncid, "SNOWHICE", NC_DOUBLE, RANK_SNOWHICE, SNOWHICE_dims, &SNOWHICE_id)) ERR;
SNOWHLND_dims[0] = time_dim;
SNOWHLND_dims[1] = lat_dim;
SNOWHLND_dims[2] = lon_dim;
if (nc_def_var(ncid, "SNOWHLND", NC_DOUBLE, RANK_SNOWHLND, SNOWHLND_dims, &SNOWHLND_id)) ERR;
SO2_dims[0] = time_dim;
SO2_dims[1] = lev_dim;
SO2_dims[2] = lat_dim;
SO2_dims[3] = lon_dim;
if (nc_def_var(ncid, "SO2", NC_DOUBLE, RANK_SO2, SO2_dims, &SO2_id)) ERR;
SO2_CLXF_dims[0] = time_dim;
SO2_CLXF_dims[1] = lat_dim;
SO2_CLXF_dims[2] = lon_dim;
if (nc_def_var(ncid, "SO2_CLXF", NC_DOUBLE, RANK_SO2_CLXF, SO2_CLXF_dims, &SO2_CLXF_id)) ERR;
SO2_XFRC_dims[0] = time_dim;
SO2_XFRC_dims[1] = lev_dim;
SO2_XFRC_dims[2] = lat_dim;
SO2_XFRC_dims[3] = lon_dim;
if (nc_def_var(ncid, "SO2_XFRC", NC_DOUBLE, RANK_SO2_XFRC, SO2_XFRC_dims, &SO2_XFRC_id)) ERR;
SOAG_dims[0] = time_dim;
SOAG_dims[1] = lev_dim;
SOAG_dims[2] = lat_dim;
SOAG_dims[3] = lon_dim;
if (nc_def_var(ncid, "SOAG", NC_DOUBLE, RANK_SOAG, SOAG_dims, &SOAG_id)) ERR;
SOAG_sfgaex1_dims[0] = time_dim;
SOAG_sfgaex1_dims[1] = lat_dim;
SOAG_sfgaex1_dims[2] = lon_dim;
if (nc_def_var(ncid, "SOAG_sfgaex1", NC_DOUBLE, RANK_SOAG_sfgaex1, SOAG_sfgaex1_dims, &SOAG_sfgaex1_id)) ERR;
SOLIN_dims[0] = time_dim;
SOLIN_dims[1] = lat_dim;
SOLIN_dims[2] = lon_dim;
if (nc_def_var(ncid, "SOLIN", NC_DOUBLE, RANK_SOLIN, SOLIN_dims, &SOLIN_id)) ERR;
SPROD_dims[0] = time_dim;
SPROD_dims[1] = ilev_dim;
SPROD_dims[2] = lat_dim;
SPROD_dims[3] = lon_dim;
if (nc_def_var(ncid, "SPROD", NC_DOUBLE, RANK_SPROD, SPROD_dims, &SPROD_id)) ERR;
SRFRAD_dims[0] = time_dim;
SRFRAD_dims[1] = lat_dim;
SRFRAD_dims[2] = lon_dim;
if (nc_def_var(ncid, "SRFRAD", NC_DOUBLE, RANK_SRFRAD, SRFRAD_dims, &SRFRAD_id)) ERR;
SSAVIS_dims[0] = time_dim;
SSAVIS_dims[1] = lat_dim;
SSAVIS_dims[2] = lon_dim;
if (nc_def_var(ncid, "SSAVIS", NC_DOUBLE, RANK_SSAVIS, SSAVIS_dims, &SSAVIS_id)) ERR;
SSTODXC_dims[0] = time_dim;
SSTODXC_dims[1] = lat_dim;
SSTODXC_dims[2] = lon_dim;
if (nc_def_var(ncid, "SSTODXC", NC_DOUBLE, RANK_SSTODXC, SSTODXC_dims, &SSTODXC_id)) ERR;
SSTSFDRY_dims[0] = time_dim;
SSTSFDRY_dims[1] = lat_dim;
SSTSFDRY_dims[2] = lon_dim;
if (nc_def_var(ncid, "SSTSFDRY", NC_DOUBLE, RANK_SSTSFDRY, SSTSFDRY_dims, &SSTSFDRY_id)) ERR;
SSTSFMBL_dims[0] = time_dim;
SSTSFMBL_dims[1] = lat_dim;
SSTSFMBL_dims[2] = lon_dim;
if (nc_def_var(ncid, "SSTSFMBL", NC_DOUBLE, RANK_SSTSFMBL, SSTSFMBL_dims, &SSTSFMBL_id)) ERR;
SSTSFWET_dims[0] = time_dim;
SSTSFWET_dims[1] = lat_dim;
SSTSFWET_dims[2] = lon_dim;
if (nc_def_var(ncid, "SSTSFWET", NC_DOUBLE, RANK_SSTSFWET, SSTSFWET_dims, &SSTSFWET_id)) ERR;
SWCF_dims[0] = time_dim;
SWCF_dims[1] = lat_dim;
SWCF_dims[2] = lon_dim;
if (nc_def_var(ncid, "SWCF", NC_DOUBLE, RANK_SWCF, SWCF_dims, &SWCF_id)) ERR;
T_dims[0] = time_dim;
T_dims[1] = lev_dim;
T_dims[2] = lat_dim;
T_dims[3] = lon_dim;
if (nc_def_var(ncid, "T", NC_DOUBLE, RANK_T, T_dims, &T_id)) ERR;
TAUTMSX_dims[0] = time_dim;
TAUTMSX_dims[1] = lat_dim;
TAUTMSX_dims[2] = lon_dim;
if (nc_def_var(ncid, "TAUTMSX", NC_DOUBLE, RANK_TAUTMSX, TAUTMSX_dims, &TAUTMSX_id)) ERR;
TAUTMSY_dims[0] = time_dim;
TAUTMSY_dims[1] = lat_dim;
TAUTMSY_dims[2] = lon_dim;
if (nc_def_var(ncid, "TAUTMSY", NC_DOUBLE, RANK_TAUTMSY, TAUTMSY_dims, &TAUTMSY_id)) ERR;
TAUX_dims[0] = time_dim;
TAUX_dims[1] = lat_dim;
TAUX_dims[2] = lon_dim;
if (nc_def_var(ncid, "TAUX", NC_DOUBLE, RANK_TAUX, TAUX_dims, &TAUX_id)) ERR;
TAUY_dims[0] = time_dim;
TAUY_dims[1] = lat_dim;
TAUY_dims[2] = lon_dim;
if (nc_def_var(ncid, "TAUY", NC_DOUBLE, RANK_TAUY, TAUY_dims, &TAUY_id)) ERR;
TGCLDCWP_dims[0] = time_dim;
TGCLDCWP_dims[1] = lat_dim;
TGCLDCWP_dims[2] = lon_dim;
if (nc_def_var(ncid, "TGCLDCWP", NC_DOUBLE, RANK_TGCLDCWP, TGCLDCWP_dims, &TGCLDCWP_id)) ERR;
TGCLDIWP_dims[0] = time_dim;
TGCLDIWP_dims[1] = lat_dim;
TGCLDIWP_dims[2] = lon_dim;
if (nc_def_var(ncid, "TGCLDIWP", NC_DOUBLE, RANK_TGCLDIWP, TGCLDIWP_dims, &TGCLDIWP_id)) ERR;
TGCLDLWP_dims[0] = time_dim;
TGCLDLWP_dims[1] = lat_dim;
TGCLDLWP_dims[2] = lon_dim;
if (nc_def_var(ncid, "TGCLDLWP", NC_DOUBLE, RANK_TGCLDLWP, TGCLDLWP_dims, &TGCLDLWP_id)) ERR;
TKE_dims[0] = time_dim;
TKE_dims[1] = ilev_dim;
TKE_dims[2] = lat_dim;
TKE_dims[3] = lon_dim;
if (nc_def_var(ncid, "TKE", NC_DOUBLE, RANK_TKE, TKE_dims, &TKE_id)) ERR;
TMQ_dims[0] = time_dim;
TMQ_dims[1] = lat_dim;
TMQ_dims[2] = lon_dim;
if (nc_def_var(ncid, "TMQ", NC_DOUBLE, RANK_TMQ, TMQ_dims, &TMQ_id)) ERR;
TREFHT_dims[0] = time_dim;
TREFHT_dims[1] = lat_dim;
TREFHT_dims[2] = lon_dim;
if (nc_def_var(ncid, "TREFHT", NC_DOUBLE, RANK_TREFHT, TREFHT_dims, &TREFHT_id)) ERR;
TREFMNAV_dims[0] = time_dim;
TREFMNAV_dims[1] = lat_dim;
TREFMNAV_dims[2] = lon_dim;
if (nc_def_var(ncid, "TREFMNAV", NC_DOUBLE, RANK_TREFMNAV, TREFMNAV_dims, &TREFMNAV_id)) ERR;
TREFMXAV_dims[0] = time_dim;
TREFMXAV_dims[1] = lat_dim;
TREFMXAV_dims[2] = lon_dim;
if (nc_def_var(ncid, "TREFMXAV", NC_DOUBLE, RANK_TREFMXAV, TREFMXAV_dims, &TREFMXAV_id)) ERR;
TROP_FD_dims[0] = time_dim;
TROP_FD_dims[1] = lat_dim;
TROP_FD_dims[2] = lon_dim;
if (nc_def_var(ncid, "TROP_FD", NC_DOUBLE, RANK_TROP_FD, TROP_FD_dims, &TROP_FD_id)) ERR;
TROP_P_dims[0] = time_dim;
TROP_P_dims[1] = lat_dim;
TROP_P_dims[2] = lon_dim;
if (nc_def_var(ncid, "TROP_P", NC_DOUBLE, RANK_TROP_P, TROP_P_dims, &TROP_P_id)) ERR;
TROP_PD_dims[0] = time_dim;
TROP_PD_dims[1] = lev_dim;
TROP_PD_dims[2] = lat_dim;
TROP_PD_dims[3] = lon_dim;
if (nc_def_var(ncid, "TROP_PD", NC_DOUBLE, RANK_TROP_PD, TROP_PD_dims, &TROP_PD_id)) ERR;
TROP_T_dims[0] = time_dim;
TROP_T_dims[1] = lat_dim;
TROP_T_dims[2] = lon_dim;
if (nc_def_var(ncid, "TROP_T", NC_DOUBLE, RANK_TROP_T, TROP_T_dims, &TROP_T_id)) ERR;
TROP_Z_dims[0] = time_dim;
TROP_Z_dims[1] = lat_dim;
TROP_Z_dims[2] = lon_dim;
if (nc_def_var(ncid, "TROP_Z", NC_DOUBLE, RANK_TROP_Z, TROP_Z_dims, &TROP_Z_id)) ERR;
TS_dims[0] = time_dim;
TS_dims[1] = lat_dim;
TS_dims[2] = lon_dim;
if (nc_def_var(ncid, "TS", NC_DOUBLE, RANK_TS, TS_dims, &TS_id)) ERR;
TSMN_dims[0] = time_dim;
TSMN_dims[1] = lat_dim;
TSMN_dims[2] = lon_dim;
if (nc_def_var(ncid, "TSMN", NC_DOUBLE, RANK_TSMN, TSMN_dims, &TSMN_id)) ERR;
TSMX_dims[0] = time_dim;
TSMX_dims[1] = lat_dim;
TSMX_dims[2] = lon_dim;
if (nc_def_var(ncid, "TSMX", NC_DOUBLE, RANK_TSMX, TSMX_dims, &TSMX_id)) ERR;
U_dims[0] = time_dim;
U_dims[1] = lev_dim;
U_dims[2] = lat_dim;
U_dims[3] = lon_dim;
if (nc_def_var(ncid, "U", NC_DOUBLE, RANK_U, U_dims, &U_id)) ERR;
UFLX_dims[0] = time_dim;
UFLX_dims[1] = ilev_dim;
UFLX_dims[2] = lat_dim;
UFLX_dims[3] = lon_dim;
if (nc_def_var(ncid, "UFLX", NC_DOUBLE, RANK_UFLX, UFLX_dims, &UFLX_id)) ERR;
US_dims[0] = time_dim;
US_dims[1] = lev_dim;
US_dims[2] = slat_dim;
US_dims[3] = lon_dim;
if (nc_def_var(ncid, "US", NC_DOUBLE, RANK_US, US_dims, &US_id)) ERR;
UU_dims[0] = time_dim;
UU_dims[1] = lev_dim;
UU_dims[2] = lat_dim;
UU_dims[3] = lon_dim;
if (nc_def_var(ncid, "UU", NC_DOUBLE, RANK_UU, UU_dims, &UU_id)) ERR;
V_dims[0] = time_dim;
V_dims[1] = lev_dim;
V_dims[2] = lat_dim;
V_dims[3] = lon_dim;
if (nc_def_var(ncid, "V", NC_DOUBLE, RANK_V, V_dims, &V_id)) ERR;
VD01_dims[0] = time_dim;
VD01_dims[1] = lev_dim;
VD01_dims[2] = lat_dim;
VD01_dims[3] = lon_dim;
if (nc_def_var(ncid, "VD01", NC_DOUBLE, RANK_VD01, VD01_dims, &VD01_id)) ERR;
VFLX_dims[0] = time_dim;
VFLX_dims[1] = ilev_dim;
VFLX_dims[2] = lat_dim;
VFLX_dims[3] = lon_dim;
if (nc_def_var(ncid, "VFLX", NC_DOUBLE, RANK_VFLX, VFLX_dims, &VFLX_id)) ERR;
VQ_dims[0] = time_dim;
VQ_dims[1] = lev_dim;
VQ_dims[2] = lat_dim;
VQ_dims[3] = lon_dim;
if (nc_def_var(ncid, "VQ", NC_DOUBLE, RANK_VQ, VQ_dims, &VQ_id)) ERR;
VS_dims[0] = time_dim;
VS_dims[1] = lev_dim;
VS_dims[2] = lat_dim;
VS_dims[3] = slon_dim;
if (nc_def_var(ncid, "VS", NC_DOUBLE, RANK_VS, VS_dims, &VS_id)) ERR;
VT_dims[0] = time_dim;
VT_dims[1] = lev_dim;
VT_dims[2] = lat_dim;
VT_dims[3] = lon_dim;
if (nc_def_var(ncid, "VT", NC_DOUBLE, RANK_VT, VT_dims, &VT_id)) ERR;
VU_dims[0] = time_dim;
VU_dims[1] = lev_dim;
VU_dims[2] = lat_dim;
VU_dims[3] = lon_dim;
if (nc_def_var(ncid, "VU", NC_DOUBLE, RANK_VU, VU_dims, &VU_id)) ERR;
VV_dims[0] = time_dim;
VV_dims[1] = lev_dim;
VV_dims[2] = lat_dim;
VV_dims[3] = lon_dim;
if (nc_def_var(ncid, "VV", NC_DOUBLE, RANK_VV, VV_dims, &VV_id)) ERR;
WGUSTD_dims[0] = time_dim;
WGUSTD_dims[1] = lat_dim;
WGUSTD_dims[2] = lon_dim;
if (nc_def_var(ncid, "WGUSTD", NC_DOUBLE, RANK_WGUSTD, WGUSTD_dims, &WGUSTD_id)) ERR;
WTKE_dims[0] = time_dim;
WTKE_dims[1] = lev_dim;
WTKE_dims[2] = lat_dim;
WTKE_dims[3] = lon_dim;
if (nc_def_var(ncid, "WTKE", NC_DOUBLE, RANK_WTKE, WTKE_dims, &WTKE_id)) ERR;
XPH_LWC_dims[0] = time_dim;
XPH_LWC_dims[1] = lev_dim;
XPH_LWC_dims[2] = lat_dim;
XPH_LWC_dims[3] = lon_dim;
if (nc_def_var(ncid, "XPH_LWC", NC_DOUBLE, RANK_XPH_LWC, XPH_LWC_dims, &XPH_LWC_id)) ERR;
Z3_dims[0] = time_dim;
Z3_dims[1] = lev_dim;
Z3_dims[2] = lat_dim;
Z3_dims[3] = lon_dim;
if (nc_def_var(ncid, "Z3", NC_DOUBLE, RANK_Z3, Z3_dims, &Z3_id)) ERR;
airFV_dims[0] = time_dim;
airFV_dims[1] = lat_dim;
airFV_dims[2] = lon_dim;
if (nc_def_var(ncid, "airFV", NC_DOUBLE, RANK_airFV, airFV_dims, &airFV_id)) ERR;
bc_a1_dims[0] = time_dim;
bc_a1_dims[1] = lev_dim;
bc_a1_dims[2] = lat_dim;
bc_a1_dims[3] = lon_dim;
if (nc_def_var(ncid, "bc_a1", NC_DOUBLE, RANK_bc_a1, bc_a1_dims, &bc_a1_id)) ERR;
bc_a1DDF_dims[0] = time_dim;
bc_a1DDF_dims[1] = lat_dim;
bc_a1DDF_dims[2] = lon_dim;
if (nc_def_var(ncid, "bc_a1DDF", NC_DOUBLE, RANK_bc_a1DDF, bc_a1DDF_dims, &bc_a1DDF_id)) ERR;
bc_a1GVF_dims[0] = time_dim;
bc_a1GVF_dims[1] = lat_dim;
bc_a1GVF_dims[2] = lon_dim;
if (nc_def_var(ncid, "bc_a1GVF", NC_DOUBLE, RANK_bc_a1GVF, bc_a1GVF_dims, &bc_a1GVF_id)) ERR;
bc_a1SFSBC_dims[0] = time_dim;
bc_a1SFSBC_dims[1] = lat_dim;
bc_a1SFSBC_dims[2] = lon_dim;
if (nc_def_var(ncid, "bc_a1SFSBC", NC_DOUBLE, RANK_bc_a1SFSBC, bc_a1SFSBC_dims, &bc_a1SFSBC_id)) ERR;
bc_a1SFSBS_dims[0] = time_dim;
bc_a1SFSBS_dims[1] = lat_dim;
bc_a1SFSBS_dims[2] = lon_dim;
if (nc_def_var(ncid, "bc_a1SFSBS", NC_DOUBLE, RANK_bc_a1SFSBS, bc_a1SFSBS_dims, &bc_a1SFSBS_id)) ERR;
bc_a1SFSIC_dims[0] = time_dim;
bc_a1SFSIC_dims[1] = lat_dim;
bc_a1SFSIC_dims[2] = lon_dim;
if (nc_def_var(ncid, "bc_a1SFSIC", NC_DOUBLE, RANK_bc_a1SFSIC, bc_a1SFSIC_dims, &bc_a1SFSIC_id)) ERR;
bc_a1SFSIS_dims[0] = time_dim;
bc_a1SFSIS_dims[1] = lat_dim;
bc_a1SFSIS_dims[2] = lon_dim;
if (nc_def_var(ncid, "bc_a1SFSIS", NC_DOUBLE, RANK_bc_a1SFSIS, bc_a1SFSIS_dims, &bc_a1SFSIS_id)) ERR;
bc_a1SFWET_dims[0] = time_dim;
bc_a1SFWET_dims[1] = lat_dim;
bc_a1SFWET_dims[2] = lon_dim;
if (nc_def_var(ncid, "bc_a1SFWET", NC_DOUBLE, RANK_bc_a1SFWET, bc_a1SFWET_dims, &bc_a1SFWET_id)) ERR;
bc_a1TBF_dims[0] = time_dim;
bc_a1TBF_dims[1] = lat_dim;
bc_a1TBF_dims[2] = lon_dim;
if (nc_def_var(ncid, "bc_a1TBF", NC_DOUBLE, RANK_bc_a1TBF, bc_a1TBF_dims, &bc_a1TBF_id)) ERR;
bc_a1_CLXF_dims[0] = time_dim;
bc_a1_CLXF_dims[1] = lat_dim;
bc_a1_CLXF_dims[2] = lon_dim;
if (nc_def_var(ncid, "bc_a1_CLXF", NC_DOUBLE, RANK_bc_a1_CLXF, bc_a1_CLXF_dims, &bc_a1_CLXF_id)) ERR;
bc_a1_XFRC_dims[0] = time_dim;
bc_a1_XFRC_dims[1] = lev_dim;
bc_a1_XFRC_dims[2] = lat_dim;
bc_a1_XFRC_dims[3] = lon_dim;
if (nc_def_var(ncid, "bc_a1_XFRC", NC_DOUBLE, RANK_bc_a1_XFRC, bc_a1_XFRC_dims, &bc_a1_XFRC_id)) ERR;
bc_c1_dims[0] = time_dim;
bc_c1_dims[1] = lev_dim;
bc_c1_dims[2] = lat_dim;
bc_c1_dims[3] = lon_dim;
if (nc_def_var(ncid, "bc_c1", NC_DOUBLE, RANK_bc_c1, bc_c1_dims, &bc_c1_id)) ERR;
bc_c1DDF_dims[0] = time_dim;
bc_c1DDF_dims[1] = lat_dim;
bc_c1DDF_dims[2] = lon_dim;
if (nc_def_var(ncid, "bc_c1DDF", NC_DOUBLE, RANK_bc_c1DDF, bc_c1DDF_dims, &bc_c1DDF_id)) ERR;
bc_c1GVF_dims[0] = time_dim;
bc_c1GVF_dims[1] = lat_dim;
bc_c1GVF_dims[2] = lon_dim;
if (nc_def_var(ncid, "bc_c1GVF", NC_DOUBLE, RANK_bc_c1GVF, bc_c1GVF_dims, &bc_c1GVF_id)) ERR;
bc_c1SFSBC_dims[0] = time_dim;
bc_c1SFSBC_dims[1] = lat_dim;
bc_c1SFSBC_dims[2] = lon_dim;
if (nc_def_var(ncid, "bc_c1SFSBC", NC_DOUBLE, RANK_bc_c1SFSBC, bc_c1SFSBC_dims, &bc_c1SFSBC_id)) ERR;
bc_c1SFSBS_dims[0] = time_dim;
bc_c1SFSBS_dims[1] = lat_dim;
bc_c1SFSBS_dims[2] = lon_dim;
if (nc_def_var(ncid, "bc_c1SFSBS", NC_DOUBLE, RANK_bc_c1SFSBS, bc_c1SFSBS_dims, &bc_c1SFSBS_id)) ERR;
bc_c1SFSIC_dims[0] = time_dim;
bc_c1SFSIC_dims[1] = lat_dim;
bc_c1SFSIC_dims[2] = lon_dim;
if (nc_def_var(ncid, "bc_c1SFSIC", NC_DOUBLE, RANK_bc_c1SFSIC, bc_c1SFSIC_dims, &bc_c1SFSIC_id)) ERR;
bc_c1SFSIS_dims[0] = time_dim;
bc_c1SFSIS_dims[1] = lat_dim;
bc_c1SFSIS_dims[2] = lon_dim;
if (nc_def_var(ncid, "bc_c1SFSIS", NC_DOUBLE, RANK_bc_c1SFSIS, bc_c1SFSIS_dims, &bc_c1SFSIS_id)) ERR;
bc_c1SFWET_dims[0] = time_dim;
bc_c1SFWET_dims[1] = lat_dim;
bc_c1SFWET_dims[2] = lon_dim;
if (nc_def_var(ncid, "bc_c1SFWET", NC_DOUBLE, RANK_bc_c1SFWET, bc_c1SFWET_dims, &bc_c1SFWET_id)) ERR;
bc_c1TBF_dims[0] = time_dim;
bc_c1TBF_dims[1] = lat_dim;
bc_c1TBF_dims[2] = lon_dim;
if (nc_def_var(ncid, "bc_c1TBF", NC_DOUBLE, RANK_bc_c1TBF, bc_c1TBF_dims, &bc_c1TBF_id)) ERR;
chem_trop_dims[0] = time_dim;
chem_trop_dims[1] = lev_dim;
chem_trop_dims[2] = lat_dim;
chem_trop_dims[3] = lon_dim;
if (nc_def_var(ncid, "chem_trop", NC_DOUBLE, RANK_chem_trop, chem_trop_dims, &chem_trop_id)) ERR;
chem_trop_tropop_dims[0] = time_dim;
chem_trop_tropop_dims[1] = lev_dim;
chem_trop_tropop_dims[2] = lat_dim;
chem_trop_tropop_dims[3] = lon_dim;
if (nc_def_var(ncid, "chem_trop_tropop", NC_DOUBLE, RANK_chem_trop_tropop, chem_trop_tropop_dims, &chem_trop_tropop_id)) ERR;
dgnd_a01_dims[0] = time_dim;
dgnd_a01_dims[1] = lev_dim;
dgnd_a01_dims[2] = lat_dim;
dgnd_a01_dims[3] = lon_dim;
if (nc_def_var(ncid, "dgnd_a01", NC_DOUBLE, RANK_dgnd_a01, dgnd_a01_dims, &dgnd_a01_id)) ERR;
dgnd_a02_dims[0] = time_dim;
dgnd_a02_dims[1] = lev_dim;
dgnd_a02_dims[2] = lat_dim;
dgnd_a02_dims[3] = lon_dim;
if (nc_def_var(ncid, "dgnd_a02", NC_DOUBLE, RANK_dgnd_a02, dgnd_a02_dims, &dgnd_a02_id)) ERR;
dgnd_a03_dims[0] = time_dim;
dgnd_a03_dims[1] = lev_dim;
dgnd_a03_dims[2] = lat_dim;
dgnd_a03_dims[3] = lon_dim;
if (nc_def_var(ncid, "dgnd_a03", NC_DOUBLE, RANK_dgnd_a03, dgnd_a03_dims, &dgnd_a03_id)) ERR;
dgnw_a01_dims[0] = time_dim;
dgnw_a01_dims[1] = lev_dim;
dgnw_a01_dims[2] = lat_dim;
dgnw_a01_dims[3] = lon_dim;
if (nc_def_var(ncid, "dgnw_a01", NC_DOUBLE, RANK_dgnw_a01, dgnw_a01_dims, &dgnw_a01_id)) ERR;
dgnw_a02_dims[0] = time_dim;
dgnw_a02_dims[1] = lev_dim;
dgnw_a02_dims[2] = lat_dim;
dgnw_a02_dims[3] = lon_dim;
if (nc_def_var(ncid, "dgnw_a02", NC_DOUBLE, RANK_dgnw_a02, dgnw_a02_dims, &dgnw_a02_id)) ERR;
dgnw_a03_dims[0] = time_dim;
dgnw_a03_dims[1] = lev_dim;
dgnw_a03_dims[2] = lat_dim;
dgnw_a03_dims[3] = lon_dim;
if (nc_def_var(ncid, "dgnw_a03", NC_DOUBLE, RANK_dgnw_a03, dgnw_a03_dims, &dgnw_a03_id)) ERR;
dst_a1_dims[0] = time_dim;
dst_a1_dims[1] = lev_dim;
dst_a1_dims[2] = lat_dim;
dst_a1_dims[3] = lon_dim;
if (nc_def_var(ncid, "dst_a1", NC_DOUBLE, RANK_dst_a1, dst_a1_dims, &dst_a1_id)) ERR;
dst_a1DDF_dims[0] = time_dim;
dst_a1DDF_dims[1] = lat_dim;
dst_a1DDF_dims[2] = lon_dim;
if (nc_def_var(ncid, "dst_a1DDF", NC_DOUBLE, RANK_dst_a1DDF, dst_a1DDF_dims, &dst_a1DDF_id)) ERR;
dst_a1GVF_dims[0] = time_dim;
dst_a1GVF_dims[1] = lat_dim;
dst_a1GVF_dims[2] = lon_dim;
if (nc_def_var(ncid, "dst_a1GVF", NC_DOUBLE, RANK_dst_a1GVF, dst_a1GVF_dims, &dst_a1GVF_id)) ERR;
dst_a1SF_dims[0] = time_dim;
dst_a1SF_dims[1] = lat_dim;
dst_a1SF_dims[2] = lon_dim;
if (nc_def_var(ncid, "dst_a1SF", NC_DOUBLE, RANK_dst_a1SF, dst_a1SF_dims, &dst_a1SF_id)) ERR;
dst_a1SFSBC_dims[0] = time_dim;
dst_a1SFSBC_dims[1] = lat_dim;
dst_a1SFSBC_dims[2] = lon_dim;
if (nc_def_var(ncid, "dst_a1SFSBC", NC_DOUBLE, RANK_dst_a1SFSBC, dst_a1SFSBC_dims, &dst_a1SFSBC_id)) ERR;
dst_a1SFSBS_dims[0] = time_dim;
dst_a1SFSBS_dims[1] = lat_dim;
dst_a1SFSBS_dims[2] = lon_dim;
if (nc_def_var(ncid, "dst_a1SFSBS", NC_DOUBLE, RANK_dst_a1SFSBS, dst_a1SFSBS_dims, &dst_a1SFSBS_id)) ERR;
dst_a1SFSIC_dims[0] = time_dim;
dst_a1SFSIC_dims[1] = lat_dim;
dst_a1SFSIC_dims[2] = lon_dim;
if (nc_def_var(ncid, "dst_a1SFSIC", NC_DOUBLE, RANK_dst_a1SFSIC, dst_a1SFSIC_dims, &dst_a1SFSIC_id)) ERR;
dst_a1SFSIS_dims[0] = time_dim;
dst_a1SFSIS_dims[1] = lat_dim;
dst_a1SFSIS_dims[2] = lon_dim;
if (nc_def_var(ncid, "dst_a1SFSIS", NC_DOUBLE, RANK_dst_a1SFSIS, dst_a1SFSIS_dims, &dst_a1SFSIS_id)) ERR;
dst_a1SFWET_dims[0] = time_dim;
dst_a1SFWET_dims[1] = lat_dim;
dst_a1SFWET_dims[2] = lon_dim;
if (nc_def_var(ncid, "dst_a1SFWET", NC_DOUBLE, RANK_dst_a1SFWET, dst_a1SFWET_dims, &dst_a1SFWET_id)) ERR;
dst_a1TBF_dims[0] = time_dim;
dst_a1TBF_dims[1] = lat_dim;
dst_a1TBF_dims[2] = lon_dim;
if (nc_def_var(ncid, "dst_a1TBF", NC_DOUBLE, RANK_dst_a1TBF, dst_a1TBF_dims, &dst_a1TBF_id)) ERR;
dst_a3_dims[0] = time_dim;
dst_a3_dims[1] = lev_dim;
dst_a3_dims[2] = lat_dim;
dst_a3_dims[3] = lon_dim;
if (nc_def_var(ncid, "dst_a3", NC_DOUBLE, RANK_dst_a3, dst_a3_dims, &dst_a3_id)) ERR;
dst_a3DDF_dims[0] = time_dim;
dst_a3DDF_dims[1] = lat_dim;
dst_a3DDF_dims[2] = lon_dim;
if (nc_def_var(ncid, "dst_a3DDF", NC_DOUBLE, RANK_dst_a3DDF, dst_a3DDF_dims, &dst_a3DDF_id)) ERR;
dst_a3GVF_dims[0] = time_dim;
dst_a3GVF_dims[1] = lat_dim;
dst_a3GVF_dims[2] = lon_dim;
if (nc_def_var(ncid, "dst_a3GVF", NC_DOUBLE, RANK_dst_a3GVF, dst_a3GVF_dims, &dst_a3GVF_id)) ERR;
dst_a3SF_dims[0] = time_dim;
dst_a3SF_dims[1] = lat_dim;
dst_a3SF_dims[2] = lon_dim;
if (nc_def_var(ncid, "dst_a3SF", NC_DOUBLE, RANK_dst_a3SF, dst_a3SF_dims, &dst_a3SF_id)) ERR;
dst_a3SFSBC_dims[0] = time_dim;
dst_a3SFSBC_dims[1] = lat_dim;
dst_a3SFSBC_dims[2] = lon_dim;
if (nc_def_var(ncid, "dst_a3SFSBC", NC_DOUBLE, RANK_dst_a3SFSBC, dst_a3SFSBC_dims, &dst_a3SFSBC_id)) ERR;
dst_a3SFSBS_dims[0] = time_dim;
dst_a3SFSBS_dims[1] = lat_dim;
dst_a3SFSBS_dims[2] = lon_dim;
if (nc_def_var(ncid, "dst_a3SFSBS", NC_DOUBLE, RANK_dst_a3SFSBS, dst_a3SFSBS_dims, &dst_a3SFSBS_id)) ERR;
dst_a3SFSIC_dims[0] = time_dim;
dst_a3SFSIC_dims[1] = lat_dim;
dst_a3SFSIC_dims[2] = lon_dim;
if (nc_def_var(ncid, "dst_a3SFSIC", NC_DOUBLE, RANK_dst_a3SFSIC, dst_a3SFSIC_dims, &dst_a3SFSIC_id)) ERR;
dst_a3SFSIS_dims[0] = time_dim;
dst_a3SFSIS_dims[1] = lat_dim;
dst_a3SFSIS_dims[2] = lon_dim;
if (nc_def_var(ncid, "dst_a3SFSIS", NC_DOUBLE, RANK_dst_a3SFSIS, dst_a3SFSIS_dims, &dst_a3SFSIS_id)) ERR;
dst_a3SFWET_dims[0] = time_dim;
dst_a3SFWET_dims[1] = lat_dim;
dst_a3SFWET_dims[2] = lon_dim;
if (nc_def_var(ncid, "dst_a3SFWET", NC_DOUBLE, RANK_dst_a3SFWET, dst_a3SFWET_dims, &dst_a3SFWET_id)) ERR;
dst_a3TBF_dims[0] = time_dim;
dst_a3TBF_dims[1] = lat_dim;
dst_a3TBF_dims[2] = lon_dim;
if (nc_def_var(ncid, "dst_a3TBF", NC_DOUBLE, RANK_dst_a3TBF, dst_a3TBF_dims, &dst_a3TBF_id)) ERR;
dst_c1_dims[0] = time_dim;
dst_c1_dims[1] = lev_dim;
dst_c1_dims[2] = lat_dim;
dst_c1_dims[3] = lon_dim;
if (nc_def_var(ncid, "dst_c1", NC_DOUBLE, RANK_dst_c1, dst_c1_dims, &dst_c1_id)) ERR;
dst_c1DDF_dims[0] = time_dim;
dst_c1DDF_dims[1] = lat_dim;
dst_c1DDF_dims[2] = lon_dim;
if (nc_def_var(ncid, "dst_c1DDF", NC_DOUBLE, RANK_dst_c1DDF, dst_c1DDF_dims, &dst_c1DDF_id)) ERR;
dst_c1GVF_dims[0] = time_dim;
dst_c1GVF_dims[1] = lat_dim;
dst_c1GVF_dims[2] = lon_dim;
if (nc_def_var(ncid, "dst_c1GVF", NC_DOUBLE, RANK_dst_c1GVF, dst_c1GVF_dims, &dst_c1GVF_id)) ERR;
dst_c1SFSBC_dims[0] = time_dim;
dst_c1SFSBC_dims[1] = lat_dim;
dst_c1SFSBC_dims[2] = lon_dim;
if (nc_def_var(ncid, "dst_c1SFSBC", NC_DOUBLE, RANK_dst_c1SFSBC, dst_c1SFSBC_dims, &dst_c1SFSBC_id)) ERR;
dst_c1SFSBS_dims[0] = time_dim;
dst_c1SFSBS_dims[1] = lat_dim;
dst_c1SFSBS_dims[2] = lon_dim;
if (nc_def_var(ncid, "dst_c1SFSBS", NC_DOUBLE, RANK_dst_c1SFSBS, dst_c1SFSBS_dims, &dst_c1SFSBS_id)) ERR;
dst_c1SFSIC_dims[0] = time_dim;
dst_c1SFSIC_dims[1] = lat_dim;
dst_c1SFSIC_dims[2] = lon_dim;
if (nc_def_var(ncid, "dst_c1SFSIC", NC_DOUBLE, RANK_dst_c1SFSIC, dst_c1SFSIC_dims, &dst_c1SFSIC_id)) ERR;
dst_c1SFSIS_dims[0] = time_dim;
dst_c1SFSIS_dims[1] = lat_dim;
dst_c1SFSIS_dims[2] = lon_dim;
if (nc_def_var(ncid, "dst_c1SFSIS", NC_DOUBLE, RANK_dst_c1SFSIS, dst_c1SFSIS_dims, &dst_c1SFSIS_id)) ERR;
dst_c1SFWET_dims[0] = time_dim;
dst_c1SFWET_dims[1] = lat_dim;
dst_c1SFWET_dims[2] = lon_dim;
if (nc_def_var(ncid, "dst_c1SFWET", NC_DOUBLE, RANK_dst_c1SFWET, dst_c1SFWET_dims, &dst_c1SFWET_id)) ERR;
dst_c1TBF_dims[0] = time_dim;
dst_c1TBF_dims[1] = lat_dim;
dst_c1TBF_dims[2] = lon_dim;
if (nc_def_var(ncid, "dst_c1TBF", NC_DOUBLE, RANK_dst_c1TBF, dst_c1TBF_dims, &dst_c1TBF_id)) ERR;
dst_c3_dims[0] = time_dim;
dst_c3_dims[1] = lev_dim;
dst_c3_dims[2] = lat_dim;
dst_c3_dims[3] = lon_dim;
if (nc_def_var(ncid, "dst_c3", NC_DOUBLE, RANK_dst_c3, dst_c3_dims, &dst_c3_id)) ERR;
dst_c3DDF_dims[0] = time_dim;
dst_c3DDF_dims[1] = lat_dim;
dst_c3DDF_dims[2] = lon_dim;
if (nc_def_var(ncid, "dst_c3DDF", NC_DOUBLE, RANK_dst_c3DDF, dst_c3DDF_dims, &dst_c3DDF_id)) ERR;
dst_c3GVF_dims[0] = time_dim;
dst_c3GVF_dims[1] = lat_dim;
dst_c3GVF_dims[2] = lon_dim;
if (nc_def_var(ncid, "dst_c3GVF", NC_DOUBLE, RANK_dst_c3GVF, dst_c3GVF_dims, &dst_c3GVF_id)) ERR;
dst_c3SFSBC_dims[0] = time_dim;
dst_c3SFSBC_dims[1] = lat_dim;
dst_c3SFSBC_dims[2] = lon_dim;
if (nc_def_var(ncid, "dst_c3SFSBC", NC_DOUBLE, RANK_dst_c3SFSBC, dst_c3SFSBC_dims, &dst_c3SFSBC_id)) ERR;
dst_c3SFSBS_dims[0] = time_dim;
dst_c3SFSBS_dims[1] = lat_dim;
dst_c3SFSBS_dims[2] = lon_dim;
if (nc_def_var(ncid, "dst_c3SFSBS", NC_DOUBLE, RANK_dst_c3SFSBS, dst_c3SFSBS_dims, &dst_c3SFSBS_id)) ERR;
dst_c3SFSIC_dims[0] = time_dim;
dst_c3SFSIC_dims[1] = lat_dim;
dst_c3SFSIC_dims[2] = lon_dim;
if (nc_def_var(ncid, "dst_c3SFSIC", NC_DOUBLE, RANK_dst_c3SFSIC, dst_c3SFSIC_dims, &dst_c3SFSIC_id)) ERR;
dst_c3SFSIS_dims[0] = time_dim;
dst_c3SFSIS_dims[1] = lat_dim;
dst_c3SFSIS_dims[2] = lon_dim;
if (nc_def_var(ncid, "dst_c3SFSIS", NC_DOUBLE, RANK_dst_c3SFSIS, dst_c3SFSIS_dims, &dst_c3SFSIS_id)) ERR;
dst_c3SFWET_dims[0] = time_dim;
dst_c3SFWET_dims[1] = lat_dim;
dst_c3SFWET_dims[2] = lon_dim;
if (nc_def_var(ncid, "dst_c3SFWET", NC_DOUBLE, RANK_dst_c3SFWET, dst_c3SFWET_dims, &dst_c3SFWET_id)) ERR;
dst_c3TBF_dims[0] = time_dim;
dst_c3TBF_dims[1] = lat_dim;
dst_c3TBF_dims[2] = lon_dim;
if (nc_def_var(ncid, "dst_c3TBF", NC_DOUBLE, RANK_dst_c3TBF, dst_c3TBF_dims, &dst_c3TBF_id)) ERR;
ncl_a1_dims[0] = time_dim;
ncl_a1_dims[1] = lev_dim;
ncl_a1_dims[2] = lat_dim;
ncl_a1_dims[3] = lon_dim;
if (nc_def_var(ncid, "ncl_a1", NC_DOUBLE, RANK_ncl_a1, ncl_a1_dims, &ncl_a1_id)) ERR;
ncl_a1DDF_dims[0] = time_dim;
ncl_a1DDF_dims[1] = lat_dim;
ncl_a1DDF_dims[2] = lon_dim;
if (nc_def_var(ncid, "ncl_a1DDF", NC_DOUBLE, RANK_ncl_a1DDF, ncl_a1DDF_dims, &ncl_a1DDF_id)) ERR;
ncl_a1GVF_dims[0] = time_dim;
ncl_a1GVF_dims[1] = lat_dim;
ncl_a1GVF_dims[2] = lon_dim;
if (nc_def_var(ncid, "ncl_a1GVF", NC_DOUBLE, RANK_ncl_a1GVF, ncl_a1GVF_dims, &ncl_a1GVF_id)) ERR;
ncl_a1SF_dims[0] = time_dim;
ncl_a1SF_dims[1] = lat_dim;
ncl_a1SF_dims[2] = lon_dim;
if (nc_def_var(ncid, "ncl_a1SF", NC_DOUBLE, RANK_ncl_a1SF, ncl_a1SF_dims, &ncl_a1SF_id)) ERR;
ncl_a1SFSBC_dims[0] = time_dim;
ncl_a1SFSBC_dims[1] = lat_dim;
ncl_a1SFSBC_dims[2] = lon_dim;
if (nc_def_var(ncid, "ncl_a1SFSBC", NC_DOUBLE, RANK_ncl_a1SFSBC, ncl_a1SFSBC_dims, &ncl_a1SFSBC_id)) ERR;
ncl_a1SFSBS_dims[0] = time_dim;
ncl_a1SFSBS_dims[1] = lat_dim;
ncl_a1SFSBS_dims[2] = lon_dim;
if (nc_def_var(ncid, "ncl_a1SFSBS", NC_DOUBLE, RANK_ncl_a1SFSBS, ncl_a1SFSBS_dims, &ncl_a1SFSBS_id)) ERR;
ncl_a1SFSIC_dims[0] = time_dim;
ncl_a1SFSIC_dims[1] = lat_dim;
ncl_a1SFSIC_dims[2] = lon_dim;
if (nc_def_var(ncid, "ncl_a1SFSIC", NC_DOUBLE, RANK_ncl_a1SFSIC, ncl_a1SFSIC_dims, &ncl_a1SFSIC_id)) ERR;
ncl_a1SFSIS_dims[0] = time_dim;
ncl_a1SFSIS_dims[1] = lat_dim;
ncl_a1SFSIS_dims[2] = lon_dim;
if (nc_def_var(ncid, "ncl_a1SFSIS", NC_DOUBLE, RANK_ncl_a1SFSIS, ncl_a1SFSIS_dims, &ncl_a1SFSIS_id)) ERR;
ncl_a1SFWET_dims[0] = time_dim;
ncl_a1SFWET_dims[1] = lat_dim;
ncl_a1SFWET_dims[2] = lon_dim;
if (nc_def_var(ncid, "ncl_a1SFWET", NC_DOUBLE, RANK_ncl_a1SFWET, ncl_a1SFWET_dims, &ncl_a1SFWET_id)) ERR;
ncl_a1TBF_dims[0] = time_dim;
ncl_a1TBF_dims[1] = lat_dim;
ncl_a1TBF_dims[2] = lon_dim;
if (nc_def_var(ncid, "ncl_a1TBF", NC_DOUBLE, RANK_ncl_a1TBF, ncl_a1TBF_dims, &ncl_a1TBF_id)) ERR;
ncl_a1_sfcoag1_dims[0] = time_dim;
ncl_a1_sfcoag1_dims[1] = lat_dim;
ncl_a1_sfcoag1_dims[2] = lon_dim;
if (nc_def_var(ncid, "ncl_a1_sfcoag1", NC_DOUBLE, RANK_ncl_a1_sfcoag1, ncl_a1_sfcoag1_dims, &ncl_a1_sfcoag1_id)) ERR;
ncl_a1_sfcsiz3_dims[0] = time_dim;
ncl_a1_sfcsiz3_dims[1] = lat_dim;
ncl_a1_sfcsiz3_dims[2] = lon_dim;
if (nc_def_var(ncid, "ncl_a1_sfcsiz3", NC_DOUBLE, RANK_ncl_a1_sfcsiz3, ncl_a1_sfcsiz3_dims, &ncl_a1_sfcsiz3_id)) ERR;
ncl_a1_sfcsiz4_dims[0] = time_dim;
ncl_a1_sfcsiz4_dims[1] = lat_dim;
ncl_a1_sfcsiz4_dims[2] = lon_dim;
if (nc_def_var(ncid, "ncl_a1_sfcsiz4", NC_DOUBLE, RANK_ncl_a1_sfcsiz4, ncl_a1_sfcsiz4_dims, &ncl_a1_sfcsiz4_id)) ERR;
ncl_a1_sfgaex2_dims[0] = time_dim;
ncl_a1_sfgaex2_dims[1] = lat_dim;
ncl_a1_sfgaex2_dims[2] = lon_dim;
if (nc_def_var(ncid, "ncl_a1_sfgaex2", NC_DOUBLE, RANK_ncl_a1_sfgaex2, ncl_a1_sfgaex2_dims, &ncl_a1_sfgaex2_id)) ERR;
ncl_a2_dims[0] = time_dim;
ncl_a2_dims[1] = lev_dim;
ncl_a2_dims[2] = lat_dim;
ncl_a2_dims[3] = lon_dim;
if (nc_def_var(ncid, "ncl_a2", NC_DOUBLE, RANK_ncl_a2, ncl_a2_dims, &ncl_a2_id)) ERR;
ncl_a2DDF_dims[0] = time_dim;
ncl_a2DDF_dims[1] = lat_dim;
ncl_a2DDF_dims[2] = lon_dim;
if (nc_def_var(ncid, "ncl_a2DDF", NC_DOUBLE, RANK_ncl_a2DDF, ncl_a2DDF_dims, &ncl_a2DDF_id)) ERR;
ncl_a2GVF_dims[0] = time_dim;
ncl_a2GVF_dims[1] = lat_dim;
ncl_a2GVF_dims[2] = lon_dim;
if (nc_def_var(ncid, "ncl_a2GVF", NC_DOUBLE, RANK_ncl_a2GVF, ncl_a2GVF_dims, &ncl_a2GVF_id)) ERR;
ncl_a2SF_dims[0] = time_dim;
ncl_a2SF_dims[1] = lat_dim;
ncl_a2SF_dims[2] = lon_dim;
if (nc_def_var(ncid, "ncl_a2SF", NC_DOUBLE, RANK_ncl_a2SF, ncl_a2SF_dims, &ncl_a2SF_id)) ERR;
ncl_a2SFSBC_dims[0] = time_dim;
ncl_a2SFSBC_dims[1] = lat_dim;
ncl_a2SFSBC_dims[2] = lon_dim;
if (nc_def_var(ncid, "ncl_a2SFSBC", NC_DOUBLE, RANK_ncl_a2SFSBC, ncl_a2SFSBC_dims, &ncl_a2SFSBC_id)) ERR;
ncl_a2SFSBS_dims[0] = time_dim;
ncl_a2SFSBS_dims[1] = lat_dim;
ncl_a2SFSBS_dims[2] = lon_dim;
if (nc_def_var(ncid, "ncl_a2SFSBS", NC_DOUBLE, RANK_ncl_a2SFSBS, ncl_a2SFSBS_dims, &ncl_a2SFSBS_id)) ERR;
ncl_a2SFSIC_dims[0] = time_dim;
ncl_a2SFSIC_dims[1] = lat_dim;
ncl_a2SFSIC_dims[2] = lon_dim;
if (nc_def_var(ncid, "ncl_a2SFSIC", NC_DOUBLE, RANK_ncl_a2SFSIC, ncl_a2SFSIC_dims, &ncl_a2SFSIC_id)) ERR;
ncl_a2SFSIS_dims[0] = time_dim;
ncl_a2SFSIS_dims[1] = lat_dim;
ncl_a2SFSIS_dims[2] = lon_dim;
if (nc_def_var(ncid, "ncl_a2SFSIS", NC_DOUBLE, RANK_ncl_a2SFSIS, ncl_a2SFSIS_dims, &ncl_a2SFSIS_id)) ERR;
ncl_a2SFWET_dims[0] = time_dim;
ncl_a2SFWET_dims[1] = lat_dim;
ncl_a2SFWET_dims[2] = lon_dim;
if (nc_def_var(ncid, "ncl_a2SFWET", NC_DOUBLE, RANK_ncl_a2SFWET, ncl_a2SFWET_dims, &ncl_a2SFWET_id)) ERR;
ncl_a2TBF_dims[0] = time_dim;
ncl_a2TBF_dims[1] = lat_dim;
ncl_a2TBF_dims[2] = lon_dim;
if (nc_def_var(ncid, "ncl_a2TBF", NC_DOUBLE, RANK_ncl_a2TBF, ncl_a2TBF_dims, &ncl_a2TBF_id)) ERR;
ncl_a2_sfcoag1_dims[0] = time_dim;
ncl_a2_sfcoag1_dims[1] = lat_dim;
ncl_a2_sfcoag1_dims[2] = lon_dim;
if (nc_def_var(ncid, "ncl_a2_sfcoag1", NC_DOUBLE, RANK_ncl_a2_sfcoag1, ncl_a2_sfcoag1_dims, &ncl_a2_sfcoag1_id)) ERR;
ncl_a2_sfcsiz3_dims[0] = time_dim;
ncl_a2_sfcsiz3_dims[1] = lat_dim;
ncl_a2_sfcsiz3_dims[2] = lon_dim;
if (nc_def_var(ncid, "ncl_a2_sfcsiz3", NC_DOUBLE, RANK_ncl_a2_sfcsiz3, ncl_a2_sfcsiz3_dims, &ncl_a2_sfcsiz3_id)) ERR;
ncl_a2_sfcsiz4_dims[0] = time_dim;
ncl_a2_sfcsiz4_dims[1] = lat_dim;
ncl_a2_sfcsiz4_dims[2] = lon_dim;
if (nc_def_var(ncid, "ncl_a2_sfcsiz4", NC_DOUBLE, RANK_ncl_a2_sfcsiz4, ncl_a2_sfcsiz4_dims, &ncl_a2_sfcsiz4_id)) ERR;
ncl_a2_sfgaex2_dims[0] = time_dim;
ncl_a2_sfgaex2_dims[1] = lat_dim;
ncl_a2_sfgaex2_dims[2] = lon_dim;
if (nc_def_var(ncid, "ncl_a2_sfgaex2", NC_DOUBLE, RANK_ncl_a2_sfgaex2, ncl_a2_sfgaex2_dims, &ncl_a2_sfgaex2_id)) ERR;
ncl_a3_dims[0] = time_dim;
ncl_a3_dims[1] = lev_dim;
ncl_a3_dims[2] = lat_dim;
ncl_a3_dims[3] = lon_dim;
if (nc_def_var(ncid, "ncl_a3", NC_DOUBLE, RANK_ncl_a3, ncl_a3_dims, &ncl_a3_id)) ERR;
ncl_a3DDF_dims[0] = time_dim;
ncl_a3DDF_dims[1] = lat_dim;
ncl_a3DDF_dims[2] = lon_dim;
if (nc_def_var(ncid, "ncl_a3DDF", NC_DOUBLE, RANK_ncl_a3DDF, ncl_a3DDF_dims, &ncl_a3DDF_id)) ERR;
ncl_a3GVF_dims[0] = time_dim;
ncl_a3GVF_dims[1] = lat_dim;
ncl_a3GVF_dims[2] = lon_dim;
if (nc_def_var(ncid, "ncl_a3GVF", NC_DOUBLE, RANK_ncl_a3GVF, ncl_a3GVF_dims, &ncl_a3GVF_id)) ERR;
ncl_a3SF_dims[0] = time_dim;
ncl_a3SF_dims[1] = lat_dim;
ncl_a3SF_dims[2] = lon_dim;
if (nc_def_var(ncid, "ncl_a3SF", NC_DOUBLE, RANK_ncl_a3SF, ncl_a3SF_dims, &ncl_a3SF_id)) ERR;
ncl_a3SFSBC_dims[0] = time_dim;
ncl_a3SFSBC_dims[1] = lat_dim;
ncl_a3SFSBC_dims[2] = lon_dim;
if (nc_def_var(ncid, "ncl_a3SFSBC", NC_DOUBLE, RANK_ncl_a3SFSBC, ncl_a3SFSBC_dims, &ncl_a3SFSBC_id)) ERR;
ncl_a3SFSBS_dims[0] = time_dim;
ncl_a3SFSBS_dims[1] = lat_dim;
ncl_a3SFSBS_dims[2] = lon_dim;
if (nc_def_var(ncid, "ncl_a3SFSBS", NC_DOUBLE, RANK_ncl_a3SFSBS, ncl_a3SFSBS_dims, &ncl_a3SFSBS_id)) ERR;
ncl_a3SFSIC_dims[0] = time_dim;
ncl_a3SFSIC_dims[1] = lat_dim;
ncl_a3SFSIC_dims[2] = lon_dim;
if (nc_def_var(ncid, "ncl_a3SFSIC", NC_DOUBLE, RANK_ncl_a3SFSIC, ncl_a3SFSIC_dims, &ncl_a3SFSIC_id)) ERR;
ncl_a3SFSIS_dims[0] = time_dim;
ncl_a3SFSIS_dims[1] = lat_dim;
ncl_a3SFSIS_dims[2] = lon_dim;
if (nc_def_var(ncid, "ncl_a3SFSIS", NC_DOUBLE, RANK_ncl_a3SFSIS, ncl_a3SFSIS_dims, &ncl_a3SFSIS_id)) ERR;
ncl_a3SFWET_dims[0] = time_dim;
ncl_a3SFWET_dims[1] = lat_dim;
ncl_a3SFWET_dims[2] = lon_dim;
if (nc_def_var(ncid, "ncl_a3SFWET", NC_DOUBLE, RANK_ncl_a3SFWET, ncl_a3SFWET_dims, &ncl_a3SFWET_id)) ERR;
ncl_a3TBF_dims[0] = time_dim;
ncl_a3TBF_dims[1] = lat_dim;
ncl_a3TBF_dims[2] = lon_dim;
if (nc_def_var(ncid, "ncl_a3TBF", NC_DOUBLE, RANK_ncl_a3TBF, ncl_a3TBF_dims, &ncl_a3TBF_id)) ERR;
ncl_c1_dims[0] = time_dim;
ncl_c1_dims[1] = lev_dim;
ncl_c1_dims[2] = lat_dim;
ncl_c1_dims[3] = lon_dim;
if (nc_def_var(ncid, "ncl_c1", NC_DOUBLE, RANK_ncl_c1, ncl_c1_dims, &ncl_c1_id)) ERR;
ncl_c1DDF_dims[0] = time_dim;
ncl_c1DDF_dims[1] = lat_dim;
ncl_c1DDF_dims[2] = lon_dim;
if (nc_def_var(ncid, "ncl_c1DDF", NC_DOUBLE, RANK_ncl_c1DDF, ncl_c1DDF_dims, &ncl_c1DDF_id)) ERR;
ncl_c1GVF_dims[0] = time_dim;
ncl_c1GVF_dims[1] = lat_dim;
ncl_c1GVF_dims[2] = lon_dim;
if (nc_def_var(ncid, "ncl_c1GVF", NC_DOUBLE, RANK_ncl_c1GVF, ncl_c1GVF_dims, &ncl_c1GVF_id)) ERR;
ncl_c1SFSBC_dims[0] = time_dim;
ncl_c1SFSBC_dims[1] = lat_dim;
ncl_c1SFSBC_dims[2] = lon_dim;
if (nc_def_var(ncid, "ncl_c1SFSBC", NC_DOUBLE, RANK_ncl_c1SFSBC, ncl_c1SFSBC_dims, &ncl_c1SFSBC_id)) ERR;
ncl_c1SFSBS_dims[0] = time_dim;
ncl_c1SFSBS_dims[1] = lat_dim;
ncl_c1SFSBS_dims[2] = lon_dim;
if (nc_def_var(ncid, "ncl_c1SFSBS", NC_DOUBLE, RANK_ncl_c1SFSBS, ncl_c1SFSBS_dims, &ncl_c1SFSBS_id)) ERR;
ncl_c1SFSIC_dims[0] = time_dim;
ncl_c1SFSIC_dims[1] = lat_dim;
ncl_c1SFSIC_dims[2] = lon_dim;
if (nc_def_var(ncid, "ncl_c1SFSIC", NC_DOUBLE, RANK_ncl_c1SFSIC, ncl_c1SFSIC_dims, &ncl_c1SFSIC_id)) ERR;
ncl_c1SFSIS_dims[0] = time_dim;
ncl_c1SFSIS_dims[1] = lat_dim;
ncl_c1SFSIS_dims[2] = lon_dim;
if (nc_def_var(ncid, "ncl_c1SFSIS", NC_DOUBLE, RANK_ncl_c1SFSIS, ncl_c1SFSIS_dims, &ncl_c1SFSIS_id)) ERR;
ncl_c1SFWET_dims[0] = time_dim;
ncl_c1SFWET_dims[1] = lat_dim;
ncl_c1SFWET_dims[2] = lon_dim;
if (nc_def_var(ncid, "ncl_c1SFWET", NC_DOUBLE, RANK_ncl_c1SFWET, ncl_c1SFWET_dims, &ncl_c1SFWET_id)) ERR;
ncl_c1TBF_dims[0] = time_dim;
ncl_c1TBF_dims[1] = lat_dim;
ncl_c1TBF_dims[2] = lon_dim;
if (nc_def_var(ncid, "ncl_c1TBF", NC_DOUBLE, RANK_ncl_c1TBF, ncl_c1TBF_dims, &ncl_c1TBF_id)) ERR;
ncl_c1_sfcsiz3_dims[0] = time_dim;
ncl_c1_sfcsiz3_dims[1] = lat_dim;
ncl_c1_sfcsiz3_dims[2] = lon_dim;
if (nc_def_var(ncid, "ncl_c1_sfcsiz3", NC_DOUBLE, RANK_ncl_c1_sfcsiz3, ncl_c1_sfcsiz3_dims, &ncl_c1_sfcsiz3_id)) ERR;
ncl_c1_sfcsiz4_dims[0] = time_dim;
ncl_c1_sfcsiz4_dims[1] = lat_dim;
ncl_c1_sfcsiz4_dims[2] = lon_dim;
if (nc_def_var(ncid, "ncl_c1_sfcsiz4", NC_DOUBLE, RANK_ncl_c1_sfcsiz4, ncl_c1_sfcsiz4_dims, &ncl_c1_sfcsiz4_id)) ERR;
ncl_c1_sfgaex2_dims[0] = time_dim;
ncl_c1_sfgaex2_dims[1] = lat_dim;
ncl_c1_sfgaex2_dims[2] = lon_dim;
if (nc_def_var(ncid, "ncl_c1_sfgaex2", NC_DOUBLE, RANK_ncl_c1_sfgaex2, ncl_c1_sfgaex2_dims, &ncl_c1_sfgaex2_id)) ERR;
ncl_c2_dims[0] = time_dim;
ncl_c2_dims[1] = lev_dim;
ncl_c2_dims[2] = lat_dim;
ncl_c2_dims[3] = lon_dim;
if (nc_def_var(ncid, "ncl_c2", NC_DOUBLE, RANK_ncl_c2, ncl_c2_dims, &ncl_c2_id)) ERR;
ncl_c2DDF_dims[0] = time_dim;
ncl_c2DDF_dims[1] = lat_dim;
ncl_c2DDF_dims[2] = lon_dim;
if (nc_def_var(ncid, "ncl_c2DDF", NC_DOUBLE, RANK_ncl_c2DDF, ncl_c2DDF_dims, &ncl_c2DDF_id)) ERR;
ncl_c2GVF_dims[0] = time_dim;
ncl_c2GVF_dims[1] = lat_dim;
ncl_c2GVF_dims[2] = lon_dim;
if (nc_def_var(ncid, "ncl_c2GVF", NC_DOUBLE, RANK_ncl_c2GVF, ncl_c2GVF_dims, &ncl_c2GVF_id)) ERR;
ncl_c2SFSBC_dims[0] = time_dim;
ncl_c2SFSBC_dims[1] = lat_dim;
ncl_c2SFSBC_dims[2] = lon_dim;
if (nc_def_var(ncid, "ncl_c2SFSBC", NC_DOUBLE, RANK_ncl_c2SFSBC, ncl_c2SFSBC_dims, &ncl_c2SFSBC_id)) ERR;
ncl_c2SFSBS_dims[0] = time_dim;
ncl_c2SFSBS_dims[1] = lat_dim;
ncl_c2SFSBS_dims[2] = lon_dim;
if (nc_def_var(ncid, "ncl_c2SFSBS", NC_DOUBLE, RANK_ncl_c2SFSBS, ncl_c2SFSBS_dims, &ncl_c2SFSBS_id)) ERR;
ncl_c2SFSIC_dims[0] = time_dim;
ncl_c2SFSIC_dims[1] = lat_dim;
ncl_c2SFSIC_dims[2] = lon_dim;
if (nc_def_var(ncid, "ncl_c2SFSIC", NC_DOUBLE, RANK_ncl_c2SFSIC, ncl_c2SFSIC_dims, &ncl_c2SFSIC_id)) ERR;
ncl_c2SFSIS_dims[0] = time_dim;
ncl_c2SFSIS_dims[1] = lat_dim;
ncl_c2SFSIS_dims[2] = lon_dim;
if (nc_def_var(ncid, "ncl_c2SFSIS", NC_DOUBLE, RANK_ncl_c2SFSIS, ncl_c2SFSIS_dims, &ncl_c2SFSIS_id)) ERR;
ncl_c2SFWET_dims[0] = time_dim;
ncl_c2SFWET_dims[1] = lat_dim;
ncl_c2SFWET_dims[2] = lon_dim;
if (nc_def_var(ncid, "ncl_c2SFWET", NC_DOUBLE, RANK_ncl_c2SFWET, ncl_c2SFWET_dims, &ncl_c2SFWET_id)) ERR;
ncl_c2TBF_dims[0] = time_dim;
ncl_c2TBF_dims[1] = lat_dim;
ncl_c2TBF_dims[2] = lon_dim;
if (nc_def_var(ncid, "ncl_c2TBF", NC_DOUBLE, RANK_ncl_c2TBF, ncl_c2TBF_dims, &ncl_c2TBF_id)) ERR;
ncl_c2_sfcsiz3_dims[0] = time_dim;
ncl_c2_sfcsiz3_dims[1] = lat_dim;
ncl_c2_sfcsiz3_dims[2] = lon_dim;
if (nc_def_var(ncid, "ncl_c2_sfcsiz3", NC_DOUBLE, RANK_ncl_c2_sfcsiz3, ncl_c2_sfcsiz3_dims, &ncl_c2_sfcsiz3_id)) ERR;
ncl_c2_sfcsiz4_dims[0] = time_dim;
ncl_c2_sfcsiz4_dims[1] = lat_dim;
ncl_c2_sfcsiz4_dims[2] = lon_dim;
if (nc_def_var(ncid, "ncl_c2_sfcsiz4", NC_DOUBLE, RANK_ncl_c2_sfcsiz4, ncl_c2_sfcsiz4_dims, &ncl_c2_sfcsiz4_id)) ERR;
ncl_c2_sfgaex2_dims[0] = time_dim;
ncl_c2_sfgaex2_dims[1] = lat_dim;
ncl_c2_sfgaex2_dims[2] = lon_dim;
if (nc_def_var(ncid, "ncl_c2_sfgaex2", NC_DOUBLE, RANK_ncl_c2_sfgaex2, ncl_c2_sfgaex2_dims, &ncl_c2_sfgaex2_id)) ERR;
ncl_c3_dims[0] = time_dim;
ncl_c3_dims[1] = lev_dim;
ncl_c3_dims[2] = lat_dim;
ncl_c3_dims[3] = lon_dim;
if (nc_def_var(ncid, "ncl_c3", NC_DOUBLE, RANK_ncl_c3, ncl_c3_dims, &ncl_c3_id)) ERR;
ncl_c3DDF_dims[0] = time_dim;
ncl_c3DDF_dims[1] = lat_dim;
ncl_c3DDF_dims[2] = lon_dim;
if (nc_def_var(ncid, "ncl_c3DDF", NC_DOUBLE, RANK_ncl_c3DDF, ncl_c3DDF_dims, &ncl_c3DDF_id)) ERR;
ncl_c3GVF_dims[0] = time_dim;
ncl_c3GVF_dims[1] = lat_dim;
ncl_c3GVF_dims[2] = lon_dim;
if (nc_def_var(ncid, "ncl_c3GVF", NC_DOUBLE, RANK_ncl_c3GVF, ncl_c3GVF_dims, &ncl_c3GVF_id)) ERR;
ncl_c3SFSBC_dims[0] = time_dim;
ncl_c3SFSBC_dims[1] = lat_dim;
ncl_c3SFSBC_dims[2] = lon_dim;
if (nc_def_var(ncid, "ncl_c3SFSBC", NC_DOUBLE, RANK_ncl_c3SFSBC, ncl_c3SFSBC_dims, &ncl_c3SFSBC_id)) ERR;
ncl_c3SFSBS_dims[0] = time_dim;
ncl_c3SFSBS_dims[1] = lat_dim;
ncl_c3SFSBS_dims[2] = lon_dim;
if (nc_def_var(ncid, "ncl_c3SFSBS", NC_DOUBLE, RANK_ncl_c3SFSBS, ncl_c3SFSBS_dims, &ncl_c3SFSBS_id)) ERR;
ncl_c3SFSIC_dims[0] = time_dim;
ncl_c3SFSIC_dims[1] = lat_dim;
ncl_c3SFSIC_dims[2] = lon_dim;
if (nc_def_var(ncid, "ncl_c3SFSIC", NC_DOUBLE, RANK_ncl_c3SFSIC, ncl_c3SFSIC_dims, &ncl_c3SFSIC_id)) ERR;
ncl_c3SFSIS_dims[0] = time_dim;
ncl_c3SFSIS_dims[1] = lat_dim;
ncl_c3SFSIS_dims[2] = lon_dim;
if (nc_def_var(ncid, "ncl_c3SFSIS", NC_DOUBLE, RANK_ncl_c3SFSIS, ncl_c3SFSIS_dims, &ncl_c3SFSIS_id)) ERR;
ncl_c3SFWET_dims[0] = time_dim;
ncl_c3SFWET_dims[1] = lat_dim;
ncl_c3SFWET_dims[2] = lon_dim;
if (nc_def_var(ncid, "ncl_c3SFWET", NC_DOUBLE, RANK_ncl_c3SFWET, ncl_c3SFWET_dims, &ncl_c3SFWET_id)) ERR;
ncl_c3TBF_dims[0] = time_dim;
ncl_c3TBF_dims[1] = lat_dim;
ncl_c3TBF_dims[2] = lon_dim;
if (nc_def_var(ncid, "ncl_c3TBF", NC_DOUBLE, RANK_ncl_c3TBF, ncl_c3TBF_dims, &ncl_c3TBF_id)) ERR;
num_a1_dims[0] = time_dim;
num_a1_dims[1] = lev_dim;
num_a1_dims[2] = lat_dim;
num_a1_dims[3] = lon_dim;
if (nc_def_var(ncid, "num_a1", NC_DOUBLE, RANK_num_a1, num_a1_dims, &num_a1_id)) ERR;
num_a1DDF_dims[0] = time_dim;
num_a1DDF_dims[1] = lat_dim;
num_a1DDF_dims[2] = lon_dim;
if (nc_def_var(ncid, "num_a1DDF", NC_DOUBLE, RANK_num_a1DDF, num_a1DDF_dims, &num_a1DDF_id)) ERR;
num_a1GVF_dims[0] = time_dim;
num_a1GVF_dims[1] = lat_dim;
num_a1GVF_dims[2] = lon_dim;
if (nc_def_var(ncid, "num_a1GVF", NC_DOUBLE, RANK_num_a1GVF, num_a1GVF_dims, &num_a1GVF_id)) ERR;
num_a1SFSBC_dims[0] = time_dim;
num_a1SFSBC_dims[1] = lat_dim;
num_a1SFSBC_dims[2] = lon_dim;
if (nc_def_var(ncid, "num_a1SFSBC", NC_DOUBLE, RANK_num_a1SFSBC, num_a1SFSBC_dims, &num_a1SFSBC_id)) ERR;
num_a1SFSBS_dims[0] = time_dim;
num_a1SFSBS_dims[1] = lat_dim;
num_a1SFSBS_dims[2] = lon_dim;
if (nc_def_var(ncid, "num_a1SFSBS", NC_DOUBLE, RANK_num_a1SFSBS, num_a1SFSBS_dims, &num_a1SFSBS_id)) ERR;
num_a1SFSIC_dims[0] = time_dim;
num_a1SFSIC_dims[1] = lat_dim;
num_a1SFSIC_dims[2] = lon_dim;
if (nc_def_var(ncid, "num_a1SFSIC", NC_DOUBLE, RANK_num_a1SFSIC, num_a1SFSIC_dims, &num_a1SFSIC_id)) ERR;
num_a1SFSIS_dims[0] = time_dim;
num_a1SFSIS_dims[1] = lat_dim;
num_a1SFSIS_dims[2] = lon_dim;
if (nc_def_var(ncid, "num_a1SFSIS", NC_DOUBLE, RANK_num_a1SFSIS, num_a1SFSIS_dims, &num_a1SFSIS_id)) ERR;
num_a1SFWET_dims[0] = time_dim;
num_a1SFWET_dims[1] = lat_dim;
num_a1SFWET_dims[2] = lon_dim;
if (nc_def_var(ncid, "num_a1SFWET", NC_DOUBLE, RANK_num_a1SFWET, num_a1SFWET_dims, &num_a1SFWET_id)) ERR;
num_a1TBF_dims[0] = time_dim;
num_a1TBF_dims[1] = lat_dim;
num_a1TBF_dims[2] = lon_dim;
if (nc_def_var(ncid, "num_a1TBF", NC_DOUBLE, RANK_num_a1TBF, num_a1TBF_dims, &num_a1TBF_id)) ERR;
num_a1_CLXF_dims[0] = time_dim;
num_a1_CLXF_dims[1] = lat_dim;
num_a1_CLXF_dims[2] = lon_dim;
if (nc_def_var(ncid, "num_a1_CLXF", NC_DOUBLE, RANK_num_a1_CLXF, num_a1_CLXF_dims, &num_a1_CLXF_id)) ERR;
num_a1_XFRC_dims[0] = time_dim;
num_a1_XFRC_dims[1] = lev_dim;
num_a1_XFRC_dims[2] = lat_dim;
num_a1_XFRC_dims[3] = lon_dim;
if (nc_def_var(ncid, "num_a1_XFRC", NC_DOUBLE, RANK_num_a1_XFRC, num_a1_XFRC_dims, &num_a1_XFRC_id)) ERR;
num_a1_sfcoag1_dims[0] = time_dim;
num_a1_sfcoag1_dims[1] = lat_dim;
num_a1_sfcoag1_dims[2] = lon_dim;
if (nc_def_var(ncid, "num_a1_sfcoag1", NC_DOUBLE, RANK_num_a1_sfcoag1, num_a1_sfcoag1_dims, &num_a1_sfcoag1_id)) ERR;
num_a1_sfcsiz1_dims[0] = time_dim;
num_a1_sfcsiz1_dims[1] = lat_dim;
num_a1_sfcsiz1_dims[2] = lon_dim;
if (nc_def_var(ncid, "num_a1_sfcsiz1", NC_DOUBLE, RANK_num_a1_sfcsiz1, num_a1_sfcsiz1_dims, &num_a1_sfcsiz1_id)) ERR;
num_a1_sfcsiz2_dims[0] = time_dim;
num_a1_sfcsiz2_dims[1] = lat_dim;
num_a1_sfcsiz2_dims[2] = lon_dim;
if (nc_def_var(ncid, "num_a1_sfcsiz2", NC_DOUBLE, RANK_num_a1_sfcsiz2, num_a1_sfcsiz2_dims, &num_a1_sfcsiz2_id)) ERR;
num_a1_sfcsiz3_dims[0] = time_dim;
num_a1_sfcsiz3_dims[1] = lat_dim;
num_a1_sfcsiz3_dims[2] = lon_dim;
if (nc_def_var(ncid, "num_a1_sfcsiz3", NC_DOUBLE, RANK_num_a1_sfcsiz3, num_a1_sfcsiz3_dims, &num_a1_sfcsiz3_id)) ERR;
num_a1_sfcsiz4_dims[0] = time_dim;
num_a1_sfcsiz4_dims[1] = lat_dim;
num_a1_sfcsiz4_dims[2] = lon_dim;
if (nc_def_var(ncid, "num_a1_sfcsiz4", NC_DOUBLE, RANK_num_a1_sfcsiz4, num_a1_sfcsiz4_dims, &num_a1_sfcsiz4_id)) ERR;
num_a1_sfgaex2_dims[0] = time_dim;
num_a1_sfgaex2_dims[1] = lat_dim;
num_a1_sfgaex2_dims[2] = lon_dim;
if (nc_def_var(ncid, "num_a1_sfgaex2", NC_DOUBLE, RANK_num_a1_sfgaex2, num_a1_sfgaex2_dims, &num_a1_sfgaex2_id)) ERR;
num_a2_dims[0] = time_dim;
num_a2_dims[1] = lev_dim;
num_a2_dims[2] = lat_dim;
num_a2_dims[3] = lon_dim;
if (nc_def_var(ncid, "num_a2", NC_DOUBLE, RANK_num_a2, num_a2_dims, &num_a2_id)) ERR;
num_a2DDF_dims[0] = time_dim;
num_a2DDF_dims[1] = lat_dim;
num_a2DDF_dims[2] = lon_dim;
if (nc_def_var(ncid, "num_a2DDF", NC_DOUBLE, RANK_num_a2DDF, num_a2DDF_dims, &num_a2DDF_id)) ERR;
num_a2GVF_dims[0] = time_dim;
num_a2GVF_dims[1] = lat_dim;
num_a2GVF_dims[2] = lon_dim;
if (nc_def_var(ncid, "num_a2GVF", NC_DOUBLE, RANK_num_a2GVF, num_a2GVF_dims, &num_a2GVF_id)) ERR;
num_a2SFSBC_dims[0] = time_dim;
num_a2SFSBC_dims[1] = lat_dim;
num_a2SFSBC_dims[2] = lon_dim;
if (nc_def_var(ncid, "num_a2SFSBC", NC_DOUBLE, RANK_num_a2SFSBC, num_a2SFSBC_dims, &num_a2SFSBC_id)) ERR;
num_a2SFSBS_dims[0] = time_dim;
num_a2SFSBS_dims[1] = lat_dim;
num_a2SFSBS_dims[2] = lon_dim;
if (nc_def_var(ncid, "num_a2SFSBS", NC_DOUBLE, RANK_num_a2SFSBS, num_a2SFSBS_dims, &num_a2SFSBS_id)) ERR;
num_a2SFSIC_dims[0] = time_dim;
num_a2SFSIC_dims[1] = lat_dim;
num_a2SFSIC_dims[2] = lon_dim;
if (nc_def_var(ncid, "num_a2SFSIC", NC_DOUBLE, RANK_num_a2SFSIC, num_a2SFSIC_dims, &num_a2SFSIC_id)) ERR;
num_a2SFSIS_dims[0] = time_dim;
num_a2SFSIS_dims[1] = lat_dim;
num_a2SFSIS_dims[2] = lon_dim;
if (nc_def_var(ncid, "num_a2SFSIS", NC_DOUBLE, RANK_num_a2SFSIS, num_a2SFSIS_dims, &num_a2SFSIS_id)) ERR;
num_a2SFWET_dims[0] = time_dim;
num_a2SFWET_dims[1] = lat_dim;
num_a2SFWET_dims[2] = lon_dim;
if (nc_def_var(ncid, "num_a2SFWET", NC_DOUBLE, RANK_num_a2SFWET, num_a2SFWET_dims, &num_a2SFWET_id)) ERR;
num_a2TBF_dims[0] = time_dim;
num_a2TBF_dims[1] = lat_dim;
num_a2TBF_dims[2] = lon_dim;
if (nc_def_var(ncid, "num_a2TBF", NC_DOUBLE, RANK_num_a2TBF, num_a2TBF_dims, &num_a2TBF_id)) ERR;
num_a2_CLXF_dims[0] = time_dim;
num_a2_CLXF_dims[1] = lat_dim;
num_a2_CLXF_dims[2] = lon_dim;
if (nc_def_var(ncid, "num_a2_CLXF", NC_DOUBLE, RANK_num_a2_CLXF, num_a2_CLXF_dims, &num_a2_CLXF_id)) ERR;
num_a2_XFRC_dims[0] = time_dim;
num_a2_XFRC_dims[1] = lev_dim;
num_a2_XFRC_dims[2] = lat_dim;
num_a2_XFRC_dims[3] = lon_dim;
if (nc_def_var(ncid, "num_a2_XFRC", NC_DOUBLE, RANK_num_a2_XFRC, num_a2_XFRC_dims, &num_a2_XFRC_id)) ERR;
num_a2_sfcoag1_dims[0] = time_dim;
num_a2_sfcoag1_dims[1] = lat_dim;
num_a2_sfcoag1_dims[2] = lon_dim;
if (nc_def_var(ncid, "num_a2_sfcoag1", NC_DOUBLE, RANK_num_a2_sfcoag1, num_a2_sfcoag1_dims, &num_a2_sfcoag1_id)) ERR;
num_a2_sfcsiz1_dims[0] = time_dim;
num_a2_sfcsiz1_dims[1] = lat_dim;
num_a2_sfcsiz1_dims[2] = lon_dim;
if (nc_def_var(ncid, "num_a2_sfcsiz1", NC_DOUBLE, RANK_num_a2_sfcsiz1, num_a2_sfcsiz1_dims, &num_a2_sfcsiz1_id)) ERR;
num_a2_sfcsiz2_dims[0] = time_dim;
num_a2_sfcsiz2_dims[1] = lat_dim;
num_a2_sfcsiz2_dims[2] = lon_dim;
if (nc_def_var(ncid, "num_a2_sfcsiz2", NC_DOUBLE, RANK_num_a2_sfcsiz2, num_a2_sfcsiz2_dims, &num_a2_sfcsiz2_id)) ERR;
num_a2_sfcsiz3_dims[0] = time_dim;
num_a2_sfcsiz3_dims[1] = lat_dim;
num_a2_sfcsiz3_dims[2] = lon_dim;
if (nc_def_var(ncid, "num_a2_sfcsiz3", NC_DOUBLE, RANK_num_a2_sfcsiz3, num_a2_sfcsiz3_dims, &num_a2_sfcsiz3_id)) ERR;
num_a2_sfcsiz4_dims[0] = time_dim;
num_a2_sfcsiz4_dims[1] = lat_dim;
num_a2_sfcsiz4_dims[2] = lon_dim;
if (nc_def_var(ncid, "num_a2_sfcsiz4", NC_DOUBLE, RANK_num_a2_sfcsiz4, num_a2_sfcsiz4_dims, &num_a2_sfcsiz4_id)) ERR;
num_a2_sfgaex2_dims[0] = time_dim;
num_a2_sfgaex2_dims[1] = lat_dim;
num_a2_sfgaex2_dims[2] = lon_dim;
if (nc_def_var(ncid, "num_a2_sfgaex2", NC_DOUBLE, RANK_num_a2_sfgaex2, num_a2_sfgaex2_dims, &num_a2_sfgaex2_id)) ERR;
num_a2_sfnnuc1_dims[0] = time_dim;
num_a2_sfnnuc1_dims[1] = lat_dim;
num_a2_sfnnuc1_dims[2] = lon_dim;
if (nc_def_var(ncid, "num_a2_sfnnuc1", NC_DOUBLE, RANK_num_a2_sfnnuc1, num_a2_sfnnuc1_dims, &num_a2_sfnnuc1_id)) ERR;
num_a3_dims[0] = time_dim;
num_a3_dims[1] = lev_dim;
num_a3_dims[2] = lat_dim;
num_a3_dims[3] = lon_dim;
if (nc_def_var(ncid, "num_a3", NC_DOUBLE, RANK_num_a3, num_a3_dims, &num_a3_id)) ERR;
num_a3DDF_dims[0] = time_dim;
num_a3DDF_dims[1] = lat_dim;
num_a3DDF_dims[2] = lon_dim;
if (nc_def_var(ncid, "num_a3DDF", NC_DOUBLE, RANK_num_a3DDF, num_a3DDF_dims, &num_a3DDF_id)) ERR;
num_a3GVF_dims[0] = time_dim;
num_a3GVF_dims[1] = lat_dim;
num_a3GVF_dims[2] = lon_dim;
if (nc_def_var(ncid, "num_a3GVF", NC_DOUBLE, RANK_num_a3GVF, num_a3GVF_dims, &num_a3GVF_id)) ERR;
num_a3SFSBC_dims[0] = time_dim;
num_a3SFSBC_dims[1] = lat_dim;
num_a3SFSBC_dims[2] = lon_dim;
if (nc_def_var(ncid, "num_a3SFSBC", NC_DOUBLE, RANK_num_a3SFSBC, num_a3SFSBC_dims, &num_a3SFSBC_id)) ERR;
num_a3SFSBS_dims[0] = time_dim;
num_a3SFSBS_dims[1] = lat_dim;
num_a3SFSBS_dims[2] = lon_dim;
if (nc_def_var(ncid, "num_a3SFSBS", NC_DOUBLE, RANK_num_a3SFSBS, num_a3SFSBS_dims, &num_a3SFSBS_id)) ERR;
num_a3SFSIC_dims[0] = time_dim;
num_a3SFSIC_dims[1] = lat_dim;
num_a3SFSIC_dims[2] = lon_dim;
if (nc_def_var(ncid, "num_a3SFSIC", NC_DOUBLE, RANK_num_a3SFSIC, num_a3SFSIC_dims, &num_a3SFSIC_id)) ERR;
num_a3SFSIS_dims[0] = time_dim;
num_a3SFSIS_dims[1] = lat_dim;
num_a3SFSIS_dims[2] = lon_dim;
if (nc_def_var(ncid, "num_a3SFSIS", NC_DOUBLE, RANK_num_a3SFSIS, num_a3SFSIS_dims, &num_a3SFSIS_id)) ERR;
num_a3SFWET_dims[0] = time_dim;
num_a3SFWET_dims[1] = lat_dim;
num_a3SFWET_dims[2] = lon_dim;
if (nc_def_var(ncid, "num_a3SFWET", NC_DOUBLE, RANK_num_a3SFWET, num_a3SFWET_dims, &num_a3SFWET_id)) ERR;
num_a3TBF_dims[0] = time_dim;
num_a3TBF_dims[1] = lat_dim;
num_a3TBF_dims[2] = lon_dim;
if (nc_def_var(ncid, "num_a3TBF", NC_DOUBLE, RANK_num_a3TBF, num_a3TBF_dims, &num_a3TBF_id)) ERR;
num_a3_sfcsiz1_dims[0] = time_dim;
num_a3_sfcsiz1_dims[1] = lat_dim;
num_a3_sfcsiz1_dims[2] = lon_dim;
if (nc_def_var(ncid, "num_a3_sfcsiz1", NC_DOUBLE, RANK_num_a3_sfcsiz1, num_a3_sfcsiz1_dims, &num_a3_sfcsiz1_id)) ERR;
num_a3_sfcsiz2_dims[0] = time_dim;
num_a3_sfcsiz2_dims[1] = lat_dim;
num_a3_sfcsiz2_dims[2] = lon_dim;
if (nc_def_var(ncid, "num_a3_sfcsiz2", NC_DOUBLE, RANK_num_a3_sfcsiz2, num_a3_sfcsiz2_dims, &num_a3_sfcsiz2_id)) ERR;
num_c1_dims[0] = time_dim;
num_c1_dims[1] = lev_dim;
num_c1_dims[2] = lat_dim;
num_c1_dims[3] = lon_dim;
if (nc_def_var(ncid, "num_c1", NC_DOUBLE, RANK_num_c1, num_c1_dims, &num_c1_id)) ERR;
num_c1DDF_dims[0] = time_dim;
num_c1DDF_dims[1] = lat_dim;
num_c1DDF_dims[2] = lon_dim;
if (nc_def_var(ncid, "num_c1DDF", NC_DOUBLE, RANK_num_c1DDF, num_c1DDF_dims, &num_c1DDF_id)) ERR;
num_c1GVF_dims[0] = time_dim;
num_c1GVF_dims[1] = lat_dim;
num_c1GVF_dims[2] = lon_dim;
if (nc_def_var(ncid, "num_c1GVF", NC_DOUBLE, RANK_num_c1GVF, num_c1GVF_dims, &num_c1GVF_id)) ERR;
num_c1SFSBC_dims[0] = time_dim;
num_c1SFSBC_dims[1] = lat_dim;
num_c1SFSBC_dims[2] = lon_dim;
if (nc_def_var(ncid, "num_c1SFSBC", NC_DOUBLE, RANK_num_c1SFSBC, num_c1SFSBC_dims, &num_c1SFSBC_id)) ERR;
num_c1SFSBS_dims[0] = time_dim;
num_c1SFSBS_dims[1] = lat_dim;
num_c1SFSBS_dims[2] = lon_dim;
if (nc_def_var(ncid, "num_c1SFSBS", NC_DOUBLE, RANK_num_c1SFSBS, num_c1SFSBS_dims, &num_c1SFSBS_id)) ERR;
num_c1SFSIC_dims[0] = time_dim;
num_c1SFSIC_dims[1] = lat_dim;
num_c1SFSIC_dims[2] = lon_dim;
if (nc_def_var(ncid, "num_c1SFSIC", NC_DOUBLE, RANK_num_c1SFSIC, num_c1SFSIC_dims, &num_c1SFSIC_id)) ERR;
num_c1SFSIS_dims[0] = time_dim;
num_c1SFSIS_dims[1] = lat_dim;
num_c1SFSIS_dims[2] = lon_dim;
if (nc_def_var(ncid, "num_c1SFSIS", NC_DOUBLE, RANK_num_c1SFSIS, num_c1SFSIS_dims, &num_c1SFSIS_id)) ERR;
num_c1SFWET_dims[0] = time_dim;
num_c1SFWET_dims[1] = lat_dim;
num_c1SFWET_dims[2] = lon_dim;
if (nc_def_var(ncid, "num_c1SFWET", NC_DOUBLE, RANK_num_c1SFWET, num_c1SFWET_dims, &num_c1SFWET_id)) ERR;
num_c1TBF_dims[0] = time_dim;
num_c1TBF_dims[1] = lat_dim;
num_c1TBF_dims[2] = lon_dim;
if (nc_def_var(ncid, "num_c1TBF", NC_DOUBLE, RANK_num_c1TBF, num_c1TBF_dims, &num_c1TBF_id)) ERR;
num_c1_sfcsiz1_dims[0] = time_dim;
num_c1_sfcsiz1_dims[1] = lat_dim;
num_c1_sfcsiz1_dims[2] = lon_dim;
if (nc_def_var(ncid, "num_c1_sfcsiz1", NC_DOUBLE, RANK_num_c1_sfcsiz1, num_c1_sfcsiz1_dims, &num_c1_sfcsiz1_id)) ERR;
num_c1_sfcsiz2_dims[0] = time_dim;
num_c1_sfcsiz2_dims[1] = lat_dim;
num_c1_sfcsiz2_dims[2] = lon_dim;
if (nc_def_var(ncid, "num_c1_sfcsiz2", NC_DOUBLE, RANK_num_c1_sfcsiz2, num_c1_sfcsiz2_dims, &num_c1_sfcsiz2_id)) ERR;
num_c1_sfcsiz3_dims[0] = time_dim;
num_c1_sfcsiz3_dims[1] = lat_dim;
num_c1_sfcsiz3_dims[2] = lon_dim;
if (nc_def_var(ncid, "num_c1_sfcsiz3", NC_DOUBLE, RANK_num_c1_sfcsiz3, num_c1_sfcsiz3_dims, &num_c1_sfcsiz3_id)) ERR;
num_c1_sfcsiz4_dims[0] = time_dim;
num_c1_sfcsiz4_dims[1] = lat_dim;
num_c1_sfcsiz4_dims[2] = lon_dim;
if (nc_def_var(ncid, "num_c1_sfcsiz4", NC_DOUBLE, RANK_num_c1_sfcsiz4, num_c1_sfcsiz4_dims, &num_c1_sfcsiz4_id)) ERR;
num_c1_sfgaex2_dims[0] = time_dim;
num_c1_sfgaex2_dims[1] = lat_dim;
num_c1_sfgaex2_dims[2] = lon_dim;
if (nc_def_var(ncid, "num_c1_sfgaex2", NC_DOUBLE, RANK_num_c1_sfgaex2, num_c1_sfgaex2_dims, &num_c1_sfgaex2_id)) ERR;
num_c2_dims[0] = time_dim;
num_c2_dims[1] = lev_dim;
num_c2_dims[2] = lat_dim;
num_c2_dims[3] = lon_dim;
if (nc_def_var(ncid, "num_c2", NC_DOUBLE, RANK_num_c2, num_c2_dims, &num_c2_id)) ERR;
num_c2DDF_dims[0] = time_dim;
num_c2DDF_dims[1] = lat_dim;
num_c2DDF_dims[2] = lon_dim;
if (nc_def_var(ncid, "num_c2DDF", NC_DOUBLE, RANK_num_c2DDF, num_c2DDF_dims, &num_c2DDF_id)) ERR;
num_c2GVF_dims[0] = time_dim;
num_c2GVF_dims[1] = lat_dim;
num_c2GVF_dims[2] = lon_dim;
if (nc_def_var(ncid, "num_c2GVF", NC_DOUBLE, RANK_num_c2GVF, num_c2GVF_dims, &num_c2GVF_id)) ERR;
num_c2SFSBC_dims[0] = time_dim;
num_c2SFSBC_dims[1] = lat_dim;
num_c2SFSBC_dims[2] = lon_dim;
if (nc_def_var(ncid, "num_c2SFSBC", NC_DOUBLE, RANK_num_c2SFSBC, num_c2SFSBC_dims, &num_c2SFSBC_id)) ERR;
num_c2SFSBS_dims[0] = time_dim;
num_c2SFSBS_dims[1] = lat_dim;
num_c2SFSBS_dims[2] = lon_dim;
if (nc_def_var(ncid, "num_c2SFSBS", NC_DOUBLE, RANK_num_c2SFSBS, num_c2SFSBS_dims, &num_c2SFSBS_id)) ERR;
num_c2SFSIC_dims[0] = time_dim;
num_c2SFSIC_dims[1] = lat_dim;
num_c2SFSIC_dims[2] = lon_dim;
if (nc_def_var(ncid, "num_c2SFSIC", NC_DOUBLE, RANK_num_c2SFSIC, num_c2SFSIC_dims, &num_c2SFSIC_id)) ERR;
num_c2SFSIS_dims[0] = time_dim;
num_c2SFSIS_dims[1] = lat_dim;
num_c2SFSIS_dims[2] = lon_dim;
if (nc_def_var(ncid, "num_c2SFSIS", NC_DOUBLE, RANK_num_c2SFSIS, num_c2SFSIS_dims, &num_c2SFSIS_id)) ERR;
num_c2SFWET_dims[0] = time_dim;
num_c2SFWET_dims[1] = lat_dim;
num_c2SFWET_dims[2] = lon_dim;
if (nc_def_var(ncid, "num_c2SFWET", NC_DOUBLE, RANK_num_c2SFWET, num_c2SFWET_dims, &num_c2SFWET_id)) ERR;
num_c2TBF_dims[0] = time_dim;
num_c2TBF_dims[1] = lat_dim;
num_c2TBF_dims[2] = lon_dim;
if (nc_def_var(ncid, "num_c2TBF", NC_DOUBLE, RANK_num_c2TBF, num_c2TBF_dims, &num_c2TBF_id)) ERR;
num_c2_sfcsiz1_dims[0] = time_dim;
num_c2_sfcsiz1_dims[1] = lat_dim;
num_c2_sfcsiz1_dims[2] = lon_dim;
if (nc_def_var(ncid, "num_c2_sfcsiz1", NC_DOUBLE, RANK_num_c2_sfcsiz1, num_c2_sfcsiz1_dims, &num_c2_sfcsiz1_id)) ERR;
num_c2_sfcsiz2_dims[0] = time_dim;
num_c2_sfcsiz2_dims[1] = lat_dim;
num_c2_sfcsiz2_dims[2] = lon_dim;
if (nc_def_var(ncid, "num_c2_sfcsiz2", NC_DOUBLE, RANK_num_c2_sfcsiz2, num_c2_sfcsiz2_dims, &num_c2_sfcsiz2_id)) ERR;
num_c2_sfcsiz3_dims[0] = time_dim;
num_c2_sfcsiz3_dims[1] = lat_dim;
num_c2_sfcsiz3_dims[2] = lon_dim;
if (nc_def_var(ncid, "num_c2_sfcsiz3", NC_DOUBLE, RANK_num_c2_sfcsiz3, num_c2_sfcsiz3_dims, &num_c2_sfcsiz3_id)) ERR;
num_c2_sfcsiz4_dims[0] = time_dim;
num_c2_sfcsiz4_dims[1] = lat_dim;
num_c2_sfcsiz4_dims[2] = lon_dim;
if (nc_def_var(ncid, "num_c2_sfcsiz4", NC_DOUBLE, RANK_num_c2_sfcsiz4, num_c2_sfcsiz4_dims, &num_c2_sfcsiz4_id)) ERR;
num_c2_sfgaex2_dims[0] = time_dim;
num_c2_sfgaex2_dims[1] = lat_dim;
num_c2_sfgaex2_dims[2] = lon_dim;
if (nc_def_var(ncid, "num_c2_sfgaex2", NC_DOUBLE, RANK_num_c2_sfgaex2, num_c2_sfgaex2_dims, &num_c2_sfgaex2_id)) ERR;
num_c3_dims[0] = time_dim;
num_c3_dims[1] = lev_dim;
num_c3_dims[2] = lat_dim;
num_c3_dims[3] = lon_dim;
if (nc_def_var(ncid, "num_c3", NC_DOUBLE, RANK_num_c3, num_c3_dims, &num_c3_id)) ERR;
num_c3DDF_dims[0] = time_dim;
num_c3DDF_dims[1] = lat_dim;
num_c3DDF_dims[2] = lon_dim;
if (nc_def_var(ncid, "num_c3DDF", NC_DOUBLE, RANK_num_c3DDF, num_c3DDF_dims, &num_c3DDF_id)) ERR;
num_c3GVF_dims[0] = time_dim;
num_c3GVF_dims[1] = lat_dim;
num_c3GVF_dims[2] = lon_dim;
if (nc_def_var(ncid, "num_c3GVF", NC_DOUBLE, RANK_num_c3GVF, num_c3GVF_dims, &num_c3GVF_id)) ERR;
num_c3SFSBC_dims[0] = time_dim;
num_c3SFSBC_dims[1] = lat_dim;
num_c3SFSBC_dims[2] = lon_dim;
if (nc_def_var(ncid, "num_c3SFSBC", NC_DOUBLE, RANK_num_c3SFSBC, num_c3SFSBC_dims, &num_c3SFSBC_id)) ERR;
num_c3SFSBS_dims[0] = time_dim;
num_c3SFSBS_dims[1] = lat_dim;
num_c3SFSBS_dims[2] = lon_dim;
if (nc_def_var(ncid, "num_c3SFSBS", NC_DOUBLE, RANK_num_c3SFSBS, num_c3SFSBS_dims, &num_c3SFSBS_id)) ERR;
num_c3SFSIC_dims[0] = time_dim;
num_c3SFSIC_dims[1] = lat_dim;
num_c3SFSIC_dims[2] = lon_dim;
if (nc_def_var(ncid, "num_c3SFSIC", NC_DOUBLE, RANK_num_c3SFSIC, num_c3SFSIC_dims, &num_c3SFSIC_id)) ERR;
num_c3SFSIS_dims[0] = time_dim;
num_c3SFSIS_dims[1] = lat_dim;
num_c3SFSIS_dims[2] = lon_dim;
if (nc_def_var(ncid, "num_c3SFSIS", NC_DOUBLE, RANK_num_c3SFSIS, num_c3SFSIS_dims, &num_c3SFSIS_id)) ERR;
num_c3SFWET_dims[0] = time_dim;
num_c3SFWET_dims[1] = lat_dim;
num_c3SFWET_dims[2] = lon_dim;
if (nc_def_var(ncid, "num_c3SFWET", NC_DOUBLE, RANK_num_c3SFWET, num_c3SFWET_dims, &num_c3SFWET_id)) ERR;
num_c3TBF_dims[0] = time_dim;
num_c3TBF_dims[1] = lat_dim;
num_c3TBF_dims[2] = lon_dim;
if (nc_def_var(ncid, "num_c3TBF", NC_DOUBLE, RANK_num_c3TBF, num_c3TBF_dims, &num_c3TBF_id)) ERR;
num_c3_sfcsiz1_dims[0] = time_dim;
num_c3_sfcsiz1_dims[1] = lat_dim;
num_c3_sfcsiz1_dims[2] = lon_dim;
if (nc_def_var(ncid, "num_c3_sfcsiz1", NC_DOUBLE, RANK_num_c3_sfcsiz1, num_c3_sfcsiz1_dims, &num_c3_sfcsiz1_id)) ERR;
num_c3_sfcsiz2_dims[0] = time_dim;
num_c3_sfcsiz2_dims[1] = lat_dim;
num_c3_sfcsiz2_dims[2] = lon_dim;
if (nc_def_var(ncid, "num_c3_sfcsiz2", NC_DOUBLE, RANK_num_c3_sfcsiz2, num_c3_sfcsiz2_dims, &num_c3_sfcsiz2_id)) ERR;
pom_a1_dims[0] = time_dim;
pom_a1_dims[1] = lev_dim;
pom_a1_dims[2] = lat_dim;
pom_a1_dims[3] = lon_dim;
if (nc_def_var(ncid, "pom_a1", NC_DOUBLE, RANK_pom_a1, pom_a1_dims, &pom_a1_id)) ERR;
pom_a1DDF_dims[0] = time_dim;
pom_a1DDF_dims[1] = lat_dim;
pom_a1DDF_dims[2] = lon_dim;
if (nc_def_var(ncid, "pom_a1DDF", NC_DOUBLE, RANK_pom_a1DDF, pom_a1DDF_dims, &pom_a1DDF_id)) ERR;
pom_a1GVF_dims[0] = time_dim;
pom_a1GVF_dims[1] = lat_dim;
pom_a1GVF_dims[2] = lon_dim;
if (nc_def_var(ncid, "pom_a1GVF", NC_DOUBLE, RANK_pom_a1GVF, pom_a1GVF_dims, &pom_a1GVF_id)) ERR;
pom_a1SFSBC_dims[0] = time_dim;
pom_a1SFSBC_dims[1] = lat_dim;
pom_a1SFSBC_dims[2] = lon_dim;
if (nc_def_var(ncid, "pom_a1SFSBC", NC_DOUBLE, RANK_pom_a1SFSBC, pom_a1SFSBC_dims, &pom_a1SFSBC_id)) ERR;
pom_a1SFSBS_dims[0] = time_dim;
pom_a1SFSBS_dims[1] = lat_dim;
pom_a1SFSBS_dims[2] = lon_dim;
if (nc_def_var(ncid, "pom_a1SFSBS", NC_DOUBLE, RANK_pom_a1SFSBS, pom_a1SFSBS_dims, &pom_a1SFSBS_id)) ERR;
pom_a1SFSIC_dims[0] = time_dim;
pom_a1SFSIC_dims[1] = lat_dim;
pom_a1SFSIC_dims[2] = lon_dim;
if (nc_def_var(ncid, "pom_a1SFSIC", NC_DOUBLE, RANK_pom_a1SFSIC, pom_a1SFSIC_dims, &pom_a1SFSIC_id)) ERR;
pom_a1SFSIS_dims[0] = time_dim;
pom_a1SFSIS_dims[1] = lat_dim;
pom_a1SFSIS_dims[2] = lon_dim;
if (nc_def_var(ncid, "pom_a1SFSIS", NC_DOUBLE, RANK_pom_a1SFSIS, pom_a1SFSIS_dims, &pom_a1SFSIS_id)) ERR;
pom_a1SFWET_dims[0] = time_dim;
pom_a1SFWET_dims[1] = lat_dim;
pom_a1SFWET_dims[2] = lon_dim;
if (nc_def_var(ncid, "pom_a1SFWET", NC_DOUBLE, RANK_pom_a1SFWET, pom_a1SFWET_dims, &pom_a1SFWET_id)) ERR;
pom_a1TBF_dims[0] = time_dim;
pom_a1TBF_dims[1] = lat_dim;
pom_a1TBF_dims[2] = lon_dim;
if (nc_def_var(ncid, "pom_a1TBF", NC_DOUBLE, RANK_pom_a1TBF, pom_a1TBF_dims, &pom_a1TBF_id)) ERR;
pom_a1_CLXF_dims[0] = time_dim;
pom_a1_CLXF_dims[1] = lat_dim;
pom_a1_CLXF_dims[2] = lon_dim;
if (nc_def_var(ncid, "pom_a1_CLXF", NC_DOUBLE, RANK_pom_a1_CLXF, pom_a1_CLXF_dims, &pom_a1_CLXF_id)) ERR;
pom_a1_XFRC_dims[0] = time_dim;
pom_a1_XFRC_dims[1] = lev_dim;
pom_a1_XFRC_dims[2] = lat_dim;
pom_a1_XFRC_dims[3] = lon_dim;
if (nc_def_var(ncid, "pom_a1_XFRC", NC_DOUBLE, RANK_pom_a1_XFRC, pom_a1_XFRC_dims, &pom_a1_XFRC_id)) ERR;
pom_c1_dims[0] = time_dim;
pom_c1_dims[1] = lev_dim;
pom_c1_dims[2] = lat_dim;
pom_c1_dims[3] = lon_dim;
if (nc_def_var(ncid, "pom_c1", NC_DOUBLE, RANK_pom_c1, pom_c1_dims, &pom_c1_id)) ERR;
pom_c1DDF_dims[0] = time_dim;
pom_c1DDF_dims[1] = lat_dim;
pom_c1DDF_dims[2] = lon_dim;
if (nc_def_var(ncid, "pom_c1DDF", NC_DOUBLE, RANK_pom_c1DDF, pom_c1DDF_dims, &pom_c1DDF_id)) ERR;
pom_c1GVF_dims[0] = time_dim;
pom_c1GVF_dims[1] = lat_dim;
pom_c1GVF_dims[2] = lon_dim;
if (nc_def_var(ncid, "pom_c1GVF", NC_DOUBLE, RANK_pom_c1GVF, pom_c1GVF_dims, &pom_c1GVF_id)) ERR;
pom_c1SFSBC_dims[0] = time_dim;
pom_c1SFSBC_dims[1] = lat_dim;
pom_c1SFSBC_dims[2] = lon_dim;
if (nc_def_var(ncid, "pom_c1SFSBC", NC_DOUBLE, RANK_pom_c1SFSBC, pom_c1SFSBC_dims, &pom_c1SFSBC_id)) ERR;
pom_c1SFSBS_dims[0] = time_dim;
pom_c1SFSBS_dims[1] = lat_dim;
pom_c1SFSBS_dims[2] = lon_dim;
if (nc_def_var(ncid, "pom_c1SFSBS", NC_DOUBLE, RANK_pom_c1SFSBS, pom_c1SFSBS_dims, &pom_c1SFSBS_id)) ERR;
pom_c1SFSIC_dims[0] = time_dim;
pom_c1SFSIC_dims[1] = lat_dim;
pom_c1SFSIC_dims[2] = lon_dim;
if (nc_def_var(ncid, "pom_c1SFSIC", NC_DOUBLE, RANK_pom_c1SFSIC, pom_c1SFSIC_dims, &pom_c1SFSIC_id)) ERR;
pom_c1SFSIS_dims[0] = time_dim;
pom_c1SFSIS_dims[1] = lat_dim;
pom_c1SFSIS_dims[2] = lon_dim;
if (nc_def_var(ncid, "pom_c1SFSIS", NC_DOUBLE, RANK_pom_c1SFSIS, pom_c1SFSIS_dims, &pom_c1SFSIS_id)) ERR;
pom_c1SFWET_dims[0] = time_dim;
pom_c1SFWET_dims[1] = lat_dim;
pom_c1SFWET_dims[2] = lon_dim;
if (nc_def_var(ncid, "pom_c1SFWET", NC_DOUBLE, RANK_pom_c1SFWET, pom_c1SFWET_dims, &pom_c1SFWET_id)) ERR;
pom_c1TBF_dims[0] = time_dim;
pom_c1TBF_dims[1] = lat_dim;
pom_c1TBF_dims[2] = lon_dim;
if (nc_def_var(ncid, "pom_c1TBF", NC_DOUBLE, RANK_pom_c1TBF, pom_c1TBF_dims, &pom_c1TBF_id)) ERR;
so4_a1_dims[0] = time_dim;
so4_a1_dims[1] = lev_dim;
so4_a1_dims[2] = lat_dim;
so4_a1_dims[3] = lon_dim;
if (nc_def_var(ncid, "so4_a1", NC_DOUBLE, RANK_so4_a1, so4_a1_dims, &so4_a1_id)) ERR;
so4_a1DDF_dims[0] = time_dim;
so4_a1DDF_dims[1] = lat_dim;
so4_a1DDF_dims[2] = lon_dim;
if (nc_def_var(ncid, "so4_a1DDF", NC_DOUBLE, RANK_so4_a1DDF, so4_a1DDF_dims, &so4_a1DDF_id)) ERR;
so4_a1GVF_dims[0] = time_dim;
so4_a1GVF_dims[1] = lat_dim;
so4_a1GVF_dims[2] = lon_dim;
if (nc_def_var(ncid, "so4_a1GVF", NC_DOUBLE, RANK_so4_a1GVF, so4_a1GVF_dims, &so4_a1GVF_id)) ERR;
so4_a1SFSBC_dims[0] = time_dim;
so4_a1SFSBC_dims[1] = lat_dim;
so4_a1SFSBC_dims[2] = lon_dim;
if (nc_def_var(ncid, "so4_a1SFSBC", NC_DOUBLE, RANK_so4_a1SFSBC, so4_a1SFSBC_dims, &so4_a1SFSBC_id)) ERR;
so4_a1SFSBS_dims[0] = time_dim;
so4_a1SFSBS_dims[1] = lat_dim;
so4_a1SFSBS_dims[2] = lon_dim;
if (nc_def_var(ncid, "so4_a1SFSBS", NC_DOUBLE, RANK_so4_a1SFSBS, so4_a1SFSBS_dims, &so4_a1SFSBS_id)) ERR;
so4_a1SFSIC_dims[0] = time_dim;
so4_a1SFSIC_dims[1] = lat_dim;
so4_a1SFSIC_dims[2] = lon_dim;
if (nc_def_var(ncid, "so4_a1SFSIC", NC_DOUBLE, RANK_so4_a1SFSIC, so4_a1SFSIC_dims, &so4_a1SFSIC_id)) ERR;
so4_a1SFSIS_dims[0] = time_dim;
so4_a1SFSIS_dims[1] = lat_dim;
so4_a1SFSIS_dims[2] = lon_dim;
if (nc_def_var(ncid, "so4_a1SFSIS", NC_DOUBLE, RANK_so4_a1SFSIS, so4_a1SFSIS_dims, &so4_a1SFSIS_id)) ERR;
so4_a1SFWET_dims[0] = time_dim;
so4_a1SFWET_dims[1] = lat_dim;
so4_a1SFWET_dims[2] = lon_dim;
if (nc_def_var(ncid, "so4_a1SFWET", NC_DOUBLE, RANK_so4_a1SFWET, so4_a1SFWET_dims, &so4_a1SFWET_id)) ERR;
so4_a1TBF_dims[0] = time_dim;
so4_a1TBF_dims[1] = lat_dim;
so4_a1TBF_dims[2] = lon_dim;
if (nc_def_var(ncid, "so4_a1TBF", NC_DOUBLE, RANK_so4_a1TBF, so4_a1TBF_dims, &so4_a1TBF_id)) ERR;
so4_a1_CLXF_dims[0] = time_dim;
so4_a1_CLXF_dims[1] = lat_dim;
so4_a1_CLXF_dims[2] = lon_dim;
if (nc_def_var(ncid, "so4_a1_CLXF", NC_DOUBLE, RANK_so4_a1_CLXF, so4_a1_CLXF_dims, &so4_a1_CLXF_id)) ERR;
so4_a1_XFRC_dims[0] = time_dim;
so4_a1_XFRC_dims[1] = lev_dim;
so4_a1_XFRC_dims[2] = lat_dim;
so4_a1_XFRC_dims[3] = lon_dim;
if (nc_def_var(ncid, "so4_a1_XFRC", NC_DOUBLE, RANK_so4_a1_XFRC, so4_a1_XFRC_dims, &so4_a1_XFRC_id)) ERR;
so4_a1_sfcoag1_dims[0] = time_dim;
so4_a1_sfcoag1_dims[1] = lat_dim;
so4_a1_sfcoag1_dims[2] = lon_dim;
if (nc_def_var(ncid, "so4_a1_sfcoag1", NC_DOUBLE, RANK_so4_a1_sfcoag1, so4_a1_sfcoag1_dims, &so4_a1_sfcoag1_id)) ERR;
so4_a1_sfcsiz3_dims[0] = time_dim;
so4_a1_sfcsiz3_dims[1] = lat_dim;
so4_a1_sfcsiz3_dims[2] = lon_dim;
if (nc_def_var(ncid, "so4_a1_sfcsiz3", NC_DOUBLE, RANK_so4_a1_sfcsiz3, so4_a1_sfcsiz3_dims, &so4_a1_sfcsiz3_id)) ERR;
so4_a1_sfcsiz4_dims[0] = time_dim;
so4_a1_sfcsiz4_dims[1] = lat_dim;
so4_a1_sfcsiz4_dims[2] = lon_dim;
if (nc_def_var(ncid, "so4_a1_sfcsiz4", NC_DOUBLE, RANK_so4_a1_sfcsiz4, so4_a1_sfcsiz4_dims, &so4_a1_sfcsiz4_id)) ERR;
so4_a1_sfgaex1_dims[0] = time_dim;
so4_a1_sfgaex1_dims[1] = lat_dim;
so4_a1_sfgaex1_dims[2] = lon_dim;
if (nc_def_var(ncid, "so4_a1_sfgaex1", NC_DOUBLE, RANK_so4_a1_sfgaex1, so4_a1_sfgaex1_dims, &so4_a1_sfgaex1_id)) ERR;
so4_a1_sfgaex2_dims[0] = time_dim;
so4_a1_sfgaex2_dims[1] = lat_dim;
so4_a1_sfgaex2_dims[2] = lon_dim;
if (nc_def_var(ncid, "so4_a1_sfgaex2", NC_DOUBLE, RANK_so4_a1_sfgaex2, so4_a1_sfgaex2_dims, &so4_a1_sfgaex2_id)) ERR;
so4_a2_dims[0] = time_dim;
so4_a2_dims[1] = lev_dim;
so4_a2_dims[2] = lat_dim;
so4_a2_dims[3] = lon_dim;
if (nc_def_var(ncid, "so4_a2", NC_DOUBLE, RANK_so4_a2, so4_a2_dims, &so4_a2_id)) ERR;
so4_a2DDF_dims[0] = time_dim;
so4_a2DDF_dims[1] = lat_dim;
so4_a2DDF_dims[2] = lon_dim;
if (nc_def_var(ncid, "so4_a2DDF", NC_DOUBLE, RANK_so4_a2DDF, so4_a2DDF_dims, &so4_a2DDF_id)) ERR;
so4_a2GVF_dims[0] = time_dim;
so4_a2GVF_dims[1] = lat_dim;
so4_a2GVF_dims[2] = lon_dim;
if (nc_def_var(ncid, "so4_a2GVF", NC_DOUBLE, RANK_so4_a2GVF, so4_a2GVF_dims, &so4_a2GVF_id)) ERR;
so4_a2SFSBC_dims[0] = time_dim;
so4_a2SFSBC_dims[1] = lat_dim;
so4_a2SFSBC_dims[2] = lon_dim;
if (nc_def_var(ncid, "so4_a2SFSBC", NC_DOUBLE, RANK_so4_a2SFSBC, so4_a2SFSBC_dims, &so4_a2SFSBC_id)) ERR;
so4_a2SFSBS_dims[0] = time_dim;
so4_a2SFSBS_dims[1] = lat_dim;
so4_a2SFSBS_dims[2] = lon_dim;
if (nc_def_var(ncid, "so4_a2SFSBS", NC_DOUBLE, RANK_so4_a2SFSBS, so4_a2SFSBS_dims, &so4_a2SFSBS_id)) ERR;
so4_a2SFSIC_dims[0] = time_dim;
so4_a2SFSIC_dims[1] = lat_dim;
so4_a2SFSIC_dims[2] = lon_dim;
if (nc_def_var(ncid, "so4_a2SFSIC", NC_DOUBLE, RANK_so4_a2SFSIC, so4_a2SFSIC_dims, &so4_a2SFSIC_id)) ERR;
so4_a2SFSIS_dims[0] = time_dim;
so4_a2SFSIS_dims[1] = lat_dim;
so4_a2SFSIS_dims[2] = lon_dim;
if (nc_def_var(ncid, "so4_a2SFSIS", NC_DOUBLE, RANK_so4_a2SFSIS, so4_a2SFSIS_dims, &so4_a2SFSIS_id)) ERR;
so4_a2SFWET_dims[0] = time_dim;
so4_a2SFWET_dims[1] = lat_dim;
so4_a2SFWET_dims[2] = lon_dim;
if (nc_def_var(ncid, "so4_a2SFWET", NC_DOUBLE, RANK_so4_a2SFWET, so4_a2SFWET_dims, &so4_a2SFWET_id)) ERR;
so4_a2TBF_dims[0] = time_dim;
so4_a2TBF_dims[1] = lat_dim;
so4_a2TBF_dims[2] = lon_dim;
if (nc_def_var(ncid, "so4_a2TBF", NC_DOUBLE, RANK_so4_a2TBF, so4_a2TBF_dims, &so4_a2TBF_id)) ERR;
so4_a2_CLXF_dims[0] = time_dim;
so4_a2_CLXF_dims[1] = lat_dim;
so4_a2_CLXF_dims[2] = lon_dim;
if (nc_def_var(ncid, "so4_a2_CLXF", NC_DOUBLE, RANK_so4_a2_CLXF, so4_a2_CLXF_dims, &so4_a2_CLXF_id)) ERR;
so4_a2_XFRC_dims[0] = time_dim;
so4_a2_XFRC_dims[1] = lev_dim;
so4_a2_XFRC_dims[2] = lat_dim;
so4_a2_XFRC_dims[3] = lon_dim;
if (nc_def_var(ncid, "so4_a2_XFRC", NC_DOUBLE, RANK_so4_a2_XFRC, so4_a2_XFRC_dims, &so4_a2_XFRC_id)) ERR;
so4_a2_sfcoag1_dims[0] = time_dim;
so4_a2_sfcoag1_dims[1] = lat_dim;
so4_a2_sfcoag1_dims[2] = lon_dim;
if (nc_def_var(ncid, "so4_a2_sfcoag1", NC_DOUBLE, RANK_so4_a2_sfcoag1, so4_a2_sfcoag1_dims, &so4_a2_sfcoag1_id)) ERR;
so4_a2_sfcsiz3_dims[0] = time_dim;
so4_a2_sfcsiz3_dims[1] = lat_dim;
so4_a2_sfcsiz3_dims[2] = lon_dim;
if (nc_def_var(ncid, "so4_a2_sfcsiz3", NC_DOUBLE, RANK_so4_a2_sfcsiz3, so4_a2_sfcsiz3_dims, &so4_a2_sfcsiz3_id)) ERR;
so4_a2_sfcsiz4_dims[0] = time_dim;
so4_a2_sfcsiz4_dims[1] = lat_dim;
so4_a2_sfcsiz4_dims[2] = lon_dim;
if (nc_def_var(ncid, "so4_a2_sfcsiz4", NC_DOUBLE, RANK_so4_a2_sfcsiz4, so4_a2_sfcsiz4_dims, &so4_a2_sfcsiz4_id)) ERR;
so4_a2_sfgaex1_dims[0] = time_dim;
so4_a2_sfgaex1_dims[1] = lat_dim;
so4_a2_sfgaex1_dims[2] = lon_dim;
if (nc_def_var(ncid, "so4_a2_sfgaex1", NC_DOUBLE, RANK_so4_a2_sfgaex1, so4_a2_sfgaex1_dims, &so4_a2_sfgaex1_id)) ERR;
so4_a2_sfgaex2_dims[0] = time_dim;
so4_a2_sfgaex2_dims[1] = lat_dim;
so4_a2_sfgaex2_dims[2] = lon_dim;
if (nc_def_var(ncid, "so4_a2_sfgaex2", NC_DOUBLE, RANK_so4_a2_sfgaex2, so4_a2_sfgaex2_dims, &so4_a2_sfgaex2_id)) ERR;
so4_a2_sfnnuc1_dims[0] = time_dim;
so4_a2_sfnnuc1_dims[1] = lat_dim;
so4_a2_sfnnuc1_dims[2] = lon_dim;
if (nc_def_var(ncid, "so4_a2_sfnnuc1", NC_DOUBLE, RANK_so4_a2_sfnnuc1, so4_a2_sfnnuc1_dims, &so4_a2_sfnnuc1_id)) ERR;
so4_a3_dims[0] = time_dim;
so4_a3_dims[1] = lev_dim;
so4_a3_dims[2] = lat_dim;
so4_a3_dims[3] = lon_dim;
if (nc_def_var(ncid, "so4_a3", NC_DOUBLE, RANK_so4_a3, so4_a3_dims, &so4_a3_id)) ERR;
so4_a3DDF_dims[0] = time_dim;
so4_a3DDF_dims[1] = lat_dim;
so4_a3DDF_dims[2] = lon_dim;
if (nc_def_var(ncid, "so4_a3DDF", NC_DOUBLE, RANK_so4_a3DDF, so4_a3DDF_dims, &so4_a3DDF_id)) ERR;
so4_a3GVF_dims[0] = time_dim;
so4_a3GVF_dims[1] = lat_dim;
so4_a3GVF_dims[2] = lon_dim;
if (nc_def_var(ncid, "so4_a3GVF", NC_DOUBLE, RANK_so4_a3GVF, so4_a3GVF_dims, &so4_a3GVF_id)) ERR;
so4_a3SFSBC_dims[0] = time_dim;
so4_a3SFSBC_dims[1] = lat_dim;
so4_a3SFSBC_dims[2] = lon_dim;
if (nc_def_var(ncid, "so4_a3SFSBC", NC_DOUBLE, RANK_so4_a3SFSBC, so4_a3SFSBC_dims, &so4_a3SFSBC_id)) ERR;
so4_a3SFSBS_dims[0] = time_dim;
so4_a3SFSBS_dims[1] = lat_dim;
so4_a3SFSBS_dims[2] = lon_dim;
if (nc_def_var(ncid, "so4_a3SFSBS", NC_DOUBLE, RANK_so4_a3SFSBS, so4_a3SFSBS_dims, &so4_a3SFSBS_id)) ERR;
so4_a3SFSIC_dims[0] = time_dim;
so4_a3SFSIC_dims[1] = lat_dim;
so4_a3SFSIC_dims[2] = lon_dim;
if (nc_def_var(ncid, "so4_a3SFSIC", NC_DOUBLE, RANK_so4_a3SFSIC, so4_a3SFSIC_dims, &so4_a3SFSIC_id)) ERR;
so4_a3SFSIS_dims[0] = time_dim;
so4_a3SFSIS_dims[1] = lat_dim;
so4_a3SFSIS_dims[2] = lon_dim;
if (nc_def_var(ncid, "so4_a3SFSIS", NC_DOUBLE, RANK_so4_a3SFSIS, so4_a3SFSIS_dims, &so4_a3SFSIS_id)) ERR;
so4_a3SFWET_dims[0] = time_dim;
so4_a3SFWET_dims[1] = lat_dim;
so4_a3SFWET_dims[2] = lon_dim;
if (nc_def_var(ncid, "so4_a3SFWET", NC_DOUBLE, RANK_so4_a3SFWET, so4_a3SFWET_dims, &so4_a3SFWET_id)) ERR;
so4_a3TBF_dims[0] = time_dim;
so4_a3TBF_dims[1] = lat_dim;
so4_a3TBF_dims[2] = lon_dim;
if (nc_def_var(ncid, "so4_a3TBF", NC_DOUBLE, RANK_so4_a3TBF, so4_a3TBF_dims, &so4_a3TBF_id)) ERR;
so4_a3_sfgaex1_dims[0] = time_dim;
so4_a3_sfgaex1_dims[1] = lat_dim;
so4_a3_sfgaex1_dims[2] = lon_dim;
if (nc_def_var(ncid, "so4_a3_sfgaex1", NC_DOUBLE, RANK_so4_a3_sfgaex1, so4_a3_sfgaex1_dims, &so4_a3_sfgaex1_id)) ERR;
so4_c1_dims[0] = time_dim;
so4_c1_dims[1] = lev_dim;
so4_c1_dims[2] = lat_dim;
so4_c1_dims[3] = lon_dim;
if (nc_def_var(ncid, "so4_c1", NC_DOUBLE, RANK_so4_c1, so4_c1_dims, &so4_c1_id)) ERR;
so4_c1AQH2SO4_dims[0] = time_dim;
so4_c1AQH2SO4_dims[1] = lat_dim;
so4_c1AQH2SO4_dims[2] = lon_dim;
if (nc_def_var(ncid, "so4_c1AQH2SO4", NC_DOUBLE, RANK_so4_c1AQH2SO4, so4_c1AQH2SO4_dims, &so4_c1AQH2SO4_id)) ERR;
so4_c1AQSO4_dims[0] = time_dim;
so4_c1AQSO4_dims[1] = lat_dim;
so4_c1AQSO4_dims[2] = lon_dim;
if (nc_def_var(ncid, "so4_c1AQSO4", NC_DOUBLE, RANK_so4_c1AQSO4, so4_c1AQSO4_dims, &so4_c1AQSO4_id)) ERR;
so4_c1DDF_dims[0] = time_dim;
so4_c1DDF_dims[1] = lat_dim;
so4_c1DDF_dims[2] = lon_dim;
if (nc_def_var(ncid, "so4_c1DDF", NC_DOUBLE, RANK_so4_c1DDF, so4_c1DDF_dims, &so4_c1DDF_id)) ERR;
so4_c1GVF_dims[0] = time_dim;
so4_c1GVF_dims[1] = lat_dim;
so4_c1GVF_dims[2] = lon_dim;
if (nc_def_var(ncid, "so4_c1GVF", NC_DOUBLE, RANK_so4_c1GVF, so4_c1GVF_dims, &so4_c1GVF_id)) ERR;
so4_c1SFSBC_dims[0] = time_dim;
so4_c1SFSBC_dims[1] = lat_dim;
so4_c1SFSBC_dims[2] = lon_dim;
if (nc_def_var(ncid, "so4_c1SFSBC", NC_DOUBLE, RANK_so4_c1SFSBC, so4_c1SFSBC_dims, &so4_c1SFSBC_id)) ERR;
so4_c1SFSBS_dims[0] = time_dim;
so4_c1SFSBS_dims[1] = lat_dim;
so4_c1SFSBS_dims[2] = lon_dim;
if (nc_def_var(ncid, "so4_c1SFSBS", NC_DOUBLE, RANK_so4_c1SFSBS, so4_c1SFSBS_dims, &so4_c1SFSBS_id)) ERR;
so4_c1SFSIC_dims[0] = time_dim;
so4_c1SFSIC_dims[1] = lat_dim;
so4_c1SFSIC_dims[2] = lon_dim;
if (nc_def_var(ncid, "so4_c1SFSIC", NC_DOUBLE, RANK_so4_c1SFSIC, so4_c1SFSIC_dims, &so4_c1SFSIC_id)) ERR;
so4_c1SFSIS_dims[0] = time_dim;
so4_c1SFSIS_dims[1] = lat_dim;
so4_c1SFSIS_dims[2] = lon_dim;
if (nc_def_var(ncid, "so4_c1SFSIS", NC_DOUBLE, RANK_so4_c1SFSIS, so4_c1SFSIS_dims, &so4_c1SFSIS_id)) ERR;
so4_c1SFWET_dims[0] = time_dim;
so4_c1SFWET_dims[1] = lat_dim;
so4_c1SFWET_dims[2] = lon_dim;
if (nc_def_var(ncid, "so4_c1SFWET", NC_DOUBLE, RANK_so4_c1SFWET, so4_c1SFWET_dims, &so4_c1SFWET_id)) ERR;
so4_c1TBF_dims[0] = time_dim;
so4_c1TBF_dims[1] = lat_dim;
so4_c1TBF_dims[2] = lon_dim;
if (nc_def_var(ncid, "so4_c1TBF", NC_DOUBLE, RANK_so4_c1TBF, so4_c1TBF_dims, &so4_c1TBF_id)) ERR;
so4_c1_sfcsiz3_dims[0] = time_dim;
so4_c1_sfcsiz3_dims[1] = lat_dim;
so4_c1_sfcsiz3_dims[2] = lon_dim;
if (nc_def_var(ncid, "so4_c1_sfcsiz3", NC_DOUBLE, RANK_so4_c1_sfcsiz3, so4_c1_sfcsiz3_dims, &so4_c1_sfcsiz3_id)) ERR;
so4_c1_sfcsiz4_dims[0] = time_dim;
so4_c1_sfcsiz4_dims[1] = lat_dim;
so4_c1_sfcsiz4_dims[2] = lon_dim;
if (nc_def_var(ncid, "so4_c1_sfcsiz4", NC_DOUBLE, RANK_so4_c1_sfcsiz4, so4_c1_sfcsiz4_dims, &so4_c1_sfcsiz4_id)) ERR;
so4_c1_sfgaex2_dims[0] = time_dim;
so4_c1_sfgaex2_dims[1] = lat_dim;
so4_c1_sfgaex2_dims[2] = lon_dim;
if (nc_def_var(ncid, "so4_c1_sfgaex2", NC_DOUBLE, RANK_so4_c1_sfgaex2, so4_c1_sfgaex2_dims, &so4_c1_sfgaex2_id)) ERR;
so4_c2_dims[0] = time_dim;
so4_c2_dims[1] = lev_dim;
so4_c2_dims[2] = lat_dim;
so4_c2_dims[3] = lon_dim;
if (nc_def_var(ncid, "so4_c2", NC_DOUBLE, RANK_so4_c2, so4_c2_dims, &so4_c2_id)) ERR;
so4_c2AQH2SO4_dims[0] = time_dim;
so4_c2AQH2SO4_dims[1] = lat_dim;
so4_c2AQH2SO4_dims[2] = lon_dim;
if (nc_def_var(ncid, "so4_c2AQH2SO4", NC_DOUBLE, RANK_so4_c2AQH2SO4, so4_c2AQH2SO4_dims, &so4_c2AQH2SO4_id)) ERR;
so4_c2AQSO4_dims[0] = time_dim;
so4_c2AQSO4_dims[1] = lat_dim;
so4_c2AQSO4_dims[2] = lon_dim;
if (nc_def_var(ncid, "so4_c2AQSO4", NC_DOUBLE, RANK_so4_c2AQSO4, so4_c2AQSO4_dims, &so4_c2AQSO4_id)) ERR;
so4_c2DDF_dims[0] = time_dim;
so4_c2DDF_dims[1] = lat_dim;
so4_c2DDF_dims[2] = lon_dim;
if (nc_def_var(ncid, "so4_c2DDF", NC_DOUBLE, RANK_so4_c2DDF, so4_c2DDF_dims, &so4_c2DDF_id)) ERR;
so4_c2GVF_dims[0] = time_dim;
so4_c2GVF_dims[1] = lat_dim;
so4_c2GVF_dims[2] = lon_dim;
if (nc_def_var(ncid, "so4_c2GVF", NC_DOUBLE, RANK_so4_c2GVF, so4_c2GVF_dims, &so4_c2GVF_id)) ERR;
so4_c2SFSBC_dims[0] = time_dim;
so4_c2SFSBC_dims[1] = lat_dim;
so4_c2SFSBC_dims[2] = lon_dim;
if (nc_def_var(ncid, "so4_c2SFSBC", NC_DOUBLE, RANK_so4_c2SFSBC, so4_c2SFSBC_dims, &so4_c2SFSBC_id)) ERR;
so4_c2SFSBS_dims[0] = time_dim;
so4_c2SFSBS_dims[1] = lat_dim;
so4_c2SFSBS_dims[2] = lon_dim;
if (nc_def_var(ncid, "so4_c2SFSBS", NC_DOUBLE, RANK_so4_c2SFSBS, so4_c2SFSBS_dims, &so4_c2SFSBS_id)) ERR;
so4_c2SFSIC_dims[0] = time_dim;
so4_c2SFSIC_dims[1] = lat_dim;
so4_c2SFSIC_dims[2] = lon_dim;
if (nc_def_var(ncid, "so4_c2SFSIC", NC_DOUBLE, RANK_so4_c2SFSIC, so4_c2SFSIC_dims, &so4_c2SFSIC_id)) ERR;
so4_c2SFSIS_dims[0] = time_dim;
so4_c2SFSIS_dims[1] = lat_dim;
so4_c2SFSIS_dims[2] = lon_dim;
if (nc_def_var(ncid, "so4_c2SFSIS", NC_DOUBLE, RANK_so4_c2SFSIS, so4_c2SFSIS_dims, &so4_c2SFSIS_id)) ERR;
so4_c2SFWET_dims[0] = time_dim;
so4_c2SFWET_dims[1] = lat_dim;
so4_c2SFWET_dims[2] = lon_dim;
if (nc_def_var(ncid, "so4_c2SFWET", NC_DOUBLE, RANK_so4_c2SFWET, so4_c2SFWET_dims, &so4_c2SFWET_id)) ERR;
so4_c2TBF_dims[0] = time_dim;
so4_c2TBF_dims[1] = lat_dim;
so4_c2TBF_dims[2] = lon_dim;
if (nc_def_var(ncid, "so4_c2TBF", NC_DOUBLE, RANK_so4_c2TBF, so4_c2TBF_dims, &so4_c2TBF_id)) ERR;
so4_c2_sfcsiz3_dims[0] = time_dim;
so4_c2_sfcsiz3_dims[1] = lat_dim;
so4_c2_sfcsiz3_dims[2] = lon_dim;
if (nc_def_var(ncid, "so4_c2_sfcsiz3", NC_DOUBLE, RANK_so4_c2_sfcsiz3, so4_c2_sfcsiz3_dims, &so4_c2_sfcsiz3_id)) ERR;
so4_c2_sfcsiz4_dims[0] = time_dim;
so4_c2_sfcsiz4_dims[1] = lat_dim;
so4_c2_sfcsiz4_dims[2] = lon_dim;
if (nc_def_var(ncid, "so4_c2_sfcsiz4", NC_DOUBLE, RANK_so4_c2_sfcsiz4, so4_c2_sfcsiz4_dims, &so4_c2_sfcsiz4_id)) ERR;
so4_c2_sfgaex2_dims[0] = time_dim;
so4_c2_sfgaex2_dims[1] = lat_dim;
so4_c2_sfgaex2_dims[2] = lon_dim;
if (nc_def_var(ncid, "so4_c2_sfgaex2", NC_DOUBLE, RANK_so4_c2_sfgaex2, so4_c2_sfgaex2_dims, &so4_c2_sfgaex2_id)) ERR;
so4_c3_dims[0] = time_dim;
so4_c3_dims[1] = lev_dim;
so4_c3_dims[2] = lat_dim;
so4_c3_dims[3] = lon_dim;
if (nc_def_var(ncid, "so4_c3", NC_DOUBLE, RANK_so4_c3, so4_c3_dims, &so4_c3_id)) ERR;
so4_c3AQH2SO4_dims[0] = time_dim;
so4_c3AQH2SO4_dims[1] = lat_dim;
so4_c3AQH2SO4_dims[2] = lon_dim;
if (nc_def_var(ncid, "so4_c3AQH2SO4", NC_DOUBLE, RANK_so4_c3AQH2SO4, so4_c3AQH2SO4_dims, &so4_c3AQH2SO4_id)) ERR;
so4_c3AQSO4_dims[0] = time_dim;
so4_c3AQSO4_dims[1] = lat_dim;
so4_c3AQSO4_dims[2] = lon_dim;
if (nc_def_var(ncid, "so4_c3AQSO4", NC_DOUBLE, RANK_so4_c3AQSO4, so4_c3AQSO4_dims, &so4_c3AQSO4_id)) ERR;
so4_c3DDF_dims[0] = time_dim;
so4_c3DDF_dims[1] = lat_dim;
so4_c3DDF_dims[2] = lon_dim;
if (nc_def_var(ncid, "so4_c3DDF", NC_DOUBLE, RANK_so4_c3DDF, so4_c3DDF_dims, &so4_c3DDF_id)) ERR;
so4_c3GVF_dims[0] = time_dim;
so4_c3GVF_dims[1] = lat_dim;
so4_c3GVF_dims[2] = lon_dim;
if (nc_def_var(ncid, "so4_c3GVF", NC_DOUBLE, RANK_so4_c3GVF, so4_c3GVF_dims, &so4_c3GVF_id)) ERR;
so4_c3SFSBC_dims[0] = time_dim;
so4_c3SFSBC_dims[1] = lat_dim;
so4_c3SFSBC_dims[2] = lon_dim;
if (nc_def_var(ncid, "so4_c3SFSBC", NC_DOUBLE, RANK_so4_c3SFSBC, so4_c3SFSBC_dims, &so4_c3SFSBC_id)) ERR;
so4_c3SFSBS_dims[0] = time_dim;
so4_c3SFSBS_dims[1] = lat_dim;
so4_c3SFSBS_dims[2] = lon_dim;
if (nc_def_var(ncid, "so4_c3SFSBS", NC_DOUBLE, RANK_so4_c3SFSBS, so4_c3SFSBS_dims, &so4_c3SFSBS_id)) ERR;
so4_c3SFSIC_dims[0] = time_dim;
so4_c3SFSIC_dims[1] = lat_dim;
so4_c3SFSIC_dims[2] = lon_dim;
if (nc_def_var(ncid, "so4_c3SFSIC", NC_DOUBLE, RANK_so4_c3SFSIC, so4_c3SFSIC_dims, &so4_c3SFSIC_id)) ERR;
so4_c3SFSIS_dims[0] = time_dim;
so4_c3SFSIS_dims[1] = lat_dim;
so4_c3SFSIS_dims[2] = lon_dim;
if (nc_def_var(ncid, "so4_c3SFSIS", NC_DOUBLE, RANK_so4_c3SFSIS, so4_c3SFSIS_dims, &so4_c3SFSIS_id)) ERR;
so4_c3SFWET_dims[0] = time_dim;
so4_c3SFWET_dims[1] = lat_dim;
so4_c3SFWET_dims[2] = lon_dim;
if (nc_def_var(ncid, "so4_c3SFWET", NC_DOUBLE, RANK_so4_c3SFWET, so4_c3SFWET_dims, &so4_c3SFWET_id)) ERR;
so4_c3TBF_dims[0] = time_dim;
so4_c3TBF_dims[1] = lat_dim;
so4_c3TBF_dims[2] = lon_dim;
if (nc_def_var(ncid, "so4_c3TBF", NC_DOUBLE, RANK_so4_c3TBF, so4_c3TBF_dims, &so4_c3TBF_id)) ERR;
soa_a1_dims[0] = time_dim;
soa_a1_dims[1] = lev_dim;
soa_a1_dims[2] = lat_dim;
soa_a1_dims[3] = lon_dim;
if (nc_def_var(ncid, "soa_a1", NC_DOUBLE, RANK_soa_a1, soa_a1_dims, &soa_a1_id)) ERR;
soa_a1DDF_dims[0] = time_dim;
soa_a1DDF_dims[1] = lat_dim;
soa_a1DDF_dims[2] = lon_dim;
if (nc_def_var(ncid, "soa_a1DDF", NC_DOUBLE, RANK_soa_a1DDF, soa_a1DDF_dims, &soa_a1DDF_id)) ERR;
soa_a1GVF_dims[0] = time_dim;
soa_a1GVF_dims[1] = lat_dim;
soa_a1GVF_dims[2] = lon_dim;
if (nc_def_var(ncid, "soa_a1GVF", NC_DOUBLE, RANK_soa_a1GVF, soa_a1GVF_dims, &soa_a1GVF_id)) ERR;
soa_a1SFSBC_dims[0] = time_dim;
soa_a1SFSBC_dims[1] = lat_dim;
soa_a1SFSBC_dims[2] = lon_dim;
if (nc_def_var(ncid, "soa_a1SFSBC", NC_DOUBLE, RANK_soa_a1SFSBC, soa_a1SFSBC_dims, &soa_a1SFSBC_id)) ERR;
soa_a1SFSBS_dims[0] = time_dim;
soa_a1SFSBS_dims[1] = lat_dim;
soa_a1SFSBS_dims[2] = lon_dim;
if (nc_def_var(ncid, "soa_a1SFSBS", NC_DOUBLE, RANK_soa_a1SFSBS, soa_a1SFSBS_dims, &soa_a1SFSBS_id)) ERR;
soa_a1SFSIC_dims[0] = time_dim;
soa_a1SFSIC_dims[1] = lat_dim;
soa_a1SFSIC_dims[2] = lon_dim;
if (nc_def_var(ncid, "soa_a1SFSIC", NC_DOUBLE, RANK_soa_a1SFSIC, soa_a1SFSIC_dims, &soa_a1SFSIC_id)) ERR;
soa_a1SFSIS_dims[0] = time_dim;
soa_a1SFSIS_dims[1] = lat_dim;
soa_a1SFSIS_dims[2] = lon_dim;
if (nc_def_var(ncid, "soa_a1SFSIS", NC_DOUBLE, RANK_soa_a1SFSIS, soa_a1SFSIS_dims, &soa_a1SFSIS_id)) ERR;
soa_a1SFWET_dims[0] = time_dim;
soa_a1SFWET_dims[1] = lat_dim;
soa_a1SFWET_dims[2] = lon_dim;
if (nc_def_var(ncid, "soa_a1SFWET", NC_DOUBLE, RANK_soa_a1SFWET, soa_a1SFWET_dims, &soa_a1SFWET_id)) ERR;
soa_a1TBF_dims[0] = time_dim;
soa_a1TBF_dims[1] = lat_dim;
soa_a1TBF_dims[2] = lon_dim;
if (nc_def_var(ncid, "soa_a1TBF", NC_DOUBLE, RANK_soa_a1TBF, soa_a1TBF_dims, &soa_a1TBF_id)) ERR;
soa_a1_sfcoag1_dims[0] = time_dim;
soa_a1_sfcoag1_dims[1] = lat_dim;
soa_a1_sfcoag1_dims[2] = lon_dim;
if (nc_def_var(ncid, "soa_a1_sfcoag1", NC_DOUBLE, RANK_soa_a1_sfcoag1, soa_a1_sfcoag1_dims, &soa_a1_sfcoag1_id)) ERR;
soa_a1_sfcsiz3_dims[0] = time_dim;
soa_a1_sfcsiz3_dims[1] = lat_dim;
soa_a1_sfcsiz3_dims[2] = lon_dim;
if (nc_def_var(ncid, "soa_a1_sfcsiz3", NC_DOUBLE, RANK_soa_a1_sfcsiz3, soa_a1_sfcsiz3_dims, &soa_a1_sfcsiz3_id)) ERR;
soa_a1_sfcsiz4_dims[0] = time_dim;
soa_a1_sfcsiz4_dims[1] = lat_dim;
soa_a1_sfcsiz4_dims[2] = lon_dim;
if (nc_def_var(ncid, "soa_a1_sfcsiz4", NC_DOUBLE, RANK_soa_a1_sfcsiz4, soa_a1_sfcsiz4_dims, &soa_a1_sfcsiz4_id)) ERR;
soa_a1_sfgaex1_dims[0] = time_dim;
soa_a1_sfgaex1_dims[1] = lat_dim;
soa_a1_sfgaex1_dims[2] = lon_dim;
if (nc_def_var(ncid, "soa_a1_sfgaex1", NC_DOUBLE, RANK_soa_a1_sfgaex1, soa_a1_sfgaex1_dims, &soa_a1_sfgaex1_id)) ERR;
soa_a1_sfgaex2_dims[0] = time_dim;
soa_a1_sfgaex2_dims[1] = lat_dim;
soa_a1_sfgaex2_dims[2] = lon_dim;
if (nc_def_var(ncid, "soa_a1_sfgaex2", NC_DOUBLE, RANK_soa_a1_sfgaex2, soa_a1_sfgaex2_dims, &soa_a1_sfgaex2_id)) ERR;
soa_a2_dims[0] = time_dim;
soa_a2_dims[1] = lev_dim;
soa_a2_dims[2] = lat_dim;
soa_a2_dims[3] = lon_dim;
if (nc_def_var(ncid, "soa_a2", NC_DOUBLE, RANK_soa_a2, soa_a2_dims, &soa_a2_id)) ERR;
soa_a2DDF_dims[0] = time_dim;
soa_a2DDF_dims[1] = lat_dim;
soa_a2DDF_dims[2] = lon_dim;
if (nc_def_var(ncid, "soa_a2DDF", NC_DOUBLE, RANK_soa_a2DDF, soa_a2DDF_dims, &soa_a2DDF_id)) ERR;
soa_a2GVF_dims[0] = time_dim;
soa_a2GVF_dims[1] = lat_dim;
soa_a2GVF_dims[2] = lon_dim;
if (nc_def_var(ncid, "soa_a2GVF", NC_DOUBLE, RANK_soa_a2GVF, soa_a2GVF_dims, &soa_a2GVF_id)) ERR;
soa_a2SFSBC_dims[0] = time_dim;
soa_a2SFSBC_dims[1] = lat_dim;
soa_a2SFSBC_dims[2] = lon_dim;
if (nc_def_var(ncid, "soa_a2SFSBC", NC_DOUBLE, RANK_soa_a2SFSBC, soa_a2SFSBC_dims, &soa_a2SFSBC_id)) ERR;
soa_a2SFSBS_dims[0] = time_dim;
soa_a2SFSBS_dims[1] = lat_dim;
soa_a2SFSBS_dims[2] = lon_dim;
if (nc_def_var(ncid, "soa_a2SFSBS", NC_DOUBLE, RANK_soa_a2SFSBS, soa_a2SFSBS_dims, &soa_a2SFSBS_id)) ERR;
soa_a2SFSIC_dims[0] = time_dim;
soa_a2SFSIC_dims[1] = lat_dim;
soa_a2SFSIC_dims[2] = lon_dim;
if (nc_def_var(ncid, "soa_a2SFSIC", NC_DOUBLE, RANK_soa_a2SFSIC, soa_a2SFSIC_dims, &soa_a2SFSIC_id)) ERR;
soa_a2SFSIS_dims[0] = time_dim;
soa_a2SFSIS_dims[1] = lat_dim;
soa_a2SFSIS_dims[2] = lon_dim;
if (nc_def_var(ncid, "soa_a2SFSIS", NC_DOUBLE, RANK_soa_a2SFSIS, soa_a2SFSIS_dims, &soa_a2SFSIS_id)) ERR;
soa_a2SFWET_dims[0] = time_dim;
soa_a2SFWET_dims[1] = lat_dim;
soa_a2SFWET_dims[2] = lon_dim;
if (nc_def_var(ncid, "soa_a2SFWET", NC_DOUBLE, RANK_soa_a2SFWET, soa_a2SFWET_dims, &soa_a2SFWET_id)) ERR;
soa_a2TBF_dims[0] = time_dim;
soa_a2TBF_dims[1] = lat_dim;
soa_a2TBF_dims[2] = lon_dim;
if (nc_def_var(ncid, "soa_a2TBF", NC_DOUBLE, RANK_soa_a2TBF, soa_a2TBF_dims, &soa_a2TBF_id)) ERR;
soa_a2_sfcoag1_dims[0] = time_dim;
soa_a2_sfcoag1_dims[1] = lat_dim;
soa_a2_sfcoag1_dims[2] = lon_dim;
if (nc_def_var(ncid, "soa_a2_sfcoag1", NC_DOUBLE, RANK_soa_a2_sfcoag1, soa_a2_sfcoag1_dims, &soa_a2_sfcoag1_id)) ERR;
soa_a2_sfcsiz3_dims[0] = time_dim;
soa_a2_sfcsiz3_dims[1] = lat_dim;
soa_a2_sfcsiz3_dims[2] = lon_dim;
if (nc_def_var(ncid, "soa_a2_sfcsiz3", NC_DOUBLE, RANK_soa_a2_sfcsiz3, soa_a2_sfcsiz3_dims, &soa_a2_sfcsiz3_id)) ERR;
soa_a2_sfcsiz4_dims[0] = time_dim;
soa_a2_sfcsiz4_dims[1] = lat_dim;
soa_a2_sfcsiz4_dims[2] = lon_dim;
if (nc_def_var(ncid, "soa_a2_sfcsiz4", NC_DOUBLE, RANK_soa_a2_sfcsiz4, soa_a2_sfcsiz4_dims, &soa_a2_sfcsiz4_id)) ERR;
soa_a2_sfgaex1_dims[0] = time_dim;
soa_a2_sfgaex1_dims[1] = lat_dim;
soa_a2_sfgaex1_dims[2] = lon_dim;
if (nc_def_var(ncid, "soa_a2_sfgaex1", NC_DOUBLE, RANK_soa_a2_sfgaex1, soa_a2_sfgaex1_dims, &soa_a2_sfgaex1_id)) ERR;
soa_a2_sfgaex2_dims[0] = time_dim;
soa_a2_sfgaex2_dims[1] = lat_dim;
soa_a2_sfgaex2_dims[2] = lon_dim;
if (nc_def_var(ncid, "soa_a2_sfgaex2", NC_DOUBLE, RANK_soa_a2_sfgaex2, soa_a2_sfgaex2_dims, &soa_a2_sfgaex2_id)) ERR;
soa_c1_dims[0] = time_dim;
soa_c1_dims[1] = lev_dim;
soa_c1_dims[2] = lat_dim;
soa_c1_dims[3] = lon_dim;
if (nc_def_var(ncid, "soa_c1", NC_DOUBLE, RANK_soa_c1, soa_c1_dims, &soa_c1_id)) ERR;
soa_c1DDF_dims[0] = time_dim;
soa_c1DDF_dims[1] = lat_dim;
soa_c1DDF_dims[2] = lon_dim;
if (nc_def_var(ncid, "soa_c1DDF", NC_DOUBLE, RANK_soa_c1DDF, soa_c1DDF_dims, &soa_c1DDF_id)) ERR;
soa_c1GVF_dims[0] = time_dim;
soa_c1GVF_dims[1] = lat_dim;
soa_c1GVF_dims[2] = lon_dim;
if (nc_def_var(ncid, "soa_c1GVF", NC_DOUBLE, RANK_soa_c1GVF, soa_c1GVF_dims, &soa_c1GVF_id)) ERR;
soa_c1SFSBC_dims[0] = time_dim;
soa_c1SFSBC_dims[1] = lat_dim;
soa_c1SFSBC_dims[2] = lon_dim;
if (nc_def_var(ncid, "soa_c1SFSBC", NC_DOUBLE, RANK_soa_c1SFSBC, soa_c1SFSBC_dims, &soa_c1SFSBC_id)) ERR;
soa_c1SFSBS_dims[0] = time_dim;
soa_c1SFSBS_dims[1] = lat_dim;
soa_c1SFSBS_dims[2] = lon_dim;
if (nc_def_var(ncid, "soa_c1SFSBS", NC_DOUBLE, RANK_soa_c1SFSBS, soa_c1SFSBS_dims, &soa_c1SFSBS_id)) ERR;
soa_c1SFSIC_dims[0] = time_dim;
soa_c1SFSIC_dims[1] = lat_dim;
soa_c1SFSIC_dims[2] = lon_dim;
if (nc_def_var(ncid, "soa_c1SFSIC", NC_DOUBLE, RANK_soa_c1SFSIC, soa_c1SFSIC_dims, &soa_c1SFSIC_id)) ERR;
soa_c1SFSIS_dims[0] = time_dim;
soa_c1SFSIS_dims[1] = lat_dim;
soa_c1SFSIS_dims[2] = lon_dim;
if (nc_def_var(ncid, "soa_c1SFSIS", NC_DOUBLE, RANK_soa_c1SFSIS, soa_c1SFSIS_dims, &soa_c1SFSIS_id)) ERR;
soa_c1SFWET_dims[0] = time_dim;
soa_c1SFWET_dims[1] = lat_dim;
soa_c1SFWET_dims[2] = lon_dim;
if (nc_def_var(ncid, "soa_c1SFWET", NC_DOUBLE, RANK_soa_c1SFWET, soa_c1SFWET_dims, &soa_c1SFWET_id)) ERR;
soa_c1TBF_dims[0] = time_dim;
soa_c1TBF_dims[1] = lat_dim;
soa_c1TBF_dims[2] = lon_dim;
if (nc_def_var(ncid, "soa_c1TBF", NC_DOUBLE, RANK_soa_c1TBF, soa_c1TBF_dims, &soa_c1TBF_id)) ERR;
soa_c1_sfcsiz3_dims[0] = time_dim;
soa_c1_sfcsiz3_dims[1] = lat_dim;
soa_c1_sfcsiz3_dims[2] = lon_dim;
if (nc_def_var(ncid, "soa_c1_sfcsiz3", NC_DOUBLE, RANK_soa_c1_sfcsiz3, soa_c1_sfcsiz3_dims, &soa_c1_sfcsiz3_id)) ERR;
soa_c1_sfcsiz4_dims[0] = time_dim;
soa_c1_sfcsiz4_dims[1] = lat_dim;
soa_c1_sfcsiz4_dims[2] = lon_dim;
if (nc_def_var(ncid, "soa_c1_sfcsiz4", NC_DOUBLE, RANK_soa_c1_sfcsiz4, soa_c1_sfcsiz4_dims, &soa_c1_sfcsiz4_id)) ERR;
soa_c1_sfgaex2_dims[0] = time_dim;
soa_c1_sfgaex2_dims[1] = lat_dim;
soa_c1_sfgaex2_dims[2] = lon_dim;
if (nc_def_var(ncid, "soa_c1_sfgaex2", NC_DOUBLE, RANK_soa_c1_sfgaex2, soa_c1_sfgaex2_dims, &soa_c1_sfgaex2_id)) ERR;
soa_c2_dims[0] = time_dim;
soa_c2_dims[1] = lev_dim;
soa_c2_dims[2] = lat_dim;
soa_c2_dims[3] = lon_dim;
if (nc_def_var(ncid, "soa_c2", NC_DOUBLE, RANK_soa_c2, soa_c2_dims, &soa_c2_id)) ERR;
soa_c2DDF_dims[0] = time_dim;
soa_c2DDF_dims[1] = lat_dim;
soa_c2DDF_dims[2] = lon_dim;
if (nc_def_var(ncid, "soa_c2DDF", NC_DOUBLE, RANK_soa_c2DDF, soa_c2DDF_dims, &soa_c2DDF_id)) ERR;
soa_c2GVF_dims[0] = time_dim;
soa_c2GVF_dims[1] = lat_dim;
soa_c2GVF_dims[2] = lon_dim;
if (nc_def_var(ncid, "soa_c2GVF", NC_DOUBLE, RANK_soa_c2GVF, soa_c2GVF_dims, &soa_c2GVF_id)) ERR;
soa_c2SFSBC_dims[0] = time_dim;
soa_c2SFSBC_dims[1] = lat_dim;
soa_c2SFSBC_dims[2] = lon_dim;
if (nc_def_var(ncid, "soa_c2SFSBC", NC_DOUBLE, RANK_soa_c2SFSBC, soa_c2SFSBC_dims, &soa_c2SFSBC_id)) ERR;
soa_c2SFSBS_dims[0] = time_dim;
soa_c2SFSBS_dims[1] = lat_dim;
soa_c2SFSBS_dims[2] = lon_dim;
if (nc_def_var(ncid, "soa_c2SFSBS", NC_DOUBLE, RANK_soa_c2SFSBS, soa_c2SFSBS_dims, &soa_c2SFSBS_id)) ERR;
soa_c2SFSIC_dims[0] = time_dim;
soa_c2SFSIC_dims[1] = lat_dim;
soa_c2SFSIC_dims[2] = lon_dim;
if (nc_def_var(ncid, "soa_c2SFSIC", NC_DOUBLE, RANK_soa_c2SFSIC, soa_c2SFSIC_dims, &soa_c2SFSIC_id)) ERR;
soa_c2SFSIS_dims[0] = time_dim;
soa_c2SFSIS_dims[1] = lat_dim;
soa_c2SFSIS_dims[2] = lon_dim;
if (nc_def_var(ncid, "soa_c2SFSIS", NC_DOUBLE, RANK_soa_c2SFSIS, soa_c2SFSIS_dims, &soa_c2SFSIS_id)) ERR;
soa_c2SFWET_dims[0] = time_dim;
soa_c2SFWET_dims[1] = lat_dim;
soa_c2SFWET_dims[2] = lon_dim;
if (nc_def_var(ncid, "soa_c2SFWET", NC_DOUBLE, RANK_soa_c2SFWET, soa_c2SFWET_dims, &soa_c2SFWET_id)) ERR;
soa_c2TBF_dims[0] = time_dim;
soa_c2TBF_dims[1] = lat_dim;
soa_c2TBF_dims[2] = lon_dim;
if (nc_def_var(ncid, "soa_c2TBF", NC_DOUBLE, RANK_soa_c2TBF, soa_c2TBF_dims, &soa_c2TBF_id)) ERR;
soa_c2_sfcsiz3_dims[0] = time_dim;
soa_c2_sfcsiz3_dims[1] = lat_dim;
soa_c2_sfcsiz3_dims[2] = lon_dim;
if (nc_def_var(ncid, "soa_c2_sfcsiz3", NC_DOUBLE, RANK_soa_c2_sfcsiz3, soa_c2_sfcsiz3_dims, &soa_c2_sfcsiz3_id)) ERR;
soa_c2_sfcsiz4_dims[0] = time_dim;
soa_c2_sfcsiz4_dims[1] = lat_dim;
soa_c2_sfcsiz4_dims[2] = lon_dim;
if (nc_def_var(ncid, "soa_c2_sfcsiz4", NC_DOUBLE, RANK_soa_c2_sfcsiz4, soa_c2_sfcsiz4_dims, &soa_c2_sfcsiz4_id)) ERR;
soa_c2_sfgaex2_dims[0] = time_dim;
soa_c2_sfgaex2_dims[1] = lat_dim;
soa_c2_sfgaex2_dims[2] = lon_dim;
if (nc_def_var(ncid, "soa_c2_sfgaex2", NC_DOUBLE, RANK_soa_c2_sfgaex2, soa_c2_sfgaex2_dims, &soa_c2_sfgaex2_id)) ERR;
wat_a1_dims[0] = time_dim;
wat_a1_dims[1] = lev_dim;
wat_a1_dims[2] = lat_dim;
wat_a1_dims[3] = lon_dim;
if (nc_def_var(ncid, "wat_a1", NC_DOUBLE, RANK_wat_a1, wat_a1_dims, &wat_a1_id)) ERR;
wat_a2_dims[0] = time_dim;
wat_a2_dims[1] = lev_dim;
wat_a2_dims[2] = lat_dim;
wat_a2_dims[3] = lon_dim;
if (nc_def_var(ncid, "wat_a2", NC_DOUBLE, RANK_wat_a2, wat_a2_dims, &wat_a2_id)) ERR;
wat_a3_dims[0] = time_dim;
wat_a3_dims[1] = lev_dim;
wat_a3_dims[2] = lat_dim;
wat_a3_dims[3] = lon_dim;
if (nc_def_var(ncid, "wat_a3", NC_DOUBLE, RANK_wat_a3, wat_a3_dims, &wat_a3_id)) ERR;
/* assign global attributes */
if (nc_put_att_text(ncid, NC_GLOBAL, "Conventions", 6, "CF-1.0")) ERR;
if (nc_put_att_text(ncid, NC_GLOBAL, "source", 3, "CAM")) ERR;
if (nc_put_att_text(ncid, NC_GLOBAL, "case", 6, "camrun")) ERR;
if (nc_put_att_text(ncid, NC_GLOBAL, "title", 1, "\000")) ERR;
if (nc_put_att_text(ncid, NC_GLOBAL, "logname", 8, "jedwards")) ERR;
if (nc_put_att_text(ncid, NC_GLOBAL, "host", 1, "\000")) ERR;
if (nc_put_att_text(ncid, NC_GLOBAL, "Version", 6, "$Name: $")) ERR;
if (nc_put_att_text(ncid, NC_GLOBAL, "revision_Id", 4, "$Id: tst_camrun.c,v 1.2 2010/05/20 13:17:50 ed Exp $")) ERR;
if (nc_put_att_text(ncid, NC_GLOBAL, "initial_file", 81, "/fs/cgd/csm/inputdata/atm/cam/inic/fv/cami-mam3_0000-01-01_1.9x2.5_L30_c090306.nc")) ERR;
if (nc_put_att_text(ncid, NC_GLOBAL, "topography_file", 72, "/fs/cgd/csm/inputdata/atm/cam/topo/USGS-gtopo30_1.9x2.5_remap_c050602.nc")) ERR;
/* assign per-variable attributes */
if (nc_put_att_text(ncid, P0_id, "long_name", 18, "reference pressure")) ERR;
if (nc_put_att_text(ncid, P0_id, "units", 2, "Pa")) ERR;
if (nc_put_att_text(ncid, lat_id, "long_name", 8, "latitude")) ERR;
if (nc_put_att_text(ncid, lat_id, "units", 13, "degrees_north")) ERR;
if (nc_put_att_text(ncid, lon_id, "long_name", 9, "longitude")) ERR;
if (nc_put_att_text(ncid, lon_id, "units", 12, "degrees_east")) ERR;
if (nc_put_att_text(ncid, slat_id, "long_name", 18, "staggered latitude")) ERR;
if (nc_put_att_text(ncid, slat_id, "units", 13, "degrees_north")) ERR;
if (nc_put_att_text(ncid, slon_id, "long_name", 19, "staggered longitude")) ERR;
if (nc_put_att_text(ncid, slon_id, "units", 12, "degrees_east")) ERR;
if (nc_put_att_text(ncid, w_stag_id, "long_name", 26, "staggered latitude weights")) ERR;
if (nc_put_att_text(ncid, lev_id, "long_name", 38, "hybrid level at midpoints (1000*(A+B))")) ERR;
if (nc_put_att_text(ncid, lev_id, "units", 5, "level")) ERR;
if (nc_put_att_text(ncid, lev_id, "positive", 4, "down")) ERR;
if (nc_put_att_text(ncid, lev_id, "standard_name", 43, "atmosphere_hybrid_sigma_pressure_coordinate")) ERR;
if (nc_put_att_text(ncid, lev_id, "formula_terms", 29, "a: hyam b: hybm p0: P0 ps: PS")) ERR;
if (nc_put_att_text(ncid, ilev_id, "long_name", 39, "hybrid level at interfaces (1000*(A+B))")) ERR;
if (nc_put_att_text(ncid, ilev_id, "units", 5, "level")) ERR;
if (nc_put_att_text(ncid, ilev_id, "positive", 4, "down")) ERR;
if (nc_put_att_text(ncid, ilev_id, "standard_name", 43, "atmosphere_hybrid_sigma_pressure_coordinate")) ERR;
if (nc_put_att_text(ncid, ilev_id, "formula_terms", 29, "a: hyai b: hybi p0: P0 ps: PS")) ERR;
if (nc_put_att_text(ncid, isccp_prs_id, "long_name", 19, "Mean ISCCP pressure")) ERR;
if (nc_put_att_text(ncid, isccp_prs_id, "units", 2, "mb")) ERR;
{ /* isccp_prs_bnds */
static const double isccp_prs_isccp_prs_bnds_att[8] = {0, 180, 310, 440, 560, 680, 800, 1000} ;
if (nc_put_att_double(ncid, isccp_prs_id, "isccp_prs_bnds", NC_DOUBLE, 8, isccp_prs_isccp_prs_bnds_att)) ERR;
}
if (nc_put_att_text(ncid, isccp_tau_id, "long_name", 24, "Mean ISCCP optical depth")) ERR;
if (nc_put_att_text(ncid, isccp_tau_id, "units", 8, "unitless")) ERR;
{ /* isccp_tau_bnds */
static const double isccp_tau_isccp_tau_bnds_att[8] = {0, 0.3, 1.3, 3.6, 9.4, 23, 60, 379} ;
if (nc_put_att_double(ncid, isccp_tau_id, "isccp_tau_bnds", NC_DOUBLE, 8, isccp_tau_isccp_tau_bnds_att)) ERR;
}
if (nc_put_att_text(ncid, isccp_prstau_id, "long_name", 53, "Mean pressure (mb).mean optical depth (unitless)/1000")) ERR;
if (nc_put_att_text(ncid, isccp_prstau_id, "units", 5, "mixed")) ERR;
if (nc_put_att_text(ncid, time_id, "long_name", 4, "time")) ERR;
if (nc_put_att_text(ncid, time_id, "units", 30, "days since 0000-01-01 00:00:00")) ERR;
if (nc_put_att_text(ncid, time_id, "calendar", 6, "noleap")) ERR;
if (nc_put_att_text(ncid, time_id, "bounds", 9, "time_bnds")) ERR;
if (nc_put_att_text(ncid, time_bnds_id, "long_name", 23, "time interval endpoints")) ERR;
if (nc_put_att_text(ncid, ntrm_id, "long_name", 31, "spectral truncation parameter M")) ERR;
if (nc_put_att_text(ncid, ntrn_id, "long_name", 31, "spectral truncation parameter N")) ERR;
if (nc_put_att_text(ncid, ntrk_id, "long_name", 31, "spectral truncation parameter K")) ERR;
if (nc_put_att_text(ncid, ndbase_id, "long_name", 8, "base day")) ERR;
if (nc_put_att_text(ncid, nsbase_id, "long_name", 19, "seconds of base day")) ERR;
if (nc_put_att_text(ncid, nbdate_id, "long_name", 20, "base date (YYYYMMDD)")) ERR;
if (nc_put_att_text(ncid, nbsec_id, "long_name", 20, "seconds of base date")) ERR;
if (nc_put_att_text(ncid, mdt_id, "long_name", 8, "timestep")) ERR;
if (nc_put_att_text(ncid, mdt_id, "units", 1, "s")) ERR;
if (nc_put_att_text(ncid, nlon_id, "long_name", 20, "number of longitudes")) ERR;
if (nc_put_att_text(ncid, wnummax_id, "long_name", 25, "cutoff Fourier wavenumber")) ERR;
if (nc_put_att_text(ncid, hyai_id, "long_name", 40, "hybrid A coefficient at layer interfaces")) ERR;
if (nc_put_att_text(ncid, hybi_id, "long_name", 40, "hybrid B coefficient at layer interfaces")) ERR;
if (nc_put_att_text(ncid, hyam_id, "long_name", 39, "hybrid A coefficient at layer midpoints")) ERR;
if (nc_put_att_text(ncid, hybm_id, "long_name", 39, "hybrid B coefficient at layer midpoints")) ERR;
if (nc_put_att_text(ncid, gw_id, "long_name", 13, "gauss weights")) ERR;
if (nc_put_att_text(ncid, ndcur_id, "long_name", 27, "current day (from base day)")) ERR;
if (nc_put_att_text(ncid, nscur_id, "long_name", 30, "current seconds of current day")) ERR;
if (nc_put_att_text(ncid, date_id, "long_name", 23, "current date (YYYYMMDD)")) ERR;
if (nc_put_att_text(ncid, co2vmr_id, "long_name", 23, "co2 volume mixing ratio")) ERR;
if (nc_put_att_text(ncid, ch4vmr_id, "long_name", 23, "ch4 volume mixing ratio")) ERR;
if (nc_put_att_text(ncid, n2ovmr_id, "long_name", 23, "n2o volume mixing ratio")) ERR;
if (nc_put_att_text(ncid, f11vmr_id, "long_name", 23, "f11 volume mixing ratio")) ERR;
if (nc_put_att_text(ncid, f12vmr_id, "long_name", 23, "f12 volume mixing ratio")) ERR;
if (nc_put_att_text(ncid, sol_tsi_id, "long_name", 22, "total solar irradiance")) ERR;
if (nc_put_att_text(ncid, sol_tsi_id, "units", 4, "W/m2")) ERR;
if (nc_put_att_text(ncid, datesec_id, "long_name", 31, "current seconds of current date")) ERR;
if (nc_put_att_text(ncid, nsteph_id, "long_name", 16, "current timestep")) ERR;
{ /* _FillValue */
static const double ABSORB_FillValue_att[1] = {1e+36} ;
if (nc_put_att_double(ncid, ABSORB_id, "_FillValue", NC_DOUBLE, 1, ABSORB_FillValue_att)) ERR;
}
{ /* missing_value */
static const double ABSORB_missing_value_att[1] = {1e+36} ;
if (nc_put_att_double(ncid, ABSORB_id, "missing_value", NC_DOUBLE, 1, ABSORB_missing_value_att)) ERR;
}
if (nc_put_att_text(ncid, ABSORB_id, "units", 2, "/m")) ERR;
if (nc_put_att_text(ncid, ABSORB_id, "long_name", 18, "Aerosol absorption")) ERR;
if (nc_put_att_text(ncid, ABSORB_id, "cell_methods", 10, "time: mean")) ERR;
{ /* _FillValue */
static const double AEROD_v_FillValue_att[1] = {1e+36} ;
if (nc_put_att_double(ncid, AEROD_v_id, "_FillValue", NC_DOUBLE, 1, AEROD_v_FillValue_att)) ERR;
}
{ /* missing_value */
static const double AEROD_v_missing_value_att[1] = {1e+36} ;
if (nc_put_att_double(ncid, AEROD_v_id, "missing_value", NC_DOUBLE, 1, AEROD_v_missing_value_att)) ERR;
}
if (nc_put_att_text(ncid, AEROD_v_id, "units", 1, "1")) ERR;
if (nc_put_att_text(ncid, AEROD_v_id, "long_name", 43, "Total Aerosol Optical Depth in visible band")) ERR;
if (nc_put_att_text(ncid, AEROD_v_id, "cell_methods", 10, "time: mean")) ERR;
{ /* _FillValue */
static const double AODABS_FillValue_att[1] = {1e+36} ;
if (nc_put_att_double(ncid, AODABS_id, "_FillValue", NC_DOUBLE, 1, AODABS_FillValue_att)) ERR;
}
{ /* missing_value */
static const double AODABS_missing_value_att[1] = {1e+36} ;
if (nc_put_att_double(ncid, AODABS_id, "missing_value", NC_DOUBLE, 1, AODABS_missing_value_att)) ERR;
}
if (nc_put_att_text(ncid, AODABS_id, "units", 1, "\000")) ERR;
if (nc_put_att_text(ncid, AODABS_id, "long_name", 39, "Aerosol absorption optical depth 550 nm")) ERR;
if (nc_put_att_text(ncid, AODABS_id, "cell_methods", 10, "time: mean")) ERR;
{ /* _FillValue */
static const double AODDUST1_FillValue_att[1] = {1e+36} ;
if (nc_put_att_double(ncid, AODDUST1_id, "_FillValue", NC_DOUBLE, 1, AODDUST1_FillValue_att)) ERR;
}
{ /* missing_value */
static const double AODDUST1_missing_value_att[1] = {1e+36} ;
if (nc_put_att_double(ncid, AODDUST1_id, "missing_value", NC_DOUBLE, 1, AODDUST1_missing_value_att)) ERR;
}
if (nc_put_att_text(ncid, AODDUST1_id, "units", 1, "\000")) ERR;
if (nc_put_att_text(ncid, AODDUST1_id, "long_name", 46, "Aerosol optical depth 550 nm model 1 from dust")) ERR;
if (nc_put_att_text(ncid, AODDUST1_id, "cell_methods", 10, "time: mean")) ERR;
{ /* _FillValue */
static const double AODDUST2_FillValue_att[1] = {1e+36} ;
if (nc_put_att_double(ncid, AODDUST2_id, "_FillValue", NC_DOUBLE, 1, AODDUST2_FillValue_att)) ERR;
}
{ /* missing_value */
static const double AODDUST2_missing_value_att[1] = {1e+36} ;
if (nc_put_att_double(ncid, AODDUST2_id, "missing_value", NC_DOUBLE, 1, AODDUST2_missing_value_att)) ERR;
}
if (nc_put_att_text(ncid, AODDUST2_id, "units", 1, "\000")) ERR;
if (nc_put_att_text(ncid, AODDUST2_id, "long_name", 46, "Aerosol optical depth 550 nm model 2 from dust")) ERR;
if (nc_put_att_text(ncid, AODDUST2_id, "cell_methods", 10, "time: mean")) ERR;
{ /* _FillValue */
static const double AODDUST3_FillValue_att[1] = {1e+36} ;
if (nc_put_att_double(ncid, AODDUST3_id, "_FillValue", NC_DOUBLE, 1, AODDUST3_FillValue_att)) ERR;
}
{ /* missing_value */
static const double AODDUST3_missing_value_att[1] = {1e+36} ;
if (nc_put_att_double(ncid, AODDUST3_id, "missing_value", NC_DOUBLE, 1, AODDUST3_missing_value_att)) ERR;
}
if (nc_put_att_text(ncid, AODDUST3_id, "units", 1, "\000")) ERR;
if (nc_put_att_text(ncid, AODDUST3_id, "long_name", 46, "Aerosol optical depth 550 nm model 3 from dust")) ERR;
if (nc_put_att_text(ncid, AODDUST3_id, "cell_methods", 10, "time: mean")) ERR;
{ /* _FillValue */
static const double AODMODE1_FillValue_att[1] = {1e+36} ;
if (nc_put_att_double(ncid, AODMODE1_id, "_FillValue", NC_DOUBLE, 1, AODMODE1_FillValue_att)) ERR;
}
{ /* missing_value */
static const double AODMODE1_missing_value_att[1] = {1e+36} ;
if (nc_put_att_double(ncid, AODMODE1_id, "missing_value", NC_DOUBLE, 1, AODMODE1_missing_value_att)) ERR;
}
if (nc_put_att_text(ncid, AODMODE1_id, "units", 1, "\000")) ERR;
if (nc_put_att_text(ncid, AODMODE1_id, "long_name", 35, "Aerosol optical depth 550 nm mode 1")) ERR;
if (nc_put_att_text(ncid, AODMODE1_id, "cell_methods", 10, "time: mean")) ERR;
{ /* _FillValue */
static const double AODMODE2_FillValue_att[1] = {1e+36} ;
if (nc_put_att_double(ncid, AODMODE2_id, "_FillValue", NC_DOUBLE, 1, AODMODE2_FillValue_att)) ERR;
}
{ /* missing_value */
static const double AODMODE2_missing_value_att[1] = {1e+36} ;
if (nc_put_att_double(ncid, AODMODE2_id, "missing_value", NC_DOUBLE, 1, AODMODE2_missing_value_att)) ERR;
}
if (nc_put_att_text(ncid, AODMODE2_id, "units", 1, "\000")) ERR;
if (nc_put_att_text(ncid, AODMODE2_id, "long_name", 35, "Aerosol optical depth 550 nm mode 2")) ERR;
if (nc_put_att_text(ncid, AODMODE2_id, "cell_methods", 10, "time: mean")) ERR;
{ /* _FillValue */
static const double AODMODE3_FillValue_att[1] = {1e+36} ;
if (nc_put_att_double(ncid, AODMODE3_id, "_FillValue", NC_DOUBLE, 1, AODMODE3_FillValue_att)) ERR;
}
{ /* missing_value */
static const double AODMODE3_missing_value_att[1] = {1e+36} ;
if (nc_put_att_double(ncid, AODMODE3_id, "missing_value", NC_DOUBLE, 1, AODMODE3_missing_value_att)) ERR;
}
if (nc_put_att_text(ncid, AODMODE3_id, "units", 1, "\000")) ERR;
if (nc_put_att_text(ncid, AODMODE3_id, "long_name", 35, "Aerosol optical depth 550 nm mode 3")) ERR;
if (nc_put_att_text(ncid, AODMODE3_id, "cell_methods", 10, "time: mean")) ERR;
{ /* _FillValue */
static const double AODVIS_FillValue_att[1] = {1e+36} ;
if (nc_put_att_double(ncid, AODVIS_id, "_FillValue", NC_DOUBLE, 1, AODVIS_FillValue_att)) ERR;
}
{ /* missing_value */
static const double AODVIS_missing_value_att[1] = {1e+36} ;
if (nc_put_att_double(ncid, AODVIS_id, "missing_value", NC_DOUBLE, 1, AODVIS_missing_value_att)) ERR;
}
if (nc_put_att_text(ncid, AODVIS_id, "units", 1, "\000")) ERR;
if (nc_put_att_text(ncid, AODVIS_id, "long_name", 28, "Aerosol optical depth 550 nm")) ERR;
if (nc_put_att_text(ncid, AODVIS_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, AQSO4_H2O2_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, AQSO4_H2O2_id, "long_name", 39, "SO4 aqueous phase chemistry due to H2O2")) ERR;
if (nc_put_att_text(ncid, AQSO4_H2O2_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, AQSO4_O3_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, AQSO4_O3_id, "long_name", 37, "SO4 aqueous phase chemistry due to O3")) ERR;
if (nc_put_att_text(ncid, AQSO4_O3_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, AQ_DMS_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, AQ_DMS_id, "long_name", 39, "DMS aqueous chemistry (for gas species)")) ERR;
if (nc_put_att_text(ncid, AQ_DMS_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, AQ_H2O2_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, AQ_H2O2_id, "long_name", 40, "H2O2 aqueous chemistry (for gas species)")) ERR;
if (nc_put_att_text(ncid, AQ_H2O2_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, AQ_H2SO4_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, AQ_H2SO4_id, "long_name", 41, "H2SO4 aqueous chemistry (for gas species)")) ERR;
if (nc_put_att_text(ncid, AQ_H2SO4_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, AQ_SO2_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, AQ_SO2_id, "long_name", 39, "SO2 aqueous chemistry (for gas species)")) ERR;
if (nc_put_att_text(ncid, AQ_SO2_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, AQ_SOAG_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, AQ_SOAG_id, "long_name", 40, "SOAG aqueous chemistry (for gas species)")) ERR;
if (nc_put_att_text(ncid, AQ_SOAG_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, AQ_bc_a1_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, AQ_bc_a1_id, "long_name", 41, "bc_a1 aqueous chemistry (for gas species)")) ERR;
if (nc_put_att_text(ncid, AQ_bc_a1_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, AQ_dst_a1_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, AQ_dst_a1_id, "long_name", 42, "dst_a1 aqueous chemistry (for gas species)")) ERR;
if (nc_put_att_text(ncid, AQ_dst_a1_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, AQ_dst_a3_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, AQ_dst_a3_id, "long_name", 42, "dst_a3 aqueous chemistry (for gas species)")) ERR;
if (nc_put_att_text(ncid, AQ_dst_a3_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, AQ_ncl_a1_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, AQ_ncl_a1_id, "long_name", 42, "ncl_a1 aqueous chemistry (for gas species)")) ERR;
if (nc_put_att_text(ncid, AQ_ncl_a1_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, AQ_ncl_a2_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, AQ_ncl_a2_id, "long_name", 42, "ncl_a2 aqueous chemistry (for gas species)")) ERR;
if (nc_put_att_text(ncid, AQ_ncl_a2_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, AQ_ncl_a3_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, AQ_ncl_a3_id, "long_name", 42, "ncl_a3 aqueous chemistry (for gas species)")) ERR;
if (nc_put_att_text(ncid, AQ_ncl_a3_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, AQ_num_a1_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, AQ_num_a1_id, "long_name", 42, "num_a1 aqueous chemistry (for gas species)")) ERR;
if (nc_put_att_text(ncid, AQ_num_a1_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, AQ_num_a2_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, AQ_num_a2_id, "long_name", 42, "num_a2 aqueous chemistry (for gas species)")) ERR;
if (nc_put_att_text(ncid, AQ_num_a2_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, AQ_num_a3_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, AQ_num_a3_id, "long_name", 42, "num_a3 aqueous chemistry (for gas species)")) ERR;
if (nc_put_att_text(ncid, AQ_num_a3_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, AQ_pom_a1_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, AQ_pom_a1_id, "long_name", 42, "pom_a1 aqueous chemistry (for gas species)")) ERR;
if (nc_put_att_text(ncid, AQ_pom_a1_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, AQ_so4_a1_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, AQ_so4_a1_id, "long_name", 42, "so4_a1 aqueous chemistry (for gas species)")) ERR;
if (nc_put_att_text(ncid, AQ_so4_a1_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, AQ_so4_a2_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, AQ_so4_a2_id, "long_name", 42, "so4_a2 aqueous chemistry (for gas species)")) ERR;
if (nc_put_att_text(ncid, AQ_so4_a2_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, AQ_so4_a3_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, AQ_so4_a3_id, "long_name", 42, "so4_a3 aqueous chemistry (for gas species)")) ERR;
if (nc_put_att_text(ncid, AQ_so4_a3_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, AQ_soa_a1_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, AQ_soa_a1_id, "long_name", 42, "soa_a1 aqueous chemistry (for gas species)")) ERR;
if (nc_put_att_text(ncid, AQ_soa_a1_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, AQ_soa_a2_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, AQ_soa_a2_id, "long_name", 42, "soa_a2 aqueous chemistry (for gas species)")) ERR;
if (nc_put_att_text(ncid, AQ_soa_a2_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, BPROD_id, "units", 5, "M2/S3")) ERR;
if (nc_put_att_text(ncid, BPROD_id, "long_name", 19, "Buoyancy Production")) ERR;
if (nc_put_att_text(ncid, BPROD_id, "cell_methods", 10, "time: mean")) ERR;
{ /* _FillValue */
static const double BURDEN1_FillValue_att[1] = {1e+36} ;
if (nc_put_att_double(ncid, BURDEN1_id, "_FillValue", NC_DOUBLE, 1, BURDEN1_FillValue_att)) ERR;
}
{ /* missing_value */
static const double BURDEN1_missing_value_att[1] = {1e+36} ;
if (nc_put_att_double(ncid, BURDEN1_id, "missing_value", NC_DOUBLE, 1, BURDEN1_missing_value_att)) ERR;
}
if (nc_put_att_text(ncid, BURDEN1_id, "units", 5, "kg/m2")) ERR;
if (nc_put_att_text(ncid, BURDEN1_id, "long_name", 21, "Aerosol burden mode 1")) ERR;
if (nc_put_att_text(ncid, BURDEN1_id, "cell_methods", 10, "time: mean")) ERR;
{ /* _FillValue */
static const double BURDEN2_FillValue_att[1] = {1e+36} ;
if (nc_put_att_double(ncid, BURDEN2_id, "_FillValue", NC_DOUBLE, 1, BURDEN2_FillValue_att)) ERR;
}
{ /* missing_value */
static const double BURDEN2_missing_value_att[1] = {1e+36} ;
if (nc_put_att_double(ncid, BURDEN2_id, "missing_value", NC_DOUBLE, 1, BURDEN2_missing_value_att)) ERR;
}
if (nc_put_att_text(ncid, BURDEN2_id, "units", 5, "kg/m2")) ERR;
if (nc_put_att_text(ncid, BURDEN2_id, "long_name", 21, "Aerosol burden mode 2")) ERR;
if (nc_put_att_text(ncid, BURDEN2_id, "cell_methods", 10, "time: mean")) ERR;
{ /* _FillValue */
static const double BURDEN3_FillValue_att[1] = {1e+36} ;
if (nc_put_att_double(ncid, BURDEN3_id, "_FillValue", NC_DOUBLE, 1, BURDEN3_FillValue_att)) ERR;
}
{ /* missing_value */
static const double BURDEN3_missing_value_att[1] = {1e+36} ;
if (nc_put_att_double(ncid, BURDEN3_id, "missing_value", NC_DOUBLE, 1, BURDEN3_missing_value_att)) ERR;
}
if (nc_put_att_text(ncid, BURDEN3_id, "units", 5, "kg/m2")) ERR;
if (nc_put_att_text(ncid, BURDEN3_id, "long_name", 21, "Aerosol burden mode 3")) ERR;
if (nc_put_att_text(ncid, BURDEN3_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, CCN1_id, "units", 5, "#/cm3")) ERR;
if (nc_put_att_text(ncid, CCN1_id, "long_name", 28, "CCN concentration at S=0.02%")) ERR;
if (nc_put_att_text(ncid, CCN1_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, CCN2_id, "units", 5, "#/cm3")) ERR;
if (nc_put_att_text(ncid, CCN2_id, "long_name", 28, "CCN concentration at S=0.05%")) ERR;
if (nc_put_att_text(ncid, CCN2_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, CCN3_id, "units", 5, "#/cm3")) ERR;
if (nc_put_att_text(ncid, CCN3_id, "long_name", 27, "CCN concentration at S=0.1%")) ERR;
if (nc_put_att_text(ncid, CCN3_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, CCN4_id, "units", 5, "#/cm3")) ERR;
if (nc_put_att_text(ncid, CCN4_id, "long_name", 27, "CCN concentration at S=0.2%")) ERR;
if (nc_put_att_text(ncid, CCN4_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, CCN5_id, "units", 5, "#/cm3")) ERR;
if (nc_put_att_text(ncid, CCN5_id, "long_name", 27, "CCN concentration at S=0.5%")) ERR;
if (nc_put_att_text(ncid, CCN5_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, CCN6_id, "units", 5, "#/cm3")) ERR;
if (nc_put_att_text(ncid, CCN6_id, "long_name", 27, "CCN concentration at S=1.0%")) ERR;
if (nc_put_att_text(ncid, CCN6_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, CLDHGH_id, "units", 8, "fraction")) ERR;
if (nc_put_att_text(ncid, CLDHGH_id, "long_name", 32, "Vertically-integrated high cloud")) ERR;
if (nc_put_att_text(ncid, CLDHGH_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, CLDICE_id, "units", 5, "kg/kg")) ERR;
if (nc_put_att_text(ncid, CLDICE_id, "long_name", 34, "Grid box averaged cloud ice amount")) ERR;
if (nc_put_att_text(ncid, CLDICE_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, CLDLIQ_id, "units", 5, "kg/kg")) ERR;
if (nc_put_att_text(ncid, CLDLIQ_id, "long_name", 37, "Grid box averaged cloud liquid amount")) ERR;
if (nc_put_att_text(ncid, CLDLIQ_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, CLDLOW_id, "units", 8, "fraction")) ERR;
if (nc_put_att_text(ncid, CLDLOW_id, "long_name", 31, "Vertically-integrated low cloud")) ERR;
if (nc_put_att_text(ncid, CLDLOW_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, CLDMED_id, "units", 8, "fraction")) ERR;
if (nc_put_att_text(ncid, CLDMED_id, "long_name", 37, "Vertically-integrated mid-level cloud")) ERR;
if (nc_put_att_text(ncid, CLDMED_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, CLDTOT_id, "units", 8, "fraction")) ERR;
if (nc_put_att_text(ncid, CLDTOT_id, "long_name", 33, "Vertically-integrated total cloud")) ERR;
if (nc_put_att_text(ncid, CLDTOT_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, CLOUD_id, "units", 8, "fraction")) ERR;
if (nc_put_att_text(ncid, CLOUD_id, "long_name", 14, "Cloud fraction")) ERR;
if (nc_put_att_text(ncid, CLOUD_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, CMFDQ_id, "units", 7, "kg/kg/s")) ERR;
if (nc_put_att_text(ncid, CMFDQ_id, "long_name", 32, "QV tendency - shallow convection")) ERR;
if (nc_put_att_text(ncid, CMFDQ_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, CMFDQR_id, "units", 7, "kg/kg/s")) ERR;
if (nc_put_att_text(ncid, CMFDQR_id, "long_name", 39, "Q tendency - shallow convection rainout")) ERR;
if (nc_put_att_text(ncid, CMFDQR_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, CMFDT_id, "units", 3, "K/s")) ERR;
if (nc_put_att_text(ncid, CMFDT_id, "long_name", 31, "T tendency - shallow convection")) ERR;
if (nc_put_att_text(ncid, CMFDT_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, CMFMC_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, CMFMC_id, "long_name", 34, "Moist shallow convection mass flux")) ERR;
if (nc_put_att_text(ncid, CMFMC_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, CMFMCDZM_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, CMFMCDZM_id, "long_name", 33, "Convection mass flux from ZM deep")) ERR;
if (nc_put_att_text(ncid, CMFMCDZM_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, CONCLD_id, "units", 8, "fraction")) ERR;
if (nc_put_att_text(ncid, CONCLD_id, "long_name", 22, "Convective cloud cover")) ERR;
if (nc_put_att_text(ncid, CONCLD_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, DCQ_id, "units", 7, "kg/kg/s")) ERR;
if (nc_put_att_text(ncid, DCQ_id, "long_name", 33, "Q tendency due to moist processes")) ERR;
if (nc_put_att_text(ncid, DCQ_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, DMS_id, "units", 5, "kg/kg")) ERR;
if (nc_put_att_text(ncid, DMS_id, "long_name", 3, "DMS")) ERR;
if (nc_put_att_text(ncid, DMS_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, DSTODXC_id, "units", 3, "Tau")) ERR;
if (nc_put_att_text(ncid, DSTODXC_id, "long_name", 29, "Optical depth for diagnostics")) ERR;
if (nc_put_att_text(ncid, DSTODXC_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, DSTSFDRY_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, DSTSFDRY_id, "long_name", 30, "Dry deposition flux at surface")) ERR;
if (nc_put_att_text(ncid, DSTSFDRY_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, DSTSFMBL_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, DSTSFMBL_id, "long_name", 28, "Mobilization flux at surface")) ERR;
if (nc_put_att_text(ncid, DSTSFMBL_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, DSTSFWET_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, DSTSFWET_id, "long_name", 30, "Wet deposition flux at surface")) ERR;
if (nc_put_att_text(ncid, DSTSFWET_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, DTCOND_id, "units", 3, "K/s")) ERR;
if (nc_put_att_text(ncid, DTCOND_id, "long_name", 28, "T tendency - moist processes")) ERR;
if (nc_put_att_text(ncid, DTCOND_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, DTV_id, "units", 3, "K/s")) ERR;
if (nc_put_att_text(ncid, DTV_id, "long_name", 20, "T vertical diffusion")) ERR;
if (nc_put_att_text(ncid, DTV_id, "cell_methods", 10, "time: mean")) ERR;
{ /* _FillValue */
static const double EXTINCT_FillValue_att[1] = {1e+36} ;
if (nc_put_att_double(ncid, EXTINCT_id, "_FillValue", NC_DOUBLE, 1, EXTINCT_FillValue_att)) ERR;
}
{ /* missing_value */
static const double EXTINCT_missing_value_att[1] = {1e+36} ;
if (nc_put_att_double(ncid, EXTINCT_id, "missing_value", NC_DOUBLE, 1, EXTINCT_missing_value_att)) ERR;
}
if (nc_put_att_text(ncid, EXTINCT_id, "units", 2, "/m")) ERR;
if (nc_put_att_text(ncid, EXTINCT_id, "long_name", 18, "Aerosol extinction")) ERR;
if (nc_put_att_text(ncid, EXTINCT_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, FICE_id, "units", 8, "fraction")) ERR;
if (nc_put_att_text(ncid, FICE_id, "long_name", 35, "Fractional ice content within cloud")) ERR;
if (nc_put_att_text(ncid, FICE_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, FLDS_id, "Sampling_Sequence", 8, "rad_lwsw")) ERR;
if (nc_put_att_text(ncid, FLDS_id, "units", 4, "W/m2")) ERR;
if (nc_put_att_text(ncid, FLDS_id, "long_name", 36, "Downwelling longwave flux at surface")) ERR;
if (nc_put_att_text(ncid, FLDS_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, FLNS_id, "Sampling_Sequence", 8, "rad_lwsw")) ERR;
if (nc_put_att_text(ncid, FLNS_id, "units", 4, "W/m2")) ERR;
if (nc_put_att_text(ncid, FLNS_id, "long_name", 28, "Net longwave flux at surface")) ERR;
if (nc_put_att_text(ncid, FLNS_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, FLNSC_id, "Sampling_Sequence", 8, "rad_lwsw")) ERR;
if (nc_put_att_text(ncid, FLNSC_id, "units", 4, "W/m2")) ERR;
if (nc_put_att_text(ncid, FLNSC_id, "long_name", 37, "Clearsky net longwave flux at surface")) ERR;
if (nc_put_att_text(ncid, FLNSC_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, FLNT_id, "Sampling_Sequence", 8, "rad_lwsw")) ERR;
if (nc_put_att_text(ncid, FLNT_id, "units", 4, "W/m2")) ERR;
if (nc_put_att_text(ncid, FLNT_id, "long_name", 33, "Net longwave flux at top of model")) ERR;
if (nc_put_att_text(ncid, FLNT_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, FLNTC_id, "Sampling_Sequence", 8, "rad_lwsw")) ERR;
if (nc_put_att_text(ncid, FLNTC_id, "units", 4, "W/m2")) ERR;
if (nc_put_att_text(ncid, FLNTC_id, "long_name", 42, "Clearsky net longwave flux at top of model")) ERR;
if (nc_put_att_text(ncid, FLNTC_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, FLUT_id, "Sampling_Sequence", 8, "rad_lwsw")) ERR;
if (nc_put_att_text(ncid, FLUT_id, "units", 4, "W/m2")) ERR;
if (nc_put_att_text(ncid, FLUT_id, "long_name", 39, "Upwelling longwave flux at top of model")) ERR;
if (nc_put_att_text(ncid, FLUT_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, FLUTC_id, "Sampling_Sequence", 8, "rad_lwsw")) ERR;
if (nc_put_att_text(ncid, FLUTC_id, "units", 4, "W/m2")) ERR;
if (nc_put_att_text(ncid, FLUTC_id, "long_name", 48, "Clearsky upwelling longwave flux at top of model")) ERR;
if (nc_put_att_text(ncid, FLUTC_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, FREQSH_id, "units", 8, "fraction")) ERR;
if (nc_put_att_text(ncid, FREQSH_id, "long_name", 42, "Fractional occurrence of shallow convection")) ERR;
if (nc_put_att_text(ncid, FREQSH_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, FREQZM_id, "units", 8, "fraction")) ERR;
if (nc_put_att_text(ncid, FREQZM_id, "long_name", 37, "Fractional occurrence of ZM convection")) ERR;
if (nc_put_att_text(ncid, FREQZM_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, FSDS_id, "Sampling_Sequence", 8, "rad_lwsw")) ERR;
if (nc_put_att_text(ncid, FSDS_id, "units", 4, "W/m2")) ERR;
if (nc_put_att_text(ncid, FSDS_id, "long_name", 33, "Downwelling solar flux at surface")) ERR;
if (nc_put_att_text(ncid, FSDS_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, FSDSC_id, "Sampling_Sequence", 8, "rad_lwsw")) ERR;
if (nc_put_att_text(ncid, FSDSC_id, "units", 4, "W/m2")) ERR;
if (nc_put_att_text(ncid, FSDSC_id, "long_name", 42, "Clearsky downwelling solar flux at surface")) ERR;
if (nc_put_att_text(ncid, FSDSC_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, FSNS_id, "Sampling_Sequence", 8, "rad_lwsw")) ERR;
if (nc_put_att_text(ncid, FSNS_id, "units", 4, "W/m2")) ERR;
if (nc_put_att_text(ncid, FSNS_id, "long_name", 25, "Net solar flux at surface")) ERR;
if (nc_put_att_text(ncid, FSNS_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, FSNSC_id, "Sampling_Sequence", 8, "rad_lwsw")) ERR;
if (nc_put_att_text(ncid, FSNSC_id, "units", 4, "W/m2")) ERR;
if (nc_put_att_text(ncid, FSNSC_id, "long_name", 34, "Clearsky net solar flux at surface")) ERR;
if (nc_put_att_text(ncid, FSNSC_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, FSNT_id, "Sampling_Sequence", 8, "rad_lwsw")) ERR;
if (nc_put_att_text(ncid, FSNT_id, "units", 4, "W/m2")) ERR;
if (nc_put_att_text(ncid, FSNT_id, "long_name", 30, "Net solar flux at top of model")) ERR;
if (nc_put_att_text(ncid, FSNT_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, FSNTC_id, "Sampling_Sequence", 8, "rad_lwsw")) ERR;
if (nc_put_att_text(ncid, FSNTC_id, "units", 4, "W/m2")) ERR;
if (nc_put_att_text(ncid, FSNTC_id, "long_name", 39, "Clearsky net solar flux at top of model")) ERR;
if (nc_put_att_text(ncid, FSNTC_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, FSNTOA_id, "Sampling_Sequence", 8, "rad_lwsw")) ERR;
if (nc_put_att_text(ncid, FSNTOA_id, "units", 4, "W/m2")) ERR;
if (nc_put_att_text(ncid, FSNTOA_id, "long_name", 35, "Net solar flux at top of atmosphere")) ERR;
if (nc_put_att_text(ncid, FSNTOA_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, FSNTOAC_id, "Sampling_Sequence", 8, "rad_lwsw")) ERR;
if (nc_put_att_text(ncid, FSNTOAC_id, "units", 4, "W/m2")) ERR;
if (nc_put_att_text(ncid, FSNTOAC_id, "long_name", 44, "Clearsky net solar flux at top of atmosphere")) ERR;
if (nc_put_att_text(ncid, FSNTOAC_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, FSUTOA_id, "Sampling_Sequence", 8, "rad_lwsw")) ERR;
if (nc_put_att_text(ncid, FSUTOA_id, "units", 4, "W/m2")) ERR;
if (nc_put_att_text(ncid, FSUTOA_id, "long_name", 41, "Upwelling solar flux at top of atmosphere")) ERR;
if (nc_put_att_text(ncid, FSUTOA_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, GS_DMS_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, GS_DMS_id, "long_name", 47, "DMS gas chemistry/wet removal (for gas species)")) ERR;
if (nc_put_att_text(ncid, GS_DMS_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, GS_H2O2_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, GS_H2O2_id, "long_name", 48, "H2O2 gas chemistry/wet removal (for gas species)")) ERR;
if (nc_put_att_text(ncid, GS_H2O2_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, GS_H2SO4_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, GS_H2SO4_id, "long_name", 49, "H2SO4 gas chemistry/wet removal (for gas species)")) ERR;
if (nc_put_att_text(ncid, GS_H2SO4_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, GS_SO2_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, GS_SO2_id, "long_name", 47, "SO2 gas chemistry/wet removal (for gas species)")) ERR;
if (nc_put_att_text(ncid, GS_SO2_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, GS_SOAG_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, GS_SOAG_id, "long_name", 48, "SOAG gas chemistry/wet removal (for gas species)")) ERR;
if (nc_put_att_text(ncid, GS_SOAG_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, GS_bc_a1_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, GS_bc_a1_id, "long_name", 49, "bc_a1 gas chemistry/wet removal (for gas species)")) ERR;
if (nc_put_att_text(ncid, GS_bc_a1_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, GS_dst_a1_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, GS_dst_a1_id, "long_name", 50, "dst_a1 gas chemistry/wet removal (for gas species)")) ERR;
if (nc_put_att_text(ncid, GS_dst_a1_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, GS_dst_a3_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, GS_dst_a3_id, "long_name", 50, "dst_a3 gas chemistry/wet removal (for gas species)")) ERR;
if (nc_put_att_text(ncid, GS_dst_a3_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, GS_ncl_a1_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, GS_ncl_a1_id, "long_name", 50, "ncl_a1 gas chemistry/wet removal (for gas species)")) ERR;
if (nc_put_att_text(ncid, GS_ncl_a1_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, GS_ncl_a2_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, GS_ncl_a2_id, "long_name", 50, "ncl_a2 gas chemistry/wet removal (for gas species)")) ERR;
if (nc_put_att_text(ncid, GS_ncl_a2_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, GS_ncl_a3_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, GS_ncl_a3_id, "long_name", 50, "ncl_a3 gas chemistry/wet removal (for gas species)")) ERR;
if (nc_put_att_text(ncid, GS_ncl_a3_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, GS_num_a1_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, GS_num_a1_id, "long_name", 50, "num_a1 gas chemistry/wet removal (for gas species)")) ERR;
if (nc_put_att_text(ncid, GS_num_a1_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, GS_num_a2_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, GS_num_a2_id, "long_name", 50, "num_a2 gas chemistry/wet removal (for gas species)")) ERR;
if (nc_put_att_text(ncid, GS_num_a2_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, GS_num_a3_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, GS_num_a3_id, "long_name", 50, "num_a3 gas chemistry/wet removal (for gas species)")) ERR;
if (nc_put_att_text(ncid, GS_num_a3_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, GS_pom_a1_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, GS_pom_a1_id, "long_name", 50, "pom_a1 gas chemistry/wet removal (for gas species)")) ERR;
if (nc_put_att_text(ncid, GS_pom_a1_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, GS_so4_a1_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, GS_so4_a1_id, "long_name", 50, "so4_a1 gas chemistry/wet removal (for gas species)")) ERR;
if (nc_put_att_text(ncid, GS_so4_a1_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, GS_so4_a2_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, GS_so4_a2_id, "long_name", 50, "so4_a2 gas chemistry/wet removal (for gas species)")) ERR;
if (nc_put_att_text(ncid, GS_so4_a2_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, GS_so4_a3_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, GS_so4_a3_id, "long_name", 50, "so4_a3 gas chemistry/wet removal (for gas species)")) ERR;
if (nc_put_att_text(ncid, GS_so4_a3_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, GS_soa_a1_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, GS_soa_a1_id, "long_name", 50, "soa_a1 gas chemistry/wet removal (for gas species)")) ERR;
if (nc_put_att_text(ncid, GS_soa_a1_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, GS_soa_a2_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, GS_soa_a2_id, "long_name", 50, "soa_a2 gas chemistry/wet removal (for gas species)")) ERR;
if (nc_put_att_text(ncid, GS_soa_a2_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, H2O2_id, "units", 5, "kg/kg")) ERR;
if (nc_put_att_text(ncid, H2O2_id, "long_name", 4, "H2O2")) ERR;
if (nc_put_att_text(ncid, H2O2_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, H2SO4_id, "units", 5, "kg/kg")) ERR;
if (nc_put_att_text(ncid, H2SO4_id, "long_name", 5, "H2SO4")) ERR;
if (nc_put_att_text(ncid, H2SO4_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, H2SO4_sfgaex1_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, H2SO4_sfgaex1_id, "long_name", 50, "H2SO4 gas-aerosol-exchange primary column tendency")) ERR;
if (nc_put_att_text(ncid, H2SO4_sfgaex1_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, H2SO4_sfnnuc1_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, H2SO4_sfnnuc1_id, "long_name", 56, "H2SO4 modal_aero new particle nucleation column tendency")) ERR;
if (nc_put_att_text(ncid, H2SO4_sfnnuc1_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, ICEFRAC_id, "units", 8, "fraction")) ERR;
if (nc_put_att_text(ncid, ICEFRAC_id, "long_name", 39, "Fraction of sfc area covered by sea-ice")) ERR;
if (nc_put_att_text(ncid, ICEFRAC_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, ICIMR_id, "units", 5, "kg/kg")) ERR;
if (nc_put_att_text(ncid, ICIMR_id, "long_name", 36, "Prognostic in-cloud ice mixing ratio")) ERR;
if (nc_put_att_text(ncid, ICIMR_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, ICWMR_id, "units", 5, "kg/kg")) ERR;
if (nc_put_att_text(ncid, ICWMR_id, "long_name", 38, "Prognostic in-cloud water mixing ratio")) ERR;
if (nc_put_att_text(ncid, ICWMR_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, KVH_id, "units", 4, "m2/s")) ERR;
if (nc_put_att_text(ncid, KVH_id, "long_name", 48, "Vertical diffusion diffusivities (heat/moisture)")) ERR;
if (nc_put_att_text(ncid, KVH_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, KVM_id, "units", 4, "m2/s")) ERR;
if (nc_put_att_text(ncid, KVM_id, "long_name", 43, "Vertical diffusion diffusivities (momentum)")) ERR;
if (nc_put_att_text(ncid, KVM_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, LANDFRAC_id, "units", 8, "fraction")) ERR;
if (nc_put_att_text(ncid, LANDFRAC_id, "long_name", 36, "Fraction of sfc area covered by land")) ERR;
if (nc_put_att_text(ncid, LANDFRAC_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, LCLOUD_id, "units", 1, "\000")) ERR;
if (nc_put_att_text(ncid, LCLOUD_id, "long_name", 21, "Liquid cloud fraction")) ERR;
if (nc_put_att_text(ncid, LCLOUD_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, LHFLX_id, "units", 4, "W/m2")) ERR;
if (nc_put_att_text(ncid, LHFLX_id, "long_name", 24, "Surface latent heat flux")) ERR;
if (nc_put_att_text(ncid, LHFLX_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, LND_MBL_id, "units", 4, "frac")) ERR;
if (nc_put_att_text(ncid, LND_MBL_id, "long_name", 23, "Soil erodibility factor")) ERR;
if (nc_put_att_text(ncid, LND_MBL_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, LWCF_id, "Sampling_Sequence", 8, "rad_lwsw")) ERR;
if (nc_put_att_text(ncid, LWCF_id, "units", 4, "W/m2")) ERR;
if (nc_put_att_text(ncid, LWCF_id, "long_name", 22, "Longwave cloud forcing")) ERR;
if (nc_put_att_text(ncid, LWCF_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, NDROPCOL_id, "units", 4, "#/m2")) ERR;
if (nc_put_att_text(ncid, NDROPCOL_id, "long_name", 21, "Column droplet number")) ERR;
if (nc_put_att_text(ncid, NDROPCOL_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, NDROPMIX_id, "units", 6, "#/kg/s")) ERR;
if (nc_put_att_text(ncid, NDROPMIX_id, "long_name", 21, "Droplet number mixing")) ERR;
if (nc_put_att_text(ncid, NDROPMIX_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, NDROPSNK_id, "units", 6, "#/kg/s")) ERR;
if (nc_put_att_text(ncid, NDROPSNK_id, "long_name", 35, "Droplet number loss by microphysics")) ERR;
if (nc_put_att_text(ncid, NDROPSNK_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, NDROPSRC_id, "units", 6, "#/kg/s")) ERR;
if (nc_put_att_text(ncid, NDROPSRC_id, "long_name", 21, "Droplet number source")) ERR;
if (nc_put_att_text(ncid, NDROPSRC_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, NUMICE_id, "units", 5, "kg/kg")) ERR;
if (nc_put_att_text(ncid, NUMICE_id, "long_name", 34, "Grid box averaged cloud ice number")) ERR;
if (nc_put_att_text(ncid, NUMICE_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, NUMLIQ_id, "units", 5, "kg/kg")) ERR;
if (nc_put_att_text(ncid, NUMLIQ_id, "long_name", 37, "Grid box averaged cloud liquid number")) ERR;
if (nc_put_att_text(ncid, NUMLIQ_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, OCNFRAC_id, "units", 8, "fraction")) ERR;
if (nc_put_att_text(ncid, OCNFRAC_id, "long_name", 37, "Fraction of sfc area covered by ocean")) ERR;
if (nc_put_att_text(ncid, OCNFRAC_id, "cell_methods", 10, "time: mean")) ERR;
{ /* _FillValue */
static const double ODV_bc_a1_FillValue_att[1] = {1e+36} ;
if (nc_put_att_double(ncid, ODV_bc_a1_id, "_FillValue", NC_DOUBLE, 1, ODV_bc_a1_FillValue_att)) ERR;
}
{ /* missing_value */
static const double ODV_bc_a1_missing_value_att[1] = {1e+36} ;
if (nc_put_att_double(ncid, ODV_bc_a1_id, "missing_value", NC_DOUBLE, 1, ODV_bc_a1_missing_value_att)) ERR;
}
if (nc_put_att_text(ncid, ODV_bc_a1_id, "units", 1, "1")) ERR;
if (nc_put_att_text(ncid, ODV_bc_a1_id, "long_name", 35, "bc_a1 optical depth in visible band")) ERR;
if (nc_put_att_text(ncid, ODV_bc_a1_id, "cell_methods", 10, "time: mean")) ERR;
{ /* _FillValue */
static const double ODV_dst_a1_FillValue_att[1] = {1e+36} ;
if (nc_put_att_double(ncid, ODV_dst_a1_id, "_FillValue", NC_DOUBLE, 1, ODV_dst_a1_FillValue_att)) ERR;
}
{ /* missing_value */
static const double ODV_dst_a1_missing_value_att[1] = {1e+36} ;
if (nc_put_att_double(ncid, ODV_dst_a1_id, "missing_value", NC_DOUBLE, 1, ODV_dst_a1_missing_value_att)) ERR;
}
if (nc_put_att_text(ncid, ODV_dst_a1_id, "units", 1, "1")) ERR;
if (nc_put_att_text(ncid, ODV_dst_a1_id, "long_name", 36, "dst_a1 optical depth in visible band")) ERR;
if (nc_put_att_text(ncid, ODV_dst_a1_id, "cell_methods", 10, "time: mean")) ERR;
{ /* _FillValue */
static const double ODV_dst_a3_FillValue_att[1] = {1e+36} ;
if (nc_put_att_double(ncid, ODV_dst_a3_id, "_FillValue", NC_DOUBLE, 1, ODV_dst_a3_FillValue_att)) ERR;
}
{ /* missing_value */
static const double ODV_dst_a3_missing_value_att[1] = {1e+36} ;
if (nc_put_att_double(ncid, ODV_dst_a3_id, "missing_value", NC_DOUBLE, 1, ODV_dst_a3_missing_value_att)) ERR;
}
if (nc_put_att_text(ncid, ODV_dst_a3_id, "units", 1, "1")) ERR;
if (nc_put_att_text(ncid, ODV_dst_a3_id, "long_name", 36, "dst_a3 optical depth in visible band")) ERR;
if (nc_put_att_text(ncid, ODV_dst_a3_id, "cell_methods", 10, "time: mean")) ERR;
{ /* _FillValue */
static const double ODV_ncl_a1_FillValue_att[1] = {1e+36} ;
if (nc_put_att_double(ncid, ODV_ncl_a1_id, "_FillValue", NC_DOUBLE, 1, ODV_ncl_a1_FillValue_att)) ERR;
}
{ /* missing_value */
static const double ODV_ncl_a1_missing_value_att[1] = {1e+36} ;
if (nc_put_att_double(ncid, ODV_ncl_a1_id, "missing_value", NC_DOUBLE, 1, ODV_ncl_a1_missing_value_att)) ERR;
}
if (nc_put_att_text(ncid, ODV_ncl_a1_id, "units", 1, "1")) ERR;
if (nc_put_att_text(ncid, ODV_ncl_a1_id, "long_name", 36, "ncl_a1 optical depth in visible band")) ERR;
if (nc_put_att_text(ncid, ODV_ncl_a1_id, "cell_methods", 10, "time: mean")) ERR;
{ /* _FillValue */
static const double ODV_ncl_a3_FillValue_att[1] = {1e+36} ;
if (nc_put_att_double(ncid, ODV_ncl_a3_id, "_FillValue", NC_DOUBLE, 1, ODV_ncl_a3_FillValue_att)) ERR;
}
{ /* missing_value */
static const double ODV_ncl_a3_missing_value_att[1] = {1e+36} ;
if (nc_put_att_double(ncid, ODV_ncl_a3_id, "missing_value", NC_DOUBLE, 1, ODV_ncl_a3_missing_value_att)) ERR;
}
if (nc_put_att_text(ncid, ODV_ncl_a3_id, "units", 1, "1")) ERR;
if (nc_put_att_text(ncid, ODV_ncl_a3_id, "long_name", 36, "ncl_a3 optical depth in visible band")) ERR;
if (nc_put_att_text(ncid, ODV_ncl_a3_id, "cell_methods", 10, "time: mean")) ERR;
{ /* _FillValue */
static const double ODV_pom_a1_FillValue_att[1] = {1e+36} ;
if (nc_put_att_double(ncid, ODV_pom_a1_id, "_FillValue", NC_DOUBLE, 1, ODV_pom_a1_FillValue_att)) ERR;
}
{ /* missing_value */
static const double ODV_pom_a1_missing_value_att[1] = {1e+36} ;
if (nc_put_att_double(ncid, ODV_pom_a1_id, "missing_value", NC_DOUBLE, 1, ODV_pom_a1_missing_value_att)) ERR;
}
if (nc_put_att_text(ncid, ODV_pom_a1_id, "units", 1, "1")) ERR;
if (nc_put_att_text(ncid, ODV_pom_a1_id, "long_name", 36, "pom_a1 optical depth in visible band")) ERR;
if (nc_put_att_text(ncid, ODV_pom_a1_id, "cell_methods", 10, "time: mean")) ERR;
{ /* _FillValue */
static const double ODV_so4_a1_FillValue_att[1] = {1e+36} ;
if (nc_put_att_double(ncid, ODV_so4_a1_id, "_FillValue", NC_DOUBLE, 1, ODV_so4_a1_FillValue_att)) ERR;
}
{ /* missing_value */
static const double ODV_so4_a1_missing_value_att[1] = {1e+36} ;
if (nc_put_att_double(ncid, ODV_so4_a1_id, "missing_value", NC_DOUBLE, 1, ODV_so4_a1_missing_value_att)) ERR;
}
if (nc_put_att_text(ncid, ODV_so4_a1_id, "units", 1, "1")) ERR;
if (nc_put_att_text(ncid, ODV_so4_a1_id, "long_name", 36, "so4_a1 optical depth in visible band")) ERR;
if (nc_put_att_text(ncid, ODV_so4_a1_id, "cell_methods", 10, "time: mean")) ERR;
{ /* _FillValue */
static const double ODV_soa_a1_FillValue_att[1] = {1e+36} ;
if (nc_put_att_double(ncid, ODV_soa_a1_id, "_FillValue", NC_DOUBLE, 1, ODV_soa_a1_FillValue_att)) ERR;
}
{ /* missing_value */
static const double ODV_soa_a1_missing_value_att[1] = {1e+36} ;
if (nc_put_att_double(ncid, ODV_soa_a1_id, "missing_value", NC_DOUBLE, 1, ODV_soa_a1_missing_value_att)) ERR;
}
if (nc_put_att_text(ncid, ODV_soa_a1_id, "units", 1, "1")) ERR;
if (nc_put_att_text(ncid, ODV_soa_a1_id, "long_name", 36, "soa_a1 optical depth in visible band")) ERR;
if (nc_put_att_text(ncid, ODV_soa_a1_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, OMEGA_id, "units", 4, "Pa/s")) ERR;
if (nc_put_att_text(ncid, OMEGA_id, "long_name", 28, "Vertical velocity (pressure)")) ERR;
if (nc_put_att_text(ncid, OMEGA_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, OMEGAT_id, "units", 6, "K Pa/s")) ERR;
if (nc_put_att_text(ncid, OMEGAT_id, "long_name", 18, "Vertical heat flux")) ERR;
if (nc_put_att_text(ncid, OMEGAT_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, ORO_id, "units", 4, "frac")) ERR;
if (nc_put_att_text(ncid, ORO_id, "long_name", 3, "ORO")) ERR;
if (nc_put_att_text(ncid, ORO_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, PBLH_id, "units", 1, "m")) ERR;
if (nc_put_att_text(ncid, PBLH_id, "long_name", 10, "PBL height")) ERR;
if (nc_put_att_text(ncid, PBLH_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, PCONVB_id, "units", 2, "Pa")) ERR;
if (nc_put_att_text(ncid, PCONVB_id, "long_name", 24, "convection base pressure")) ERR;
if (nc_put_att_text(ncid, PCONVB_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, PCONVT_id, "units", 2, "Pa")) ERR;
if (nc_put_att_text(ncid, PCONVT_id, "long_name", 24, "convection top pressure")) ERR;
if (nc_put_att_text(ncid, PCONVT_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, PHIS_id, "units", 5, "m2/s2")) ERR;
if (nc_put_att_text(ncid, PHIS_id, "long_name", 20, "Surface geopotential")) ERR;
if (nc_put_att_text(ncid, PRECC_id, "units", 3, "m/s")) ERR;
if (nc_put_att_text(ncid, PRECC_id, "long_name", 41, "Convective precipitation rate (liq + ice)")) ERR;
if (nc_put_att_text(ncid, PRECC_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, PRECCDZM_id, "units", 3, "m/s")) ERR;
if (nc_put_att_text(ncid, PRECCDZM_id, "long_name", 42, "Convective precipitation rate from ZM deep")) ERR;
if (nc_put_att_text(ncid, PRECCDZM_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, PRECL_id, "units", 3, "m/s")) ERR;
if (nc_put_att_text(ncid, PRECL_id, "long_name", 51, "Large-scale (stable) precipitation rate (liq + ice)")) ERR;
if (nc_put_att_text(ncid, PRECL_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, PRECSC_id, "units", 3, "m/s")) ERR;
if (nc_put_att_text(ncid, PRECSC_id, "long_name", 39, "Convective snow rate (water equivalent)")) ERR;
if (nc_put_att_text(ncid, PRECSC_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, PRECSH_id, "units", 3, "m/s")) ERR;
if (nc_put_att_text(ncid, PRECSH_id, "long_name", 37, "Shallow Convection precipitation rate")) ERR;
if (nc_put_att_text(ncid, PRECSH_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, PRECSL_id, "units", 3, "m/s")) ERR;
if (nc_put_att_text(ncid, PRECSL_id, "long_name", 49, "Large-scale (stable) snow rate (water equivalent)")) ERR;
if (nc_put_att_text(ncid, PRECSL_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, PRECT_id, "units", 3, "m/s")) ERR;
if (nc_put_att_text(ncid, PRECT_id, "long_name", 65, "Total (convective and large-scale) precipitation rate (liq + ice)")) ERR;
if (nc_put_att_text(ncid, PRECT_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, PS_id, "units", 2, "Pa")) ERR;
if (nc_put_att_text(ncid, PS_id, "long_name", 16, "Surface pressure")) ERR;
if (nc_put_att_text(ncid, PS_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, PSL_id, "units", 2, "Pa")) ERR;
if (nc_put_att_text(ncid, PSL_id, "long_name", 18, "Sea level pressure")) ERR;
if (nc_put_att_text(ncid, PSL_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, Q_id, "units", 5, "kg/kg")) ERR;
if (nc_put_att_text(ncid, Q_id, "long_name", 17, "Specific humidity")) ERR;
if (nc_put_att_text(ncid, Q_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, QC_id, "units", 7, "kg/kg/s")) ERR;
if (nc_put_att_text(ncid, QC_id, "long_name", 41, "Q tendency - shallow convection LW export")) ERR;
if (nc_put_att_text(ncid, QC_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, QFLX_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, QFLX_id, "long_name", 18, "Surface water flux")) ERR;
if (nc_put_att_text(ncid, QFLX_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, QREFHT_id, "units", 5, "kg/kg")) ERR;
if (nc_put_att_text(ncid, QREFHT_id, "long_name", 25, "Reference height humidity")) ERR;
if (nc_put_att_text(ncid, QREFHT_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, QRL_id, "Sampling_Sequence", 8, "rad_lwsw")) ERR;
if (nc_put_att_text(ncid, QRL_id, "units", 3, "K/s")) ERR;
if (nc_put_att_text(ncid, QRL_id, "long_name", 21, "Longwave heating rate")) ERR;
if (nc_put_att_text(ncid, QRL_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, QRS_id, "Sampling_Sequence", 8, "rad_lwsw")) ERR;
if (nc_put_att_text(ncid, QRS_id, "units", 3, "K/s")) ERR;
if (nc_put_att_text(ncid, QRS_id, "long_name", 18, "Solar heating rate")) ERR;
if (nc_put_att_text(ncid, QRS_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, QT_id, "units", 5, "kg/kg")) ERR;
if (nc_put_att_text(ncid, QT_id, "long_name", 24, "Total water mixing ratio")) ERR;
if (nc_put_att_text(ncid, QT_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, QTFLX_id, "units", 4, "W/m2")) ERR;
if (nc_put_att_text(ncid, QTFLX_id, "long_name", 16, "Total water flux")) ERR;
if (nc_put_att_text(ncid, QTFLX_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, RAM1_id, "units", 4, "frac")) ERR;
if (nc_put_att_text(ncid, RAM1_id, "long_name", 4, "RAM1")) ERR;
if (nc_put_att_text(ncid, RAM1_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, RELHUM_id, "units", 7, "percent")) ERR;
if (nc_put_att_text(ncid, RELHUM_id, "long_name", 17, "Relative humidity")) ERR;
if (nc_put_att_text(ncid, RELHUM_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, RHREFHT_id, "units", 8, "fraction")) ERR;
if (nc_put_att_text(ncid, RHREFHT_id, "long_name", 34, "Reference height relative humidity")) ERR;
if (nc_put_att_text(ncid, RHREFHT_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, SFCLDICE_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, SFCLDICE_id, "long_name", 19, "CLDICE surface flux")) ERR;
if (nc_put_att_text(ncid, SFCLDICE_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, SFCLDLIQ_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, SFCLDLIQ_id, "long_name", 19, "CLDLIQ surface flux")) ERR;
if (nc_put_att_text(ncid, SFCLDLIQ_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, SFI_id, "units", 8, "FRACTION")) ERR;
if (nc_put_att_text(ncid, SFI_id, "long_name", 24, "Interface-layer sat frac")) ERR;
if (nc_put_att_text(ncid, SFI_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, SFNUMICE_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, SFNUMICE_id, "long_name", 19, "NUMICE surface flux")) ERR;
if (nc_put_att_text(ncid, SFNUMICE_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, SFNUMLIQ_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, SFNUMLIQ_id, "long_name", 19, "NUMLIQ surface flux")) ERR;
if (nc_put_att_text(ncid, SFNUMLIQ_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, SHFLX_id, "units", 4, "W/m2")) ERR;
if (nc_put_att_text(ncid, SHFLX_id, "long_name", 26, "Surface sensible heat flux")) ERR;
if (nc_put_att_text(ncid, SHFLX_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, SL_id, "units", 4, "J/kg")) ERR;
if (nc_put_att_text(ncid, SL_id, "long_name", 26, "Liquid water static energy")) ERR;
if (nc_put_att_text(ncid, SL_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, SLFLX_id, "units", 4, "W/m2")) ERR;
if (nc_put_att_text(ncid, SLFLX_id, "long_name", 25, "Liquid static energy flux")) ERR;
if (nc_put_att_text(ncid, SLFLX_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, SLV_id, "units", 4, "J/kg")) ERR;
if (nc_put_att_text(ncid, SLV_id, "long_name", 29, "Liq wat virtual static energy")) ERR;
if (nc_put_att_text(ncid, SLV_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, SNOWHICE_id, "units", 1, "m")) ERR;
if (nc_put_att_text(ncid, SNOWHICE_id, "long_name", 27, "Water equivalent snow depth")) ERR;
if (nc_put_att_text(ncid, SNOWHICE_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, SNOWHLND_id, "units", 1, "m")) ERR;
if (nc_put_att_text(ncid, SNOWHLND_id, "long_name", 27, "Water equivalent snow depth")) ERR;
if (nc_put_att_text(ncid, SNOWHLND_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, SO2_id, "units", 5, "kg/kg")) ERR;
if (nc_put_att_text(ncid, SO2_id, "long_name", 3, "SO2")) ERR;
if (nc_put_att_text(ncid, SO2_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, SO2_CLXF_id, "units", 11, "molec/cm2/s")) ERR;
if (nc_put_att_text(ncid, SO2_CLXF_id, "long_name", 47, "vertically integrated external forcing for SO2")) ERR;
if (nc_put_att_text(ncid, SO2_CLXF_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, SO2_XFRC_id, "units", 11, "molec/cm3/s")) ERR;
if (nc_put_att_text(ncid, SO2_XFRC_id, "long_name", 24, "external forcing for SO2")) ERR;
if (nc_put_att_text(ncid, SO2_XFRC_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, SOAG_id, "units", 5, "kg/kg")) ERR;
if (nc_put_att_text(ncid, SOAG_id, "long_name", 4, "SOAG")) ERR;
if (nc_put_att_text(ncid, SOAG_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, SOAG_sfgaex1_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, SOAG_sfgaex1_id, "long_name", 49, "SOAG gas-aerosol-exchange primary column tendency")) ERR;
if (nc_put_att_text(ncid, SOAG_sfgaex1_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, SOLIN_id, "Sampling_Sequence", 8, "rad_lwsw")) ERR;
if (nc_put_att_text(ncid, SOLIN_id, "units", 4, "W/m2")) ERR;
if (nc_put_att_text(ncid, SOLIN_id, "long_name", 16, "Solar insolation")) ERR;
if (nc_put_att_text(ncid, SOLIN_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, SPROD_id, "units", 5, "M2/S3")) ERR;
if (nc_put_att_text(ncid, SPROD_id, "long_name", 16, "Shear Production")) ERR;
if (nc_put_att_text(ncid, SPROD_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, SRFRAD_id, "units", 4, "W/m2")) ERR;
if (nc_put_att_text(ncid, SRFRAD_id, "long_name", 29, "Net radiative flux at surface")) ERR;
if (nc_put_att_text(ncid, SRFRAD_id, "cell_methods", 10, "time: mean")) ERR;
{ /* _FillValue */
static const double SSAVIS_FillValue_att[1] = {1e+36} ;
if (nc_put_att_double(ncid, SSAVIS_id, "_FillValue", NC_DOUBLE, 1, SSAVIS_FillValue_att)) ERR;
}
{ /* missing_value */
static const double SSAVIS_missing_value_att[1] = {1e+36} ;
if (nc_put_att_double(ncid, SSAVIS_id, "missing_value", NC_DOUBLE, 1, SSAVIS_missing_value_att)) ERR;
}
if (nc_put_att_text(ncid, SSAVIS_id, "units", 1, "\000")) ERR;
if (nc_put_att_text(ncid, SSAVIS_id, "long_name", 29, "Aerosol singel-scatter albedo")) ERR;
if (nc_put_att_text(ncid, SSAVIS_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, SSTODXC_id, "units", 3, "Tau")) ERR;
if (nc_put_att_text(ncid, SSTODXC_id, "long_name", 29, "Optical depth for diagnostics")) ERR;
if (nc_put_att_text(ncid, SSTODXC_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, SSTSFDRY_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, SSTSFDRY_id, "long_name", 30, "Dry deposition flux at surface")) ERR;
if (nc_put_att_text(ncid, SSTSFDRY_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, SSTSFMBL_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, SSTSFMBL_id, "long_name", 28, "Mobilization flux at surface")) ERR;
if (nc_put_att_text(ncid, SSTSFMBL_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, SSTSFWET_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, SSTSFWET_id, "long_name", 30, "Wet deposition flux at surface")) ERR;
if (nc_put_att_text(ncid, SSTSFWET_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, SWCF_id, "Sampling_Sequence", 8, "rad_lwsw")) ERR;
if (nc_put_att_text(ncid, SWCF_id, "units", 4, "W/m2")) ERR;
if (nc_put_att_text(ncid, SWCF_id, "long_name", 23, "Shortwave cloud forcing")) ERR;
if (nc_put_att_text(ncid, SWCF_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, T_id, "units", 1, "K")) ERR;
if (nc_put_att_text(ncid, T_id, "long_name", 11, "Temperature")) ERR;
if (nc_put_att_text(ncid, T_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, TAUTMSX_id, "units", 4, "N/m2")) ERR;
if (nc_put_att_text(ncid, TAUTMSX_id, "long_name", 44, "Zonal turbulent mountain surface stress")) ERR;
if (nc_put_att_text(ncid, TAUTMSX_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, TAUTMSY_id, "units", 4, "N/m2")) ERR;
if (nc_put_att_text(ncid, TAUTMSY_id, "long_name", 44, "Meridional turbulent mountain surface stress")) ERR;
if (nc_put_att_text(ncid, TAUTMSY_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, TAUX_id, "units", 4, "N/m2")) ERR;
if (nc_put_att_text(ncid, TAUX_id, "long_name", 20, "Zonal surface stress")) ERR;
if (nc_put_att_text(ncid, TAUX_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, TAUY_id, "units", 4, "N/m2")) ERR;
if (nc_put_att_text(ncid, TAUY_id, "long_name", 25, "Meridional surface stress")) ERR;
if (nc_put_att_text(ncid, TAUY_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, TGCLDCWP_id, "units", 5, "kg/m2")) ERR;
if (nc_put_att_text(ncid, TGCLDCWP_id, "long_name", 48, "Total grid-box cloud water path (liquid and ice)")) ERR;
if (nc_put_att_text(ncid, TGCLDCWP_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, TGCLDIWP_id, "units", 5, "kg/m2")) ERR;
if (nc_put_att_text(ncid, TGCLDIWP_id, "long_name", 35, "Total grid-box cloud ice water path")) ERR;
if (nc_put_att_text(ncid, TGCLDIWP_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, TGCLDLWP_id, "units", 5, "kg/m2")) ERR;
if (nc_put_att_text(ncid, TGCLDLWP_id, "long_name", 38, "Total grid-box cloud liquid water path")) ERR;
if (nc_put_att_text(ncid, TGCLDLWP_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, TKE_id, "units", 5, "m2/s2")) ERR;
if (nc_put_att_text(ncid, TKE_id, "long_name", 24, "Turbulent Kinetic Energy")) ERR;
if (nc_put_att_text(ncid, TKE_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, TMQ_id, "units", 5, "kg/m2")) ERR;
if (nc_put_att_text(ncid, TMQ_id, "long_name", 50, "Total (vertically integrated) precipitatable water")) ERR;
if (nc_put_att_text(ncid, TMQ_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, TREFHT_id, "units", 1, "K")) ERR;
if (nc_put_att_text(ncid, TREFHT_id, "long_name", 28, "Reference height temperature")) ERR;
if (nc_put_att_text(ncid, TREFHT_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, TREFMNAV_id, "units", 1, "K")) ERR;
if (nc_put_att_text(ncid, TREFMNAV_id, "long_name", 31, "Average of TREFHT daily minimum")) ERR;
if (nc_put_att_text(ncid, TREFMNAV_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, TREFMXAV_id, "units", 1, "K")) ERR;
if (nc_put_att_text(ncid, TREFMXAV_id, "long_name", 31, "Average of TREFHT daily maximum")) ERR;
if (nc_put_att_text(ncid, TREFMXAV_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, TROP_FD_id, "units", 11, "probability")) ERR;
if (nc_put_att_text(ncid, TROP_FD_id, "long_name", 16, "Tropopause Found")) ERR;
if (nc_put_att_text(ncid, TROP_FD_id, "cell_methods", 10, "time: mean")) ERR;
{ /* _FillValue */
static const double TROP_P_FillValue_att[1] = {1e+36} ;
if (nc_put_att_double(ncid, TROP_P_id, "_FillValue", NC_DOUBLE, 1, TROP_P_FillValue_att)) ERR;
}
{ /* missing_value */
static const double TROP_P_missing_value_att[1] = {1e+36} ;
if (nc_put_att_double(ncid, TROP_P_id, "missing_value", NC_DOUBLE, 1, TROP_P_missing_value_att)) ERR;
}
if (nc_put_att_text(ncid, TROP_P_id, "units", 2, "Pa")) ERR;
if (nc_put_att_text(ncid, TROP_P_id, "long_name", 19, "Tropopause Pressure")) ERR;
if (nc_put_att_text(ncid, TROP_P_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, TROP_PD_id, "units", 11, "probability")) ERR;
if (nc_put_att_text(ncid, TROP_PD_id, "long_name", 21, "Tropopause Probability")) ERR;
if (nc_put_att_text(ncid, TROP_PD_id, "cell_methods", 10, "time: mean")) ERR;
{ /* _FillValue */
static const double TROP_T_FillValue_att[1] = {1e+36} ;
if (nc_put_att_double(ncid, TROP_T_id, "_FillValue", NC_DOUBLE, 1, TROP_T_FillValue_att)) ERR;
}
{ /* missing_value */
static const double TROP_T_missing_value_att[1] = {1e+36} ;
if (nc_put_att_double(ncid, TROP_T_id, "missing_value", NC_DOUBLE, 1, TROP_T_missing_value_att)) ERR;
}
if (nc_put_att_text(ncid, TROP_T_id, "units", 1, "K")) ERR;
if (nc_put_att_text(ncid, TROP_T_id, "long_name", 22, "Tropopause Temperature")) ERR;
if (nc_put_att_text(ncid, TROP_T_id, "cell_methods", 10, "time: mean")) ERR;
{ /* _FillValue */
static const double TROP_Z_FillValue_att[1] = {1e+36} ;
if (nc_put_att_double(ncid, TROP_Z_id, "_FillValue", NC_DOUBLE, 1, TROP_Z_FillValue_att)) ERR;
}
{ /* missing_value */
static const double TROP_Z_missing_value_att[1] = {1e+36} ;
if (nc_put_att_double(ncid, TROP_Z_id, "missing_value", NC_DOUBLE, 1, TROP_Z_missing_value_att)) ERR;
}
if (nc_put_att_text(ncid, TROP_Z_id, "units", 1, "m")) ERR;
if (nc_put_att_text(ncid, TROP_Z_id, "long_name", 17, "Tropopause Height")) ERR;
if (nc_put_att_text(ncid, TROP_Z_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, TS_id, "units", 1, "K")) ERR;
if (nc_put_att_text(ncid, TS_id, "long_name", 31, "Surface temperature (radiative)")) ERR;
if (nc_put_att_text(ncid, TS_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, TSMN_id, "units", 1, "K")) ERR;
if (nc_put_att_text(ncid, TSMN_id, "long_name", 46, "Minimum surface temperature over output period")) ERR;
if (nc_put_att_text(ncid, TSMN_id, "cell_methods", 13, "time: minimum")) ERR;
if (nc_put_att_text(ncid, TSMX_id, "units", 1, "K")) ERR;
if (nc_put_att_text(ncid, TSMX_id, "long_name", 46, "Maximum surface temperature over output period")) ERR;
if (nc_put_att_text(ncid, TSMX_id, "cell_methods", 13, "time: maximum")) ERR;
if (nc_put_att_text(ncid, U_id, "units", 3, "m/s")) ERR;
if (nc_put_att_text(ncid, U_id, "long_name", 10, "Zonal wind")) ERR;
if (nc_put_att_text(ncid, U_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, UFLX_id, "units", 4, "W/m2")) ERR;
if (nc_put_att_text(ncid, UFLX_id, "long_name", 19, "Zonal momentum flux")) ERR;
if (nc_put_att_text(ncid, UFLX_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, US_id, "units", 3, "m/s")) ERR;
if (nc_put_att_text(ncid, US_id, "long_name", 21, "Zonal wind, staggered")) ERR;
if (nc_put_att_text(ncid, US_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, UU_id, "units", 5, "m2/s2")) ERR;
if (nc_put_att_text(ncid, UU_id, "long_name", 22, "Zonal velocity squared")) ERR;
if (nc_put_att_text(ncid, UU_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, V_id, "units", 3, "m/s")) ERR;
if (nc_put_att_text(ncid, V_id, "long_name", 15, "Meridional wind")) ERR;
if (nc_put_att_text(ncid, V_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, VD01_id, "units", 7, "kg/kg/s")) ERR;
if (nc_put_att_text(ncid, VD01_id, "long_name", 23, "Vertical diffusion of Q")) ERR;
if (nc_put_att_text(ncid, VD01_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, VFLX_id, "units", 4, "W/m2")) ERR;
if (nc_put_att_text(ncid, VFLX_id, "long_name", 23, "Meridional momentm flux")) ERR;
if (nc_put_att_text(ncid, VFLX_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, VQ_id, "units", 8, "m/skg/kg")) ERR;
if (nc_put_att_text(ncid, VQ_id, "long_name", 26, "Meridional water transport")) ERR;
if (nc_put_att_text(ncid, VQ_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, VS_id, "units", 3, "m/s")) ERR;
if (nc_put_att_text(ncid, VS_id, "long_name", 26, "Meridional wind, staggered")) ERR;
if (nc_put_att_text(ncid, VS_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, VT_id, "units", 5, "K m/s")) ERR;
if (nc_put_att_text(ncid, VT_id, "long_name", 25, "Meridional heat transport")) ERR;
if (nc_put_att_text(ncid, VT_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, VU_id, "units", 5, "m2/s2")) ERR;
if (nc_put_att_text(ncid, VU_id, "long_name", 33, "Meridional flux of zonal momentum")) ERR;
if (nc_put_att_text(ncid, VU_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, VV_id, "units", 5, "m2/s2")) ERR;
if (nc_put_att_text(ncid, VV_id, "long_name", 27, "Meridional velocity squared")) ERR;
if (nc_put_att_text(ncid, VV_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, WGUSTD_id, "units", 3, "m/s")) ERR;
if (nc_put_att_text(ncid, WGUSTD_id, "long_name", 26, "wind gusts from turbulence")) ERR;
if (nc_put_att_text(ncid, WGUSTD_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, WTKE_id, "units", 3, "m/s")) ERR;
if (nc_put_att_text(ncid, WTKE_id, "long_name", 38, "Standard deviation of updraft velocity")) ERR;
if (nc_put_att_text(ncid, WTKE_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, XPH_LWC_id, "units", 5, "kg/kg")) ERR;
if (nc_put_att_text(ncid, XPH_LWC_id, "long_name", 26, "pH value multiplied by lwc")) ERR;
if (nc_put_att_text(ncid, XPH_LWC_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, Z3_id, "units", 1, "m")) ERR;
if (nc_put_att_text(ncid, Z3_id, "long_name", 37, "Geopotential Height (above sea level)")) ERR;
if (nc_put_att_text(ncid, Z3_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, airFV_id, "units", 4, "frac")) ERR;
if (nc_put_att_text(ncid, airFV_id, "long_name", 2, "FV")) ERR;
if (nc_put_att_text(ncid, airFV_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, bc_a1_id, "units", 5, "kg/kg")) ERR;
if (nc_put_att_text(ncid, bc_a1_id, "long_name", 5, "bc_a1")) ERR;
if (nc_put_att_text(ncid, bc_a1_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, bc_a1DDF_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, bc_a1DDF_id, "long_name", 49, "bc_a1 dry deposition flux at bottom (grav + turb)")) ERR;
if (nc_put_att_text(ncid, bc_a1DDF_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, bc_a1GVF_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, bc_a1GVF_id, "long_name", 39, "bc_a1 gravitational dry deposition flux")) ERR;
if (nc_put_att_text(ncid, bc_a1GVF_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, bc_a1SFSBC_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, bc_a1SFSBC_id, "long_name", 55, "Wet deposition flux (belowcloud, convective) at surface")) ERR;
if (nc_put_att_text(ncid, bc_a1SFSBC_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, bc_a1SFSBS_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, bc_a1SFSBS_id, "long_name", 55, "Wet deposition flux (belowcloud, stratiform) at surface")) ERR;
if (nc_put_att_text(ncid, bc_a1SFSBS_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, bc_a1SFSIC_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, bc_a1SFSIC_id, "long_name", 52, "Wet deposition flux (incloud, convective) at surface")) ERR;
if (nc_put_att_text(ncid, bc_a1SFSIC_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, bc_a1SFSIS_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, bc_a1SFSIS_id, "long_name", 52, "Wet deposition flux (incloud, stratiform) at surface")) ERR;
if (nc_put_att_text(ncid, bc_a1SFSIS_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, bc_a1SFWET_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, bc_a1SFWET_id, "long_name", 30, "Wet deposition flux at surface")) ERR;
if (nc_put_att_text(ncid, bc_a1SFWET_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, bc_a1TBF_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, bc_a1TBF_id, "long_name", 35, "bc_a1 turbulent dry deposition flux")) ERR;
if (nc_put_att_text(ncid, bc_a1TBF_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, bc_a1_CLXF_id, "units", 11, "molec/cm2/s")) ERR;
if (nc_put_att_text(ncid, bc_a1_CLXF_id, "long_name", 49, "vertically integrated external forcing for bc_a1")) ERR;
if (nc_put_att_text(ncid, bc_a1_CLXF_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, bc_a1_XFRC_id, "units", 11, "molec/cm3/s")) ERR;
if (nc_put_att_text(ncid, bc_a1_XFRC_id, "long_name", 26, "external forcing for bc_a1")) ERR;
if (nc_put_att_text(ncid, bc_a1_XFRC_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, bc_c1_id, "units", 5, "kg/kg")) ERR;
if (nc_put_att_text(ncid, bc_c1_id, "long_name", 20, "bc_c1 in cloud water")) ERR;
if (nc_put_att_text(ncid, bc_c1_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, bc_c1DDF_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, bc_c1DDF_id, "long_name", 49, "bc_c1 dry deposition flux at bottom (grav + turb)")) ERR;
if (nc_put_att_text(ncid, bc_c1DDF_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, bc_c1GVF_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, bc_c1GVF_id, "long_name", 39, "bc_c1 gravitational dry deposition flux")) ERR;
if (nc_put_att_text(ncid, bc_c1GVF_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, bc_c1SFSBC_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, bc_c1SFSBC_id, "long_name", 61, "bc_c1 wet deposition flux (belowcloud, convective) at surface")) ERR;
if (nc_put_att_text(ncid, bc_c1SFSBC_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, bc_c1SFSBS_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, bc_c1SFSBS_id, "long_name", 61, "bc_c1 wet deposition flux (belowcloud, stratiform) at surface")) ERR;
if (nc_put_att_text(ncid, bc_c1SFSBS_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, bc_c1SFSIC_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, bc_c1SFSIC_id, "long_name", 58, "bc_c1 wet deposition flux (incloud, convective) at surface")) ERR;
if (nc_put_att_text(ncid, bc_c1SFSIC_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, bc_c1SFSIS_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, bc_c1SFSIS_id, "long_name", 58, "bc_c1 wet deposition flux (incloud, stratiform) at surface")) ERR;
if (nc_put_att_text(ncid, bc_c1SFSIS_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, bc_c1SFWET_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, bc_c1SFWET_id, "long_name", 36, "bc_c1 wet deposition flux at surface")) ERR;
if (nc_put_att_text(ncid, bc_c1SFWET_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, bc_c1TBF_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, bc_c1TBF_id, "long_name", 35, "bc_c1 turbulent dry deposition flux")) ERR;
if (nc_put_att_text(ncid, bc_c1TBF_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, chem_trop_id, "units", 22, "fraction of model time")) ERR;
if (nc_put_att_text(ncid, chem_trop_id, "long_name", 41, "Lowest level with stratospheric chemsitry")) ERR;
if (nc_put_att_text(ncid, chem_trop_tropop_id, "units", 22, "fraction of model time")) ERR;
if (nc_put_att_text(ncid, chem_trop_tropop_id, "long_name", 44, "Troposphere boundary calculated in chemistry")) ERR;
if (nc_put_att_text(ncid, dgnd_a01_id, "units", 1, "m")) ERR;
if (nc_put_att_text(ncid, dgnd_a01_id, "long_name", 32, "dry dgnum, interstitial, mode 01")) ERR;
if (nc_put_att_text(ncid, dgnd_a01_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, dgnd_a02_id, "units", 1, "m")) ERR;
if (nc_put_att_text(ncid, dgnd_a02_id, "long_name", 32, "dry dgnum, interstitial, mode 02")) ERR;
if (nc_put_att_text(ncid, dgnd_a02_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, dgnd_a03_id, "units", 1, "m")) ERR;
if (nc_put_att_text(ncid, dgnd_a03_id, "long_name", 32, "dry dgnum, interstitial, mode 03")) ERR;
if (nc_put_att_text(ncid, dgnd_a03_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, dgnw_a01_id, "units", 1, "m")) ERR;
if (nc_put_att_text(ncid, dgnw_a01_id, "long_name", 32, "wet dgnum, interstitial, mode 01")) ERR;
if (nc_put_att_text(ncid, dgnw_a01_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, dgnw_a02_id, "units", 1, "m")) ERR;
if (nc_put_att_text(ncid, dgnw_a02_id, "long_name", 32, "wet dgnum, interstitial, mode 02")) ERR;
if (nc_put_att_text(ncid, dgnw_a02_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, dgnw_a03_id, "units", 1, "m")) ERR;
if (nc_put_att_text(ncid, dgnw_a03_id, "long_name", 32, "wet dgnum, interstitial, mode 03")) ERR;
if (nc_put_att_text(ncid, dgnw_a03_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, dst_a1_id, "units", 5, "kg/kg")) ERR;
if (nc_put_att_text(ncid, dst_a1_id, "long_name", 6, "dst_a1")) ERR;
if (nc_put_att_text(ncid, dst_a1_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, dst_a1DDF_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, dst_a1DDF_id, "long_name", 50, "dst_a1 dry deposition flux at bottom (grav + turb)")) ERR;
if (nc_put_att_text(ncid, dst_a1DDF_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, dst_a1GVF_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, dst_a1GVF_id, "long_name", 40, "dst_a1 gravitational dry deposition flux")) ERR;
if (nc_put_att_text(ncid, dst_a1GVF_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, dst_a1SF_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, dst_a1SF_id, "long_name", 28, "dst_a1 dust surface emission")) ERR;
if (nc_put_att_text(ncid, dst_a1SF_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, dst_a1SFSBC_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, dst_a1SFSBC_id, "long_name", 55, "Wet deposition flux (belowcloud, convective) at surface")) ERR;
if (nc_put_att_text(ncid, dst_a1SFSBC_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, dst_a1SFSBS_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, dst_a1SFSBS_id, "long_name", 55, "Wet deposition flux (belowcloud, stratiform) at surface")) ERR;
if (nc_put_att_text(ncid, dst_a1SFSBS_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, dst_a1SFSIC_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, dst_a1SFSIC_id, "long_name", 52, "Wet deposition flux (incloud, convective) at surface")) ERR;
if (nc_put_att_text(ncid, dst_a1SFSIC_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, dst_a1SFSIS_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, dst_a1SFSIS_id, "long_name", 52, "Wet deposition flux (incloud, stratiform) at surface")) ERR;
if (nc_put_att_text(ncid, dst_a1SFSIS_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, dst_a1SFWET_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, dst_a1SFWET_id, "long_name", 30, "Wet deposition flux at surface")) ERR;
if (nc_put_att_text(ncid, dst_a1SFWET_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, dst_a1TBF_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, dst_a1TBF_id, "long_name", 36, "dst_a1 turbulent dry deposition flux")) ERR;
if (nc_put_att_text(ncid, dst_a1TBF_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, dst_a3_id, "units", 5, "kg/kg")) ERR;
if (nc_put_att_text(ncid, dst_a3_id, "long_name", 6, "dst_a3")) ERR;
if (nc_put_att_text(ncid, dst_a3_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, dst_a3DDF_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, dst_a3DDF_id, "long_name", 50, "dst_a3 dry deposition flux at bottom (grav + turb)")) ERR;
if (nc_put_att_text(ncid, dst_a3DDF_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, dst_a3GVF_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, dst_a3GVF_id, "long_name", 40, "dst_a3 gravitational dry deposition flux")) ERR;
if (nc_put_att_text(ncid, dst_a3GVF_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, dst_a3SF_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, dst_a3SF_id, "long_name", 28, "dst_a3 dust surface emission")) ERR;
if (nc_put_att_text(ncid, dst_a3SF_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, dst_a3SFSBC_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, dst_a3SFSBC_id, "long_name", 55, "Wet deposition flux (belowcloud, convective) at surface")) ERR;
if (nc_put_att_text(ncid, dst_a3SFSBC_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, dst_a3SFSBS_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, dst_a3SFSBS_id, "long_name", 55, "Wet deposition flux (belowcloud, stratiform) at surface")) ERR;
if (nc_put_att_text(ncid, dst_a3SFSBS_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, dst_a3SFSIC_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, dst_a3SFSIC_id, "long_name", 52, "Wet deposition flux (incloud, convective) at surface")) ERR;
if (nc_put_att_text(ncid, dst_a3SFSIC_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, dst_a3SFSIS_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, dst_a3SFSIS_id, "long_name", 52, "Wet deposition flux (incloud, stratiform) at surface")) ERR;
if (nc_put_att_text(ncid, dst_a3SFSIS_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, dst_a3SFWET_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, dst_a3SFWET_id, "long_name", 30, "Wet deposition flux at surface")) ERR;
if (nc_put_att_text(ncid, dst_a3SFWET_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, dst_a3TBF_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, dst_a3TBF_id, "long_name", 36, "dst_a3 turbulent dry deposition flux")) ERR;
if (nc_put_att_text(ncid, dst_a3TBF_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, dst_c1_id, "units", 5, "kg/kg")) ERR;
if (nc_put_att_text(ncid, dst_c1_id, "long_name", 21, "dst_c1 in cloud water")) ERR;
if (nc_put_att_text(ncid, dst_c1_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, dst_c1DDF_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, dst_c1DDF_id, "long_name", 50, "dst_c1 dry deposition flux at bottom (grav + turb)")) ERR;
if (nc_put_att_text(ncid, dst_c1DDF_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, dst_c1GVF_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, dst_c1GVF_id, "long_name", 40, "dst_c1 gravitational dry deposition flux")) ERR;
if (nc_put_att_text(ncid, dst_c1GVF_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, dst_c1SFSBC_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, dst_c1SFSBC_id, "long_name", 62, "dst_c1 wet deposition flux (belowcloud, convective) at surface")) ERR;
if (nc_put_att_text(ncid, dst_c1SFSBC_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, dst_c1SFSBS_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, dst_c1SFSBS_id, "long_name", 62, "dst_c1 wet deposition flux (belowcloud, stratiform) at surface")) ERR;
if (nc_put_att_text(ncid, dst_c1SFSBS_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, dst_c1SFSIC_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, dst_c1SFSIC_id, "long_name", 59, "dst_c1 wet deposition flux (incloud, convective) at surface")) ERR;
if (nc_put_att_text(ncid, dst_c1SFSIC_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, dst_c1SFSIS_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, dst_c1SFSIS_id, "long_name", 59, "dst_c1 wet deposition flux (incloud, stratiform) at surface")) ERR;
if (nc_put_att_text(ncid, dst_c1SFSIS_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, dst_c1SFWET_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, dst_c1SFWET_id, "long_name", 37, "dst_c1 wet deposition flux at surface")) ERR;
if (nc_put_att_text(ncid, dst_c1SFWET_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, dst_c1TBF_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, dst_c1TBF_id, "long_name", 36, "dst_c1 turbulent dry deposition flux")) ERR;
if (nc_put_att_text(ncid, dst_c1TBF_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, dst_c3_id, "units", 5, "kg/kg")) ERR;
if (nc_put_att_text(ncid, dst_c3_id, "long_name", 21, "dst_c3 in cloud water")) ERR;
if (nc_put_att_text(ncid, dst_c3_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, dst_c3DDF_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, dst_c3DDF_id, "long_name", 50, "dst_c3 dry deposition flux at bottom (grav + turb)")) ERR;
if (nc_put_att_text(ncid, dst_c3DDF_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, dst_c3GVF_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, dst_c3GVF_id, "long_name", 40, "dst_c3 gravitational dry deposition flux")) ERR;
if (nc_put_att_text(ncid, dst_c3GVF_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, dst_c3SFSBC_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, dst_c3SFSBC_id, "long_name", 62, "dst_c3 wet deposition flux (belowcloud, convective) at surface")) ERR;
if (nc_put_att_text(ncid, dst_c3SFSBC_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, dst_c3SFSBS_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, dst_c3SFSBS_id, "long_name", 62, "dst_c3 wet deposition flux (belowcloud, stratiform) at surface")) ERR;
if (nc_put_att_text(ncid, dst_c3SFSBS_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, dst_c3SFSIC_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, dst_c3SFSIC_id, "long_name", 59, "dst_c3 wet deposition flux (incloud, convective) at surface")) ERR;
if (nc_put_att_text(ncid, dst_c3SFSIC_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, dst_c3SFSIS_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, dst_c3SFSIS_id, "long_name", 59, "dst_c3 wet deposition flux (incloud, stratiform) at surface")) ERR;
if (nc_put_att_text(ncid, dst_c3SFSIS_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, dst_c3SFWET_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, dst_c3SFWET_id, "long_name", 37, "dst_c3 wet deposition flux at surface")) ERR;
if (nc_put_att_text(ncid, dst_c3SFWET_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, dst_c3TBF_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, dst_c3TBF_id, "long_name", 36, "dst_c3 turbulent dry deposition flux")) ERR;
if (nc_put_att_text(ncid, dst_c3TBF_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, ncl_a1_id, "units", 5, "kg/kg")) ERR;
if (nc_put_att_text(ncid, ncl_a1_id, "long_name", 6, "ncl_a1")) ERR;
if (nc_put_att_text(ncid, ncl_a1_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, ncl_a1DDF_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, ncl_a1DDF_id, "long_name", 50, "ncl_a1 dry deposition flux at bottom (grav + turb)")) ERR;
if (nc_put_att_text(ncid, ncl_a1DDF_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, ncl_a1GVF_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, ncl_a1GVF_id, "long_name", 40, "ncl_a1 gravitational dry deposition flux")) ERR;
if (nc_put_att_text(ncid, ncl_a1GVF_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, ncl_a1SF_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, ncl_a1SF_id, "long_name", 36, "ncl_a1 progseasalts surface emission")) ERR;
if (nc_put_att_text(ncid, ncl_a1SF_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, ncl_a1SFSBC_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, ncl_a1SFSBC_id, "long_name", 55, "Wet deposition flux (belowcloud, convective) at surface")) ERR;
if (nc_put_att_text(ncid, ncl_a1SFSBC_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, ncl_a1SFSBS_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, ncl_a1SFSBS_id, "long_name", 55, "Wet deposition flux (belowcloud, stratiform) at surface")) ERR;
if (nc_put_att_text(ncid, ncl_a1SFSBS_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, ncl_a1SFSIC_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, ncl_a1SFSIC_id, "long_name", 52, "Wet deposition flux (incloud, convective) at surface")) ERR;
if (nc_put_att_text(ncid, ncl_a1SFSIC_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, ncl_a1SFSIS_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, ncl_a1SFSIS_id, "long_name", 52, "Wet deposition flux (incloud, stratiform) at surface")) ERR;
if (nc_put_att_text(ncid, ncl_a1SFSIS_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, ncl_a1SFWET_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, ncl_a1SFWET_id, "long_name", 30, "Wet deposition flux at surface")) ERR;
if (nc_put_att_text(ncid, ncl_a1SFWET_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, ncl_a1TBF_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, ncl_a1TBF_id, "long_name", 36, "ncl_a1 turbulent dry deposition flux")) ERR;
if (nc_put_att_text(ncid, ncl_a1TBF_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, ncl_a1_sfcoag1_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, ncl_a1_sfcoag1_id, "long_name", 45, "ncl_a1 modal_aero coagulation column tendency")) ERR;
if (nc_put_att_text(ncid, ncl_a1_sfcoag1_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, ncl_a1_sfcsiz3_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, ncl_a1_sfcsiz3_id, "long_name", 54, "ncl_a1 calcsize aitken-to-accum adjust column tendency")) ERR;
if (nc_put_att_text(ncid, ncl_a1_sfcsiz3_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, ncl_a1_sfcsiz4_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, ncl_a1_sfcsiz4_id, "long_name", 54, "ncl_a1 calcsize accum-to-aitken adjust column tendency")) ERR;
if (nc_put_att_text(ncid, ncl_a1_sfcsiz4_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, ncl_a1_sfgaex2_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, ncl_a1_sfgaex2_id, "long_name", 52, "ncl_a1 gas-aerosol-exchange renaming column tendency")) ERR;
if (nc_put_att_text(ncid, ncl_a1_sfgaex2_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, ncl_a2_id, "units", 5, "kg/kg")) ERR;
if (nc_put_att_text(ncid, ncl_a2_id, "long_name", 6, "ncl_a2")) ERR;
if (nc_put_att_text(ncid, ncl_a2_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, ncl_a2DDF_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, ncl_a2DDF_id, "long_name", 50, "ncl_a2 dry deposition flux at bottom (grav + turb)")) ERR;
if (nc_put_att_text(ncid, ncl_a2DDF_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, ncl_a2GVF_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, ncl_a2GVF_id, "long_name", 40, "ncl_a2 gravitational dry deposition flux")) ERR;
if (nc_put_att_text(ncid, ncl_a2GVF_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, ncl_a2SF_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, ncl_a2SF_id, "long_name", 36, "ncl_a2 progseasalts surface emission")) ERR;
if (nc_put_att_text(ncid, ncl_a2SF_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, ncl_a2SFSBC_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, ncl_a2SFSBC_id, "long_name", 55, "Wet deposition flux (belowcloud, convective) at surface")) ERR;
if (nc_put_att_text(ncid, ncl_a2SFSBC_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, ncl_a2SFSBS_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, ncl_a2SFSBS_id, "long_name", 55, "Wet deposition flux (belowcloud, stratiform) at surface")) ERR;
if (nc_put_att_text(ncid, ncl_a2SFSBS_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, ncl_a2SFSIC_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, ncl_a2SFSIC_id, "long_name", 52, "Wet deposition flux (incloud, convective) at surface")) ERR;
if (nc_put_att_text(ncid, ncl_a2SFSIC_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, ncl_a2SFSIS_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, ncl_a2SFSIS_id, "long_name", 52, "Wet deposition flux (incloud, stratiform) at surface")) ERR;
if (nc_put_att_text(ncid, ncl_a2SFSIS_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, ncl_a2SFWET_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, ncl_a2SFWET_id, "long_name", 30, "Wet deposition flux at surface")) ERR;
if (nc_put_att_text(ncid, ncl_a2SFWET_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, ncl_a2TBF_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, ncl_a2TBF_id, "long_name", 36, "ncl_a2 turbulent dry deposition flux")) ERR;
if (nc_put_att_text(ncid, ncl_a2TBF_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, ncl_a2_sfcoag1_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, ncl_a2_sfcoag1_id, "long_name", 45, "ncl_a2 modal_aero coagulation column tendency")) ERR;
if (nc_put_att_text(ncid, ncl_a2_sfcoag1_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, ncl_a2_sfcsiz3_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, ncl_a2_sfcsiz3_id, "long_name", 54, "ncl_a2 calcsize aitken-to-accum adjust column tendency")) ERR;
if (nc_put_att_text(ncid, ncl_a2_sfcsiz3_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, ncl_a2_sfcsiz4_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, ncl_a2_sfcsiz4_id, "long_name", 54, "ncl_a2 calcsize accum-to-aitken adjust column tendency")) ERR;
if (nc_put_att_text(ncid, ncl_a2_sfcsiz4_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, ncl_a2_sfgaex2_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, ncl_a2_sfgaex2_id, "long_name", 52, "ncl_a2 gas-aerosol-exchange renaming column tendency")) ERR;
if (nc_put_att_text(ncid, ncl_a2_sfgaex2_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, ncl_a3_id, "units", 5, "kg/kg")) ERR;
if (nc_put_att_text(ncid, ncl_a3_id, "long_name", 6, "ncl_a3")) ERR;
if (nc_put_att_text(ncid, ncl_a3_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, ncl_a3DDF_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, ncl_a3DDF_id, "long_name", 50, "ncl_a3 dry deposition flux at bottom (grav + turb)")) ERR;
if (nc_put_att_text(ncid, ncl_a3DDF_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, ncl_a3GVF_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, ncl_a3GVF_id, "long_name", 40, "ncl_a3 gravitational dry deposition flux")) ERR;
if (nc_put_att_text(ncid, ncl_a3GVF_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, ncl_a3SF_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, ncl_a3SF_id, "long_name", 36, "ncl_a3 progseasalts surface emission")) ERR;
if (nc_put_att_text(ncid, ncl_a3SF_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, ncl_a3SFSBC_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, ncl_a3SFSBC_id, "long_name", 55, "Wet deposition flux (belowcloud, convective) at surface")) ERR;
if (nc_put_att_text(ncid, ncl_a3SFSBC_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, ncl_a3SFSBS_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, ncl_a3SFSBS_id, "long_name", 55, "Wet deposition flux (belowcloud, stratiform) at surface")) ERR;
if (nc_put_att_text(ncid, ncl_a3SFSBS_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, ncl_a3SFSIC_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, ncl_a3SFSIC_id, "long_name", 52, "Wet deposition flux (incloud, convective) at surface")) ERR;
if (nc_put_att_text(ncid, ncl_a3SFSIC_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, ncl_a3SFSIS_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, ncl_a3SFSIS_id, "long_name", 52, "Wet deposition flux (incloud, stratiform) at surface")) ERR;
if (nc_put_att_text(ncid, ncl_a3SFSIS_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, ncl_a3SFWET_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, ncl_a3SFWET_id, "long_name", 30, "Wet deposition flux at surface")) ERR;
if (nc_put_att_text(ncid, ncl_a3SFWET_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, ncl_a3TBF_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, ncl_a3TBF_id, "long_name", 36, "ncl_a3 turbulent dry deposition flux")) ERR;
if (nc_put_att_text(ncid, ncl_a3TBF_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, ncl_c1_id, "units", 5, "kg/kg")) ERR;
if (nc_put_att_text(ncid, ncl_c1_id, "long_name", 21, "ncl_c1 in cloud water")) ERR;
if (nc_put_att_text(ncid, ncl_c1_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, ncl_c1DDF_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, ncl_c1DDF_id, "long_name", 50, "ncl_c1 dry deposition flux at bottom (grav + turb)")) ERR;
if (nc_put_att_text(ncid, ncl_c1DDF_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, ncl_c1GVF_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, ncl_c1GVF_id, "long_name", 40, "ncl_c1 gravitational dry deposition flux")) ERR;
if (nc_put_att_text(ncid, ncl_c1GVF_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, ncl_c1SFSBC_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, ncl_c1SFSBC_id, "long_name", 62, "ncl_c1 wet deposition flux (belowcloud, convective) at surface")) ERR;
if (nc_put_att_text(ncid, ncl_c1SFSBC_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, ncl_c1SFSBS_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, ncl_c1SFSBS_id, "long_name", 62, "ncl_c1 wet deposition flux (belowcloud, stratiform) at surface")) ERR;
if (nc_put_att_text(ncid, ncl_c1SFSBS_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, ncl_c1SFSIC_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, ncl_c1SFSIC_id, "long_name", 59, "ncl_c1 wet deposition flux (incloud, convective) at surface")) ERR;
if (nc_put_att_text(ncid, ncl_c1SFSIC_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, ncl_c1SFSIS_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, ncl_c1SFSIS_id, "long_name", 59, "ncl_c1 wet deposition flux (incloud, stratiform) at surface")) ERR;
if (nc_put_att_text(ncid, ncl_c1SFSIS_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, ncl_c1SFWET_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, ncl_c1SFWET_id, "long_name", 37, "ncl_c1 wet deposition flux at surface")) ERR;
if (nc_put_att_text(ncid, ncl_c1SFWET_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, ncl_c1TBF_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, ncl_c1TBF_id, "long_name", 36, "ncl_c1 turbulent dry deposition flux")) ERR;
if (nc_put_att_text(ncid, ncl_c1TBF_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, ncl_c1_sfcsiz3_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, ncl_c1_sfcsiz3_id, "long_name", 54, "ncl_c1 calcsize aitken-to-accum adjust column tendency")) ERR;
if (nc_put_att_text(ncid, ncl_c1_sfcsiz3_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, ncl_c1_sfcsiz4_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, ncl_c1_sfcsiz4_id, "long_name", 54, "ncl_c1 calcsize accum-to-aitken adjust column tendency")) ERR;
if (nc_put_att_text(ncid, ncl_c1_sfcsiz4_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, ncl_c1_sfgaex2_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, ncl_c1_sfgaex2_id, "long_name", 52, "ncl_c1 gas-aerosol-exchange renaming column tendency")) ERR;
if (nc_put_att_text(ncid, ncl_c1_sfgaex2_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, ncl_c2_id, "units", 5, "kg/kg")) ERR;
if (nc_put_att_text(ncid, ncl_c2_id, "long_name", 21, "ncl_c2 in cloud water")) ERR;
if (nc_put_att_text(ncid, ncl_c2_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, ncl_c2DDF_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, ncl_c2DDF_id, "long_name", 50, "ncl_c2 dry deposition flux at bottom (grav + turb)")) ERR;
if (nc_put_att_text(ncid, ncl_c2DDF_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, ncl_c2GVF_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, ncl_c2GVF_id, "long_name", 40, "ncl_c2 gravitational dry deposition flux")) ERR;
if (nc_put_att_text(ncid, ncl_c2GVF_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, ncl_c2SFSBC_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, ncl_c2SFSBC_id, "long_name", 62, "ncl_c2 wet deposition flux (belowcloud, convective) at surface")) ERR;
if (nc_put_att_text(ncid, ncl_c2SFSBC_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, ncl_c2SFSBS_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, ncl_c2SFSBS_id, "long_name", 62, "ncl_c2 wet deposition flux (belowcloud, stratiform) at surface")) ERR;
if (nc_put_att_text(ncid, ncl_c2SFSBS_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, ncl_c2SFSIC_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, ncl_c2SFSIC_id, "long_name", 59, "ncl_c2 wet deposition flux (incloud, convective) at surface")) ERR;
if (nc_put_att_text(ncid, ncl_c2SFSIC_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, ncl_c2SFSIS_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, ncl_c2SFSIS_id, "long_name", 59, "ncl_c2 wet deposition flux (incloud, stratiform) at surface")) ERR;
if (nc_put_att_text(ncid, ncl_c2SFSIS_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, ncl_c2SFWET_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, ncl_c2SFWET_id, "long_name", 37, "ncl_c2 wet deposition flux at surface")) ERR;
if (nc_put_att_text(ncid, ncl_c2SFWET_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, ncl_c2TBF_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, ncl_c2TBF_id, "long_name", 36, "ncl_c2 turbulent dry deposition flux")) ERR;
if (nc_put_att_text(ncid, ncl_c2TBF_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, ncl_c2_sfcsiz3_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, ncl_c2_sfcsiz3_id, "long_name", 54, "ncl_c2 calcsize aitken-to-accum adjust column tendency")) ERR;
if (nc_put_att_text(ncid, ncl_c2_sfcsiz3_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, ncl_c2_sfcsiz4_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, ncl_c2_sfcsiz4_id, "long_name", 54, "ncl_c2 calcsize accum-to-aitken adjust column tendency")) ERR;
if (nc_put_att_text(ncid, ncl_c2_sfcsiz4_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, ncl_c2_sfgaex2_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, ncl_c2_sfgaex2_id, "long_name", 52, "ncl_c2 gas-aerosol-exchange renaming column tendency")) ERR;
if (nc_put_att_text(ncid, ncl_c2_sfgaex2_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, ncl_c3_id, "units", 5, "kg/kg")) ERR;
if (nc_put_att_text(ncid, ncl_c3_id, "long_name", 21, "ncl_c3 in cloud water")) ERR;
if (nc_put_att_text(ncid, ncl_c3_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, ncl_c3DDF_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, ncl_c3DDF_id, "long_name", 50, "ncl_c3 dry deposition flux at bottom (grav + turb)")) ERR;
if (nc_put_att_text(ncid, ncl_c3DDF_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, ncl_c3GVF_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, ncl_c3GVF_id, "long_name", 40, "ncl_c3 gravitational dry deposition flux")) ERR;
if (nc_put_att_text(ncid, ncl_c3GVF_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, ncl_c3SFSBC_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, ncl_c3SFSBC_id, "long_name", 62, "ncl_c3 wet deposition flux (belowcloud, convective) at surface")) ERR;
if (nc_put_att_text(ncid, ncl_c3SFSBC_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, ncl_c3SFSBS_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, ncl_c3SFSBS_id, "long_name", 62, "ncl_c3 wet deposition flux (belowcloud, stratiform) at surface")) ERR;
if (nc_put_att_text(ncid, ncl_c3SFSBS_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, ncl_c3SFSIC_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, ncl_c3SFSIC_id, "long_name", 59, "ncl_c3 wet deposition flux (incloud, convective) at surface")) ERR;
if (nc_put_att_text(ncid, ncl_c3SFSIC_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, ncl_c3SFSIS_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, ncl_c3SFSIS_id, "long_name", 59, "ncl_c3 wet deposition flux (incloud, stratiform) at surface")) ERR;
if (nc_put_att_text(ncid, ncl_c3SFSIS_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, ncl_c3SFWET_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, ncl_c3SFWET_id, "long_name", 37, "ncl_c3 wet deposition flux at surface")) ERR;
if (nc_put_att_text(ncid, ncl_c3SFWET_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, ncl_c3TBF_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, ncl_c3TBF_id, "long_name", 36, "ncl_c3 turbulent dry deposition flux")) ERR;
if (nc_put_att_text(ncid, ncl_c3TBF_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, num_a1_id, "units", 5, "kg/kg")) ERR;
if (nc_put_att_text(ncid, num_a1_id, "long_name", 6, "num_a1")) ERR;
if (nc_put_att_text(ncid, num_a1_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, num_a1DDF_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, num_a1DDF_id, "long_name", 50, "num_a1 dry deposition flux at bottom (grav + turb)")) ERR;
if (nc_put_att_text(ncid, num_a1DDF_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, num_a1GVF_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, num_a1GVF_id, "long_name", 40, "num_a1 gravitational dry deposition flux")) ERR;
if (nc_put_att_text(ncid, num_a1GVF_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, num_a1SFSBC_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, num_a1SFSBC_id, "long_name", 55, "Wet deposition flux (belowcloud, convective) at surface")) ERR;
if (nc_put_att_text(ncid, num_a1SFSBC_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, num_a1SFSBS_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, num_a1SFSBS_id, "long_name", 55, "Wet deposition flux (belowcloud, stratiform) at surface")) ERR;
if (nc_put_att_text(ncid, num_a1SFSBS_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, num_a1SFSIC_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, num_a1SFSIC_id, "long_name", 52, "Wet deposition flux (incloud, convective) at surface")) ERR;
if (nc_put_att_text(ncid, num_a1SFSIC_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, num_a1SFSIS_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, num_a1SFSIS_id, "long_name", 52, "Wet deposition flux (incloud, stratiform) at surface")) ERR;
if (nc_put_att_text(ncid, num_a1SFSIS_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, num_a1SFWET_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, num_a1SFWET_id, "long_name", 30, "Wet deposition flux at surface")) ERR;
if (nc_put_att_text(ncid, num_a1SFWET_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, num_a1TBF_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, num_a1TBF_id, "long_name", 36, "num_a1 turbulent dry deposition flux")) ERR;
if (nc_put_att_text(ncid, num_a1TBF_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, num_a1_CLXF_id, "units", 11, "molec/cm2/s")) ERR;
if (nc_put_att_text(ncid, num_a1_CLXF_id, "long_name", 50, "vertically integrated external forcing for num_a1")) ERR;
if (nc_put_att_text(ncid, num_a1_CLXF_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, num_a1_XFRC_id, "units", 11, "molec/cm3/s")) ERR;
if (nc_put_att_text(ncid, num_a1_XFRC_id, "long_name", 27, "external forcing for num_a1")) ERR;
if (nc_put_att_text(ncid, num_a1_XFRC_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, num_a1_sfcoag1_id, "units", 6, "#/m2/s")) ERR;
if (nc_put_att_text(ncid, num_a1_sfcoag1_id, "long_name", 45, "num_a1 modal_aero coagulation column tendency")) ERR;
if (nc_put_att_text(ncid, num_a1_sfcoag1_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, num_a1_sfcsiz1_id, "units", 6, "#/m2/s")) ERR;
if (nc_put_att_text(ncid, num_a1_sfcsiz1_id, "long_name", 43, "num_a1 calcsize number-adjust column source")) ERR;
if (nc_put_att_text(ncid, num_a1_sfcsiz1_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, num_a1_sfcsiz2_id, "units", 6, "#/m2/s")) ERR;
if (nc_put_att_text(ncid, num_a1_sfcsiz2_id, "long_name", 41, "num_a1 calcsize number-adjust column sink")) ERR;
if (nc_put_att_text(ncid, num_a1_sfcsiz2_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, num_a1_sfcsiz3_id, "units", 6, "#/m2/s")) ERR;
if (nc_put_att_text(ncid, num_a1_sfcsiz3_id, "long_name", 54, "num_a1 calcsize aitken-to-accum adjust column tendency")) ERR;
if (nc_put_att_text(ncid, num_a1_sfcsiz3_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, num_a1_sfcsiz4_id, "units", 6, "#/m2/s")) ERR;
if (nc_put_att_text(ncid, num_a1_sfcsiz4_id, "long_name", 54, "num_a1 calcsize accum-to-aitken adjust column tendency")) ERR;
if (nc_put_att_text(ncid, num_a1_sfcsiz4_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, num_a1_sfgaex2_id, "units", 6, "#/m2/s")) ERR;
if (nc_put_att_text(ncid, num_a1_sfgaex2_id, "long_name", 52, "num_a1 gas-aerosol-exchange renaming column tendency")) ERR;
if (nc_put_att_text(ncid, num_a1_sfgaex2_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, num_a2_id, "units", 5, "kg/kg")) ERR;
if (nc_put_att_text(ncid, num_a2_id, "long_name", 6, "num_a2")) ERR;
if (nc_put_att_text(ncid, num_a2_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, num_a2DDF_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, num_a2DDF_id, "long_name", 50, "num_a2 dry deposition flux at bottom (grav + turb)")) ERR;
if (nc_put_att_text(ncid, num_a2DDF_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, num_a2GVF_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, num_a2GVF_id, "long_name", 40, "num_a2 gravitational dry deposition flux")) ERR;
if (nc_put_att_text(ncid, num_a2GVF_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, num_a2SFSBC_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, num_a2SFSBC_id, "long_name", 55, "Wet deposition flux (belowcloud, convective) at surface")) ERR;
if (nc_put_att_text(ncid, num_a2SFSBC_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, num_a2SFSBS_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, num_a2SFSBS_id, "long_name", 55, "Wet deposition flux (belowcloud, stratiform) at surface")) ERR;
if (nc_put_att_text(ncid, num_a2SFSBS_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, num_a2SFSIC_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, num_a2SFSIC_id, "long_name", 52, "Wet deposition flux (incloud, convective) at surface")) ERR;
if (nc_put_att_text(ncid, num_a2SFSIC_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, num_a2SFSIS_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, num_a2SFSIS_id, "long_name", 52, "Wet deposition flux (incloud, stratiform) at surface")) ERR;
if (nc_put_att_text(ncid, num_a2SFSIS_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, num_a2SFWET_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, num_a2SFWET_id, "long_name", 30, "Wet deposition flux at surface")) ERR;
if (nc_put_att_text(ncid, num_a2SFWET_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, num_a2TBF_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, num_a2TBF_id, "long_name", 36, "num_a2 turbulent dry deposition flux")) ERR;
if (nc_put_att_text(ncid, num_a2TBF_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, num_a2_CLXF_id, "units", 11, "molec/cm2/s")) ERR;
if (nc_put_att_text(ncid, num_a2_CLXF_id, "long_name", 50, "vertically integrated external forcing for num_a2")) ERR;
if (nc_put_att_text(ncid, num_a2_CLXF_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, num_a2_XFRC_id, "units", 11, "molec/cm3/s")) ERR;
if (nc_put_att_text(ncid, num_a2_XFRC_id, "long_name", 27, "external forcing for num_a2")) ERR;
if (nc_put_att_text(ncid, num_a2_XFRC_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, num_a2_sfcoag1_id, "units", 6, "#/m2/s")) ERR;
if (nc_put_att_text(ncid, num_a2_sfcoag1_id, "long_name", 45, "num_a2 modal_aero coagulation column tendency")) ERR;
if (nc_put_att_text(ncid, num_a2_sfcoag1_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, num_a2_sfcsiz1_id, "units", 6, "#/m2/s")) ERR;
if (nc_put_att_text(ncid, num_a2_sfcsiz1_id, "long_name", 43, "num_a2 calcsize number-adjust column source")) ERR;
if (nc_put_att_text(ncid, num_a2_sfcsiz1_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, num_a2_sfcsiz2_id, "units", 6, "#/m2/s")) ERR;
if (nc_put_att_text(ncid, num_a2_sfcsiz2_id, "long_name", 41, "num_a2 calcsize number-adjust column sink")) ERR;
if (nc_put_att_text(ncid, num_a2_sfcsiz2_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, num_a2_sfcsiz3_id, "units", 6, "#/m2/s")) ERR;
if (nc_put_att_text(ncid, num_a2_sfcsiz3_id, "long_name", 54, "num_a2 calcsize aitken-to-accum adjust column tendency")) ERR;
if (nc_put_att_text(ncid, num_a2_sfcsiz3_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, num_a2_sfcsiz4_id, "units", 6, "#/m2/s")) ERR;
if (nc_put_att_text(ncid, num_a2_sfcsiz4_id, "long_name", 54, "num_a2 calcsize accum-to-aitken adjust column tendency")) ERR;
if (nc_put_att_text(ncid, num_a2_sfcsiz4_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, num_a2_sfgaex2_id, "units", 6, "#/m2/s")) ERR;
if (nc_put_att_text(ncid, num_a2_sfgaex2_id, "long_name", 52, "num_a2 gas-aerosol-exchange renaming column tendency")) ERR;
if (nc_put_att_text(ncid, num_a2_sfgaex2_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, num_a2_sfnnuc1_id, "units", 6, "#/m2/s")) ERR;
if (nc_put_att_text(ncid, num_a2_sfnnuc1_id, "long_name", 57, "num_a2 modal_aero new particle nucleation column tendency")) ERR;
if (nc_put_att_text(ncid, num_a2_sfnnuc1_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, num_a3_id, "units", 5, "kg/kg")) ERR;
if (nc_put_att_text(ncid, num_a3_id, "long_name", 6, "num_a3")) ERR;
if (nc_put_att_text(ncid, num_a3_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, num_a3DDF_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, num_a3DDF_id, "long_name", 50, "num_a3 dry deposition flux at bottom (grav + turb)")) ERR;
if (nc_put_att_text(ncid, num_a3DDF_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, num_a3GVF_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, num_a3GVF_id, "long_name", 40, "num_a3 gravitational dry deposition flux")) ERR;
if (nc_put_att_text(ncid, num_a3GVF_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, num_a3SFSBC_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, num_a3SFSBC_id, "long_name", 55, "Wet deposition flux (belowcloud, convective) at surface")) ERR;
if (nc_put_att_text(ncid, num_a3SFSBC_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, num_a3SFSBS_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, num_a3SFSBS_id, "long_name", 55, "Wet deposition flux (belowcloud, stratiform) at surface")) ERR;
if (nc_put_att_text(ncid, num_a3SFSBS_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, num_a3SFSIC_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, num_a3SFSIC_id, "long_name", 52, "Wet deposition flux (incloud, convective) at surface")) ERR;
if (nc_put_att_text(ncid, num_a3SFSIC_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, num_a3SFSIS_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, num_a3SFSIS_id, "long_name", 52, "Wet deposition flux (incloud, stratiform) at surface")) ERR;
if (nc_put_att_text(ncid, num_a3SFSIS_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, num_a3SFWET_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, num_a3SFWET_id, "long_name", 30, "Wet deposition flux at surface")) ERR;
if (nc_put_att_text(ncid, num_a3SFWET_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, num_a3TBF_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, num_a3TBF_id, "long_name", 36, "num_a3 turbulent dry deposition flux")) ERR;
if (nc_put_att_text(ncid, num_a3TBF_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, num_a3_sfcsiz1_id, "units", 6, "#/m2/s")) ERR;
if (nc_put_att_text(ncid, num_a3_sfcsiz1_id, "long_name", 43, "num_a3 calcsize number-adjust column source")) ERR;
if (nc_put_att_text(ncid, num_a3_sfcsiz1_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, num_a3_sfcsiz2_id, "units", 6, "#/m2/s")) ERR;
if (nc_put_att_text(ncid, num_a3_sfcsiz2_id, "long_name", 41, "num_a3 calcsize number-adjust column sink")) ERR;
if (nc_put_att_text(ncid, num_a3_sfcsiz2_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, num_c1_id, "units", 5, "kg/kg")) ERR;
if (nc_put_att_text(ncid, num_c1_id, "long_name", 21, "num_c1 in cloud water")) ERR;
if (nc_put_att_text(ncid, num_c1_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, num_c1DDF_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, num_c1DDF_id, "long_name", 50, "num_c1 dry deposition flux at bottom (grav + turb)")) ERR;
if (nc_put_att_text(ncid, num_c1DDF_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, num_c1GVF_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, num_c1GVF_id, "long_name", 40, "num_c1 gravitational dry deposition flux")) ERR;
if (nc_put_att_text(ncid, num_c1GVF_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, num_c1SFSBC_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, num_c1SFSBC_id, "long_name", 62, "num_c1 wet deposition flux (belowcloud, convective) at surface")) ERR;
if (nc_put_att_text(ncid, num_c1SFSBC_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, num_c1SFSBS_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, num_c1SFSBS_id, "long_name", 62, "num_c1 wet deposition flux (belowcloud, stratiform) at surface")) ERR;
if (nc_put_att_text(ncid, num_c1SFSBS_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, num_c1SFSIC_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, num_c1SFSIC_id, "long_name", 59, "num_c1 wet deposition flux (incloud, convective) at surface")) ERR;
if (nc_put_att_text(ncid, num_c1SFSIC_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, num_c1SFSIS_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, num_c1SFSIS_id, "long_name", 59, "num_c1 wet deposition flux (incloud, stratiform) at surface")) ERR;
if (nc_put_att_text(ncid, num_c1SFSIS_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, num_c1SFWET_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, num_c1SFWET_id, "long_name", 37, "num_c1 wet deposition flux at surface")) ERR;
if (nc_put_att_text(ncid, num_c1SFWET_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, num_c1TBF_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, num_c1TBF_id, "long_name", 36, "num_c1 turbulent dry deposition flux")) ERR;
if (nc_put_att_text(ncid, num_c1TBF_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, num_c1_sfcsiz1_id, "units", 6, "#/m2/s")) ERR;
if (nc_put_att_text(ncid, num_c1_sfcsiz1_id, "long_name", 43, "num_c1 calcsize number-adjust column source")) ERR;
if (nc_put_att_text(ncid, num_c1_sfcsiz1_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, num_c1_sfcsiz2_id, "units", 6, "#/m2/s")) ERR;
if (nc_put_att_text(ncid, num_c1_sfcsiz2_id, "long_name", 41, "num_c1 calcsize number-adjust column sink")) ERR;
if (nc_put_att_text(ncid, num_c1_sfcsiz2_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, num_c1_sfcsiz3_id, "units", 6, "#/m2/s")) ERR;
if (nc_put_att_text(ncid, num_c1_sfcsiz3_id, "long_name", 54, "num_c1 calcsize aitken-to-accum adjust column tendency")) ERR;
if (nc_put_att_text(ncid, num_c1_sfcsiz3_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, num_c1_sfcsiz4_id, "units", 6, "#/m2/s")) ERR;
if (nc_put_att_text(ncid, num_c1_sfcsiz4_id, "long_name", 54, "num_c1 calcsize accum-to-aitken adjust column tendency")) ERR;
if (nc_put_att_text(ncid, num_c1_sfcsiz4_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, num_c1_sfgaex2_id, "units", 6, "#/m2/s")) ERR;
if (nc_put_att_text(ncid, num_c1_sfgaex2_id, "long_name", 52, "num_c1 gas-aerosol-exchange renaming column tendency")) ERR;
if (nc_put_att_text(ncid, num_c1_sfgaex2_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, num_c2_id, "units", 5, "kg/kg")) ERR;
if (nc_put_att_text(ncid, num_c2_id, "long_name", 21, "num_c2 in cloud water")) ERR;
if (nc_put_att_text(ncid, num_c2_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, num_c2DDF_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, num_c2DDF_id, "long_name", 50, "num_c2 dry deposition flux at bottom (grav + turb)")) ERR;
if (nc_put_att_text(ncid, num_c2DDF_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, num_c2GVF_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, num_c2GVF_id, "long_name", 40, "num_c2 gravitational dry deposition flux")) ERR;
if (nc_put_att_text(ncid, num_c2GVF_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, num_c2SFSBC_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, num_c2SFSBC_id, "long_name", 62, "num_c2 wet deposition flux (belowcloud, convective) at surface")) ERR;
if (nc_put_att_text(ncid, num_c2SFSBC_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, num_c2SFSBS_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, num_c2SFSBS_id, "long_name", 62, "num_c2 wet deposition flux (belowcloud, stratiform) at surface")) ERR;
if (nc_put_att_text(ncid, num_c2SFSBS_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, num_c2SFSIC_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, num_c2SFSIC_id, "long_name", 59, "num_c2 wet deposition flux (incloud, convective) at surface")) ERR;
if (nc_put_att_text(ncid, num_c2SFSIC_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, num_c2SFSIS_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, num_c2SFSIS_id, "long_name", 59, "num_c2 wet deposition flux (incloud, stratiform) at surface")) ERR;
if (nc_put_att_text(ncid, num_c2SFSIS_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, num_c2SFWET_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, num_c2SFWET_id, "long_name", 37, "num_c2 wet deposition flux at surface")) ERR;
if (nc_put_att_text(ncid, num_c2SFWET_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, num_c2TBF_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, num_c2TBF_id, "long_name", 36, "num_c2 turbulent dry deposition flux")) ERR;
if (nc_put_att_text(ncid, num_c2TBF_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, num_c2_sfcsiz1_id, "units", 6, "#/m2/s")) ERR;
if (nc_put_att_text(ncid, num_c2_sfcsiz1_id, "long_name", 43, "num_c2 calcsize number-adjust column source")) ERR;
if (nc_put_att_text(ncid, num_c2_sfcsiz1_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, num_c2_sfcsiz2_id, "units", 6, "#/m2/s")) ERR;
if (nc_put_att_text(ncid, num_c2_sfcsiz2_id, "long_name", 41, "num_c2 calcsize number-adjust column sink")) ERR;
if (nc_put_att_text(ncid, num_c2_sfcsiz2_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, num_c2_sfcsiz3_id, "units", 6, "#/m2/s")) ERR;
if (nc_put_att_text(ncid, num_c2_sfcsiz3_id, "long_name", 54, "num_c2 calcsize aitken-to-accum adjust column tendency")) ERR;
if (nc_put_att_text(ncid, num_c2_sfcsiz3_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, num_c2_sfcsiz4_id, "units", 6, "#/m2/s")) ERR;
if (nc_put_att_text(ncid, num_c2_sfcsiz4_id, "long_name", 54, "num_c2 calcsize accum-to-aitken adjust column tendency")) ERR;
if (nc_put_att_text(ncid, num_c2_sfcsiz4_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, num_c2_sfgaex2_id, "units", 6, "#/m2/s")) ERR;
if (nc_put_att_text(ncid, num_c2_sfgaex2_id, "long_name", 52, "num_c2 gas-aerosol-exchange renaming column tendency")) ERR;
if (nc_put_att_text(ncid, num_c2_sfgaex2_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, num_c3_id, "units", 5, "kg/kg")) ERR;
if (nc_put_att_text(ncid, num_c3_id, "long_name", 21, "num_c3 in cloud water")) ERR;
if (nc_put_att_text(ncid, num_c3_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, num_c3DDF_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, num_c3DDF_id, "long_name", 50, "num_c3 dry deposition flux at bottom (grav + turb)")) ERR;
if (nc_put_att_text(ncid, num_c3DDF_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, num_c3GVF_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, num_c3GVF_id, "long_name", 40, "num_c3 gravitational dry deposition flux")) ERR;
if (nc_put_att_text(ncid, num_c3GVF_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, num_c3SFSBC_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, num_c3SFSBC_id, "long_name", 62, "num_c3 wet deposition flux (belowcloud, convective) at surface")) ERR;
if (nc_put_att_text(ncid, num_c3SFSBC_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, num_c3SFSBS_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, num_c3SFSBS_id, "long_name", 62, "num_c3 wet deposition flux (belowcloud, stratiform) at surface")) ERR;
if (nc_put_att_text(ncid, num_c3SFSBS_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, num_c3SFSIC_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, num_c3SFSIC_id, "long_name", 59, "num_c3 wet deposition flux (incloud, convective) at surface")) ERR;
if (nc_put_att_text(ncid, num_c3SFSIC_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, num_c3SFSIS_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, num_c3SFSIS_id, "long_name", 59, "num_c3 wet deposition flux (incloud, stratiform) at surface")) ERR;
if (nc_put_att_text(ncid, num_c3SFSIS_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, num_c3SFWET_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, num_c3SFWET_id, "long_name", 37, "num_c3 wet deposition flux at surface")) ERR;
if (nc_put_att_text(ncid, num_c3SFWET_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, num_c3TBF_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, num_c3TBF_id, "long_name", 36, "num_c3 turbulent dry deposition flux")) ERR;
if (nc_put_att_text(ncid, num_c3TBF_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, num_c3_sfcsiz1_id, "units", 6, "#/m2/s")) ERR;
if (nc_put_att_text(ncid, num_c3_sfcsiz1_id, "long_name", 43, "num_c3 calcsize number-adjust column source")) ERR;
if (nc_put_att_text(ncid, num_c3_sfcsiz1_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, num_c3_sfcsiz2_id, "units", 6, "#/m2/s")) ERR;
if (nc_put_att_text(ncid, num_c3_sfcsiz2_id, "long_name", 41, "num_c3 calcsize number-adjust column sink")) ERR;
if (nc_put_att_text(ncid, num_c3_sfcsiz2_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, pom_a1_id, "units", 5, "kg/kg")) ERR;
if (nc_put_att_text(ncid, pom_a1_id, "long_name", 6, "pom_a1")) ERR;
if (nc_put_att_text(ncid, pom_a1_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, pom_a1DDF_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, pom_a1DDF_id, "long_name", 50, "pom_a1 dry deposition flux at bottom (grav + turb)")) ERR;
if (nc_put_att_text(ncid, pom_a1DDF_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, pom_a1GVF_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, pom_a1GVF_id, "long_name", 40, "pom_a1 gravitational dry deposition flux")) ERR;
if (nc_put_att_text(ncid, pom_a1GVF_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, pom_a1SFSBC_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, pom_a1SFSBC_id, "long_name", 55, "Wet deposition flux (belowcloud, convective) at surface")) ERR;
if (nc_put_att_text(ncid, pom_a1SFSBC_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, pom_a1SFSBS_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, pom_a1SFSBS_id, "long_name", 55, "Wet deposition flux (belowcloud, stratiform) at surface")) ERR;
if (nc_put_att_text(ncid, pom_a1SFSBS_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, pom_a1SFSIC_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, pom_a1SFSIC_id, "long_name", 52, "Wet deposition flux (incloud, convective) at surface")) ERR;
if (nc_put_att_text(ncid, pom_a1SFSIC_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, pom_a1SFSIS_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, pom_a1SFSIS_id, "long_name", 52, "Wet deposition flux (incloud, stratiform) at surface")) ERR;
if (nc_put_att_text(ncid, pom_a1SFSIS_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, pom_a1SFWET_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, pom_a1SFWET_id, "long_name", 30, "Wet deposition flux at surface")) ERR;
if (nc_put_att_text(ncid, pom_a1SFWET_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, pom_a1TBF_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, pom_a1TBF_id, "long_name", 36, "pom_a1 turbulent dry deposition flux")) ERR;
if (nc_put_att_text(ncid, pom_a1TBF_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, pom_a1_CLXF_id, "units", 11, "molec/cm2/s")) ERR;
if (nc_put_att_text(ncid, pom_a1_CLXF_id, "long_name", 50, "vertically integrated external forcing for pom_a1")) ERR;
if (nc_put_att_text(ncid, pom_a1_CLXF_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, pom_a1_XFRC_id, "units", 11, "molec/cm3/s")) ERR;
if (nc_put_att_text(ncid, pom_a1_XFRC_id, "long_name", 27, "external forcing for pom_a1")) ERR;
if (nc_put_att_text(ncid, pom_a1_XFRC_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, pom_c1_id, "units", 5, "kg/kg")) ERR;
if (nc_put_att_text(ncid, pom_c1_id, "long_name", 21, "pom_c1 in cloud water")) ERR;
if (nc_put_att_text(ncid, pom_c1_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, pom_c1DDF_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, pom_c1DDF_id, "long_name", 50, "pom_c1 dry deposition flux at bottom (grav + turb)")) ERR;
if (nc_put_att_text(ncid, pom_c1DDF_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, pom_c1GVF_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, pom_c1GVF_id, "long_name", 40, "pom_c1 gravitational dry deposition flux")) ERR;
if (nc_put_att_text(ncid, pom_c1GVF_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, pom_c1SFSBC_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, pom_c1SFSBC_id, "long_name", 62, "pom_c1 wet deposition flux (belowcloud, convective) at surface")) ERR;
if (nc_put_att_text(ncid, pom_c1SFSBC_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, pom_c1SFSBS_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, pom_c1SFSBS_id, "long_name", 62, "pom_c1 wet deposition flux (belowcloud, stratiform) at surface")) ERR;
if (nc_put_att_text(ncid, pom_c1SFSBS_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, pom_c1SFSIC_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, pom_c1SFSIC_id, "long_name", 59, "pom_c1 wet deposition flux (incloud, convective) at surface")) ERR;
if (nc_put_att_text(ncid, pom_c1SFSIC_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, pom_c1SFSIS_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, pom_c1SFSIS_id, "long_name", 59, "pom_c1 wet deposition flux (incloud, stratiform) at surface")) ERR;
if (nc_put_att_text(ncid, pom_c1SFSIS_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, pom_c1SFWET_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, pom_c1SFWET_id, "long_name", 37, "pom_c1 wet deposition flux at surface")) ERR;
if (nc_put_att_text(ncid, pom_c1SFWET_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, pom_c1TBF_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, pom_c1TBF_id, "long_name", 36, "pom_c1 turbulent dry deposition flux")) ERR;
if (nc_put_att_text(ncid, pom_c1TBF_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, so4_a1_id, "units", 5, "kg/kg")) ERR;
if (nc_put_att_text(ncid, so4_a1_id, "long_name", 6, "so4_a1")) ERR;
if (nc_put_att_text(ncid, so4_a1_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, so4_a1DDF_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, so4_a1DDF_id, "long_name", 50, "so4_a1 dry deposition flux at bottom (grav + turb)")) ERR;
if (nc_put_att_text(ncid, so4_a1DDF_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, so4_a1GVF_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, so4_a1GVF_id, "long_name", 40, "so4_a1 gravitational dry deposition flux")) ERR;
if (nc_put_att_text(ncid, so4_a1GVF_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, so4_a1SFSBC_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, so4_a1SFSBC_id, "long_name", 55, "Wet deposition flux (belowcloud, convective) at surface")) ERR;
if (nc_put_att_text(ncid, so4_a1SFSBC_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, so4_a1SFSBS_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, so4_a1SFSBS_id, "long_name", 55, "Wet deposition flux (belowcloud, stratiform) at surface")) ERR;
if (nc_put_att_text(ncid, so4_a1SFSBS_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, so4_a1SFSIC_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, so4_a1SFSIC_id, "long_name", 52, "Wet deposition flux (incloud, convective) at surface")) ERR;
if (nc_put_att_text(ncid, so4_a1SFSIC_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, so4_a1SFSIS_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, so4_a1SFSIS_id, "long_name", 52, "Wet deposition flux (incloud, stratiform) at surface")) ERR;
if (nc_put_att_text(ncid, so4_a1SFSIS_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, so4_a1SFWET_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, so4_a1SFWET_id, "long_name", 30, "Wet deposition flux at surface")) ERR;
if (nc_put_att_text(ncid, so4_a1SFWET_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, so4_a1TBF_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, so4_a1TBF_id, "long_name", 36, "so4_a1 turbulent dry deposition flux")) ERR;
if (nc_put_att_text(ncid, so4_a1TBF_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, so4_a1_CLXF_id, "units", 11, "molec/cm2/s")) ERR;
if (nc_put_att_text(ncid, so4_a1_CLXF_id, "long_name", 50, "vertically integrated external forcing for so4_a1")) ERR;
if (nc_put_att_text(ncid, so4_a1_CLXF_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, so4_a1_XFRC_id, "units", 11, "molec/cm3/s")) ERR;
if (nc_put_att_text(ncid, so4_a1_XFRC_id, "long_name", 27, "external forcing for so4_a1")) ERR;
if (nc_put_att_text(ncid, so4_a1_XFRC_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, so4_a1_sfcoag1_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, so4_a1_sfcoag1_id, "long_name", 45, "so4_a1 modal_aero coagulation column tendency")) ERR;
if (nc_put_att_text(ncid, so4_a1_sfcoag1_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, so4_a1_sfcsiz3_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, so4_a1_sfcsiz3_id, "long_name", 54, "so4_a1 calcsize aitken-to-accum adjust column tendency")) ERR;
if (nc_put_att_text(ncid, so4_a1_sfcsiz3_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, so4_a1_sfcsiz4_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, so4_a1_sfcsiz4_id, "long_name", 54, "so4_a1 calcsize accum-to-aitken adjust column tendency")) ERR;
if (nc_put_att_text(ncid, so4_a1_sfcsiz4_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, so4_a1_sfgaex1_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, so4_a1_sfgaex1_id, "long_name", 51, "so4_a1 gas-aerosol-exchange primary column tendency")) ERR;
if (nc_put_att_text(ncid, so4_a1_sfgaex1_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, so4_a1_sfgaex2_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, so4_a1_sfgaex2_id, "long_name", 52, "so4_a1 gas-aerosol-exchange renaming column tendency")) ERR;
if (nc_put_att_text(ncid, so4_a1_sfgaex2_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, so4_a2_id, "units", 5, "kg/kg")) ERR;
if (nc_put_att_text(ncid, so4_a2_id, "long_name", 6, "so4_a2")) ERR;
if (nc_put_att_text(ncid, so4_a2_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, so4_a2DDF_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, so4_a2DDF_id, "long_name", 50, "so4_a2 dry deposition flux at bottom (grav + turb)")) ERR;
if (nc_put_att_text(ncid, so4_a2DDF_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, so4_a2GVF_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, so4_a2GVF_id, "long_name", 40, "so4_a2 gravitational dry deposition flux")) ERR;
if (nc_put_att_text(ncid, so4_a2GVF_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, so4_a2SFSBC_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, so4_a2SFSBC_id, "long_name", 55, "Wet deposition flux (belowcloud, convective) at surface")) ERR;
if (nc_put_att_text(ncid, so4_a2SFSBC_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, so4_a2SFSBS_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, so4_a2SFSBS_id, "long_name", 55, "Wet deposition flux (belowcloud, stratiform) at surface")) ERR;
if (nc_put_att_text(ncid, so4_a2SFSBS_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, so4_a2SFSIC_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, so4_a2SFSIC_id, "long_name", 52, "Wet deposition flux (incloud, convective) at surface")) ERR;
if (nc_put_att_text(ncid, so4_a2SFSIC_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, so4_a2SFSIS_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, so4_a2SFSIS_id, "long_name", 52, "Wet deposition flux (incloud, stratiform) at surface")) ERR;
if (nc_put_att_text(ncid, so4_a2SFSIS_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, so4_a2SFWET_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, so4_a2SFWET_id, "long_name", 30, "Wet deposition flux at surface")) ERR;
if (nc_put_att_text(ncid, so4_a2SFWET_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, so4_a2TBF_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, so4_a2TBF_id, "long_name", 36, "so4_a2 turbulent dry deposition flux")) ERR;
if (nc_put_att_text(ncid, so4_a2TBF_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, so4_a2_CLXF_id, "units", 11, "molec/cm2/s")) ERR;
if (nc_put_att_text(ncid, so4_a2_CLXF_id, "long_name", 50, "vertically integrated external forcing for so4_a2")) ERR;
if (nc_put_att_text(ncid, so4_a2_CLXF_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, so4_a2_XFRC_id, "units", 11, "molec/cm3/s")) ERR;
if (nc_put_att_text(ncid, so4_a2_XFRC_id, "long_name", 27, "external forcing for so4_a2")) ERR;
if (nc_put_att_text(ncid, so4_a2_XFRC_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, so4_a2_sfcoag1_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, so4_a2_sfcoag1_id, "long_name", 45, "so4_a2 modal_aero coagulation column tendency")) ERR;
if (nc_put_att_text(ncid, so4_a2_sfcoag1_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, so4_a2_sfcsiz3_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, so4_a2_sfcsiz3_id, "long_name", 54, "so4_a2 calcsize aitken-to-accum adjust column tendency")) ERR;
if (nc_put_att_text(ncid, so4_a2_sfcsiz3_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, so4_a2_sfcsiz4_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, so4_a2_sfcsiz4_id, "long_name", 54, "so4_a2 calcsize accum-to-aitken adjust column tendency")) ERR;
if (nc_put_att_text(ncid, so4_a2_sfcsiz4_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, so4_a2_sfgaex1_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, so4_a2_sfgaex1_id, "long_name", 51, "so4_a2 gas-aerosol-exchange primary column tendency")) ERR;
if (nc_put_att_text(ncid, so4_a2_sfgaex1_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, so4_a2_sfgaex2_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, so4_a2_sfgaex2_id, "long_name", 52, "so4_a2 gas-aerosol-exchange renaming column tendency")) ERR;
if (nc_put_att_text(ncid, so4_a2_sfgaex2_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, so4_a2_sfnnuc1_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, so4_a2_sfnnuc1_id, "long_name", 57, "so4_a2 modal_aero new particle nucleation column tendency")) ERR;
if (nc_put_att_text(ncid, so4_a2_sfnnuc1_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, so4_a3_id, "units", 5, "kg/kg")) ERR;
if (nc_put_att_text(ncid, so4_a3_id, "long_name", 6, "so4_a3")) ERR;
if (nc_put_att_text(ncid, so4_a3_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, so4_a3DDF_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, so4_a3DDF_id, "long_name", 50, "so4_a3 dry deposition flux at bottom (grav + turb)")) ERR;
if (nc_put_att_text(ncid, so4_a3DDF_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, so4_a3GVF_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, so4_a3GVF_id, "long_name", 40, "so4_a3 gravitational dry deposition flux")) ERR;
if (nc_put_att_text(ncid, so4_a3GVF_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, so4_a3SFSBC_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, so4_a3SFSBC_id, "long_name", 55, "Wet deposition flux (belowcloud, convective) at surface")) ERR;
if (nc_put_att_text(ncid, so4_a3SFSBC_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, so4_a3SFSBS_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, so4_a3SFSBS_id, "long_name", 55, "Wet deposition flux (belowcloud, stratiform) at surface")) ERR;
if (nc_put_att_text(ncid, so4_a3SFSBS_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, so4_a3SFSIC_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, so4_a3SFSIC_id, "long_name", 52, "Wet deposition flux (incloud, convective) at surface")) ERR;
if (nc_put_att_text(ncid, so4_a3SFSIC_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, so4_a3SFSIS_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, so4_a3SFSIS_id, "long_name", 52, "Wet deposition flux (incloud, stratiform) at surface")) ERR;
if (nc_put_att_text(ncid, so4_a3SFSIS_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, so4_a3SFWET_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, so4_a3SFWET_id, "long_name", 30, "Wet deposition flux at surface")) ERR;
if (nc_put_att_text(ncid, so4_a3SFWET_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, so4_a3TBF_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, so4_a3TBF_id, "long_name", 36, "so4_a3 turbulent dry deposition flux")) ERR;
if (nc_put_att_text(ncid, so4_a3TBF_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, so4_a3_sfgaex1_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, so4_a3_sfgaex1_id, "long_name", 51, "so4_a3 gas-aerosol-exchange primary column tendency")) ERR;
if (nc_put_att_text(ncid, so4_a3_sfgaex1_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, so4_c1_id, "units", 5, "kg/kg")) ERR;
if (nc_put_att_text(ncid, so4_c1_id, "long_name", 21, "so4_c1 in cloud water")) ERR;
if (nc_put_att_text(ncid, so4_c1_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, so4_c1AQH2SO4_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, so4_c1AQH2SO4_id, "long_name", 30, "so4_c1 aqueous phase chemistry")) ERR;
if (nc_put_att_text(ncid, so4_c1AQH2SO4_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, so4_c1AQSO4_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, so4_c1AQSO4_id, "long_name", 30, "so4_c1 aqueous phase chemistry")) ERR;
if (nc_put_att_text(ncid, so4_c1AQSO4_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, so4_c1DDF_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, so4_c1DDF_id, "long_name", 50, "so4_c1 dry deposition flux at bottom (grav + turb)")) ERR;
if (nc_put_att_text(ncid, so4_c1DDF_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, so4_c1GVF_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, so4_c1GVF_id, "long_name", 40, "so4_c1 gravitational dry deposition flux")) ERR;
if (nc_put_att_text(ncid, so4_c1GVF_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, so4_c1SFSBC_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, so4_c1SFSBC_id, "long_name", 62, "so4_c1 wet deposition flux (belowcloud, convective) at surface")) ERR;
if (nc_put_att_text(ncid, so4_c1SFSBC_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, so4_c1SFSBS_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, so4_c1SFSBS_id, "long_name", 62, "so4_c1 wet deposition flux (belowcloud, stratiform) at surface")) ERR;
if (nc_put_att_text(ncid, so4_c1SFSBS_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, so4_c1SFSIC_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, so4_c1SFSIC_id, "long_name", 59, "so4_c1 wet deposition flux (incloud, convective) at surface")) ERR;
if (nc_put_att_text(ncid, so4_c1SFSIC_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, so4_c1SFSIS_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, so4_c1SFSIS_id, "long_name", 59, "so4_c1 wet deposition flux (incloud, stratiform) at surface")) ERR;
if (nc_put_att_text(ncid, so4_c1SFSIS_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, so4_c1SFWET_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, so4_c1SFWET_id, "long_name", 37, "so4_c1 wet deposition flux at surface")) ERR;
if (nc_put_att_text(ncid, so4_c1SFWET_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, so4_c1TBF_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, so4_c1TBF_id, "long_name", 36, "so4_c1 turbulent dry deposition flux")) ERR;
if (nc_put_att_text(ncid, so4_c1TBF_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, so4_c1_sfcsiz3_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, so4_c1_sfcsiz3_id, "long_name", 54, "so4_c1 calcsize aitken-to-accum adjust column tendency")) ERR;
if (nc_put_att_text(ncid, so4_c1_sfcsiz3_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, so4_c1_sfcsiz4_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, so4_c1_sfcsiz4_id, "long_name", 54, "so4_c1 calcsize accum-to-aitken adjust column tendency")) ERR;
if (nc_put_att_text(ncid, so4_c1_sfcsiz4_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, so4_c1_sfgaex2_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, so4_c1_sfgaex2_id, "long_name", 52, "so4_c1 gas-aerosol-exchange renaming column tendency")) ERR;
if (nc_put_att_text(ncid, so4_c1_sfgaex2_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, so4_c2_id, "units", 5, "kg/kg")) ERR;
if (nc_put_att_text(ncid, so4_c2_id, "long_name", 21, "so4_c2 in cloud water")) ERR;
if (nc_put_att_text(ncid, so4_c2_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, so4_c2AQH2SO4_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, so4_c2AQH2SO4_id, "long_name", 30, "so4_c2 aqueous phase chemistry")) ERR;
if (nc_put_att_text(ncid, so4_c2AQH2SO4_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, so4_c2AQSO4_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, so4_c2AQSO4_id, "long_name", 30, "so4_c2 aqueous phase chemistry")) ERR;
if (nc_put_att_text(ncid, so4_c2AQSO4_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, so4_c2DDF_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, so4_c2DDF_id, "long_name", 50, "so4_c2 dry deposition flux at bottom (grav + turb)")) ERR;
if (nc_put_att_text(ncid, so4_c2DDF_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, so4_c2GVF_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, so4_c2GVF_id, "long_name", 40, "so4_c2 gravitational dry deposition flux")) ERR;
if (nc_put_att_text(ncid, so4_c2GVF_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, so4_c2SFSBC_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, so4_c2SFSBC_id, "long_name", 62, "so4_c2 wet deposition flux (belowcloud, convective) at surface")) ERR;
if (nc_put_att_text(ncid, so4_c2SFSBC_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, so4_c2SFSBS_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, so4_c2SFSBS_id, "long_name", 62, "so4_c2 wet deposition flux (belowcloud, stratiform) at surface")) ERR;
if (nc_put_att_text(ncid, so4_c2SFSBS_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, so4_c2SFSIC_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, so4_c2SFSIC_id, "long_name", 59, "so4_c2 wet deposition flux (incloud, convective) at surface")) ERR;
if (nc_put_att_text(ncid, so4_c2SFSIC_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, so4_c2SFSIS_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, so4_c2SFSIS_id, "long_name", 59, "so4_c2 wet deposition flux (incloud, stratiform) at surface")) ERR;
if (nc_put_att_text(ncid, so4_c2SFSIS_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, so4_c2SFWET_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, so4_c2SFWET_id, "long_name", 37, "so4_c2 wet deposition flux at surface")) ERR;
if (nc_put_att_text(ncid, so4_c2SFWET_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, so4_c2TBF_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, so4_c2TBF_id, "long_name", 36, "so4_c2 turbulent dry deposition flux")) ERR;
if (nc_put_att_text(ncid, so4_c2TBF_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, so4_c2_sfcsiz3_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, so4_c2_sfcsiz3_id, "long_name", 54, "so4_c2 calcsize aitken-to-accum adjust column tendency")) ERR;
if (nc_put_att_text(ncid, so4_c2_sfcsiz3_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, so4_c2_sfcsiz4_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, so4_c2_sfcsiz4_id, "long_name", 54, "so4_c2 calcsize accum-to-aitken adjust column tendency")) ERR;
if (nc_put_att_text(ncid, so4_c2_sfcsiz4_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, so4_c2_sfgaex2_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, so4_c2_sfgaex2_id, "long_name", 52, "so4_c2 gas-aerosol-exchange renaming column tendency")) ERR;
if (nc_put_att_text(ncid, so4_c2_sfgaex2_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, so4_c3_id, "units", 5, "kg/kg")) ERR;
if (nc_put_att_text(ncid, so4_c3_id, "long_name", 21, "so4_c3 in cloud water")) ERR;
if (nc_put_att_text(ncid, so4_c3_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, so4_c3AQH2SO4_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, so4_c3AQH2SO4_id, "long_name", 30, "so4_c3 aqueous phase chemistry")) ERR;
if (nc_put_att_text(ncid, so4_c3AQH2SO4_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, so4_c3AQSO4_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, so4_c3AQSO4_id, "long_name", 30, "so4_c3 aqueous phase chemistry")) ERR;
if (nc_put_att_text(ncid, so4_c3AQSO4_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, so4_c3DDF_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, so4_c3DDF_id, "long_name", 50, "so4_c3 dry deposition flux at bottom (grav + turb)")) ERR;
if (nc_put_att_text(ncid, so4_c3DDF_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, so4_c3GVF_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, so4_c3GVF_id, "long_name", 40, "so4_c3 gravitational dry deposition flux")) ERR;
if (nc_put_att_text(ncid, so4_c3GVF_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, so4_c3SFSBC_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, so4_c3SFSBC_id, "long_name", 62, "so4_c3 wet deposition flux (belowcloud, convective) at surface")) ERR;
if (nc_put_att_text(ncid, so4_c3SFSBC_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, so4_c3SFSBS_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, so4_c3SFSBS_id, "long_name", 62, "so4_c3 wet deposition flux (belowcloud, stratiform) at surface")) ERR;
if (nc_put_att_text(ncid, so4_c3SFSBS_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, so4_c3SFSIC_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, so4_c3SFSIC_id, "long_name", 59, "so4_c3 wet deposition flux (incloud, convective) at surface")) ERR;
if (nc_put_att_text(ncid, so4_c3SFSIC_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, so4_c3SFSIS_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, so4_c3SFSIS_id, "long_name", 59, "so4_c3 wet deposition flux (incloud, stratiform) at surface")) ERR;
if (nc_put_att_text(ncid, so4_c3SFSIS_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, so4_c3SFWET_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, so4_c3SFWET_id, "long_name", 37, "so4_c3 wet deposition flux at surface")) ERR;
if (nc_put_att_text(ncid, so4_c3SFWET_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, so4_c3TBF_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, so4_c3TBF_id, "long_name", 36, "so4_c3 turbulent dry deposition flux")) ERR;
if (nc_put_att_text(ncid, so4_c3TBF_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, soa_a1_id, "units", 5, "kg/kg")) ERR;
if (nc_put_att_text(ncid, soa_a1_id, "long_name", 6, "soa_a1")) ERR;
if (nc_put_att_text(ncid, soa_a1_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, soa_a1DDF_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, soa_a1DDF_id, "long_name", 50, "soa_a1 dry deposition flux at bottom (grav + turb)")) ERR;
if (nc_put_att_text(ncid, soa_a1DDF_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, soa_a1GVF_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, soa_a1GVF_id, "long_name", 40, "soa_a1 gravitational dry deposition flux")) ERR;
if (nc_put_att_text(ncid, soa_a1GVF_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, soa_a1SFSBC_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, soa_a1SFSBC_id, "long_name", 55, "Wet deposition flux (belowcloud, convective) at surface")) ERR;
if (nc_put_att_text(ncid, soa_a1SFSBC_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, soa_a1SFSBS_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, soa_a1SFSBS_id, "long_name", 55, "Wet deposition flux (belowcloud, stratiform) at surface")) ERR;
if (nc_put_att_text(ncid, soa_a1SFSBS_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, soa_a1SFSIC_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, soa_a1SFSIC_id, "long_name", 52, "Wet deposition flux (incloud, convective) at surface")) ERR;
if (nc_put_att_text(ncid, soa_a1SFSIC_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, soa_a1SFSIS_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, soa_a1SFSIS_id, "long_name", 52, "Wet deposition flux (incloud, stratiform) at surface")) ERR;
if (nc_put_att_text(ncid, soa_a1SFSIS_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, soa_a1SFWET_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, soa_a1SFWET_id, "long_name", 30, "Wet deposition flux at surface")) ERR;
if (nc_put_att_text(ncid, soa_a1SFWET_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, soa_a1TBF_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, soa_a1TBF_id, "long_name", 36, "soa_a1 turbulent dry deposition flux")) ERR;
if (nc_put_att_text(ncid, soa_a1TBF_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, soa_a1_sfcoag1_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, soa_a1_sfcoag1_id, "long_name", 45, "soa_a1 modal_aero coagulation column tendency")) ERR;
if (nc_put_att_text(ncid, soa_a1_sfcoag1_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, soa_a1_sfcsiz3_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, soa_a1_sfcsiz3_id, "long_name", 54, "soa_a1 calcsize aitken-to-accum adjust column tendency")) ERR;
if (nc_put_att_text(ncid, soa_a1_sfcsiz3_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, soa_a1_sfcsiz4_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, soa_a1_sfcsiz4_id, "long_name", 54, "soa_a1 calcsize accum-to-aitken adjust column tendency")) ERR;
if (nc_put_att_text(ncid, soa_a1_sfcsiz4_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, soa_a1_sfgaex1_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, soa_a1_sfgaex1_id, "long_name", 51, "soa_a1 gas-aerosol-exchange primary column tendency")) ERR;
if (nc_put_att_text(ncid, soa_a1_sfgaex1_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, soa_a1_sfgaex2_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, soa_a1_sfgaex2_id, "long_name", 52, "soa_a1 gas-aerosol-exchange renaming column tendency")) ERR;
if (nc_put_att_text(ncid, soa_a1_sfgaex2_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, soa_a2_id, "units", 5, "kg/kg")) ERR;
if (nc_put_att_text(ncid, soa_a2_id, "long_name", 6, "soa_a2")) ERR;
if (nc_put_att_text(ncid, soa_a2_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, soa_a2DDF_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, soa_a2DDF_id, "long_name", 50, "soa_a2 dry deposition flux at bottom (grav + turb)")) ERR;
if (nc_put_att_text(ncid, soa_a2DDF_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, soa_a2GVF_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, soa_a2GVF_id, "long_name", 40, "soa_a2 gravitational dry deposition flux")) ERR;
if (nc_put_att_text(ncid, soa_a2GVF_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, soa_a2SFSBC_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, soa_a2SFSBC_id, "long_name", 55, "Wet deposition flux (belowcloud, convective) at surface")) ERR;
if (nc_put_att_text(ncid, soa_a2SFSBC_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, soa_a2SFSBS_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, soa_a2SFSBS_id, "long_name", 55, "Wet deposition flux (belowcloud, stratiform) at surface")) ERR;
if (nc_put_att_text(ncid, soa_a2SFSBS_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, soa_a2SFSIC_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, soa_a2SFSIC_id, "long_name", 52, "Wet deposition flux (incloud, convective) at surface")) ERR;
if (nc_put_att_text(ncid, soa_a2SFSIC_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, soa_a2SFSIS_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, soa_a2SFSIS_id, "long_name", 52, "Wet deposition flux (incloud, stratiform) at surface")) ERR;
if (nc_put_att_text(ncid, soa_a2SFSIS_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, soa_a2SFWET_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, soa_a2SFWET_id, "long_name", 30, "Wet deposition flux at surface")) ERR;
if (nc_put_att_text(ncid, soa_a2SFWET_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, soa_a2TBF_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, soa_a2TBF_id, "long_name", 36, "soa_a2 turbulent dry deposition flux")) ERR;
if (nc_put_att_text(ncid, soa_a2TBF_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, soa_a2_sfcoag1_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, soa_a2_sfcoag1_id, "long_name", 45, "soa_a2 modal_aero coagulation column tendency")) ERR;
if (nc_put_att_text(ncid, soa_a2_sfcoag1_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, soa_a2_sfcsiz3_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, soa_a2_sfcsiz3_id, "long_name", 54, "soa_a2 calcsize aitken-to-accum adjust column tendency")) ERR;
if (nc_put_att_text(ncid, soa_a2_sfcsiz3_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, soa_a2_sfcsiz4_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, soa_a2_sfcsiz4_id, "long_name", 54, "soa_a2 calcsize accum-to-aitken adjust column tendency")) ERR;
if (nc_put_att_text(ncid, soa_a2_sfcsiz4_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, soa_a2_sfgaex1_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, soa_a2_sfgaex1_id, "long_name", 51, "soa_a2 gas-aerosol-exchange primary column tendency")) ERR;
if (nc_put_att_text(ncid, soa_a2_sfgaex1_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, soa_a2_sfgaex2_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, soa_a2_sfgaex2_id, "long_name", 52, "soa_a2 gas-aerosol-exchange renaming column tendency")) ERR;
if (nc_put_att_text(ncid, soa_a2_sfgaex2_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, soa_c1_id, "units", 5, "kg/kg")) ERR;
if (nc_put_att_text(ncid, soa_c1_id, "long_name", 21, "soa_c1 in cloud water")) ERR;
if (nc_put_att_text(ncid, soa_c1_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, soa_c1DDF_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, soa_c1DDF_id, "long_name", 50, "soa_c1 dry deposition flux at bottom (grav + turb)")) ERR;
if (nc_put_att_text(ncid, soa_c1DDF_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, soa_c1GVF_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, soa_c1GVF_id, "long_name", 40, "soa_c1 gravitational dry deposition flux")) ERR;
if (nc_put_att_text(ncid, soa_c1GVF_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, soa_c1SFSBC_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, soa_c1SFSBC_id, "long_name", 62, "soa_c1 wet deposition flux (belowcloud, convective) at surface")) ERR;
if (nc_put_att_text(ncid, soa_c1SFSBC_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, soa_c1SFSBS_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, soa_c1SFSBS_id, "long_name", 62, "soa_c1 wet deposition flux (belowcloud, stratiform) at surface")) ERR;
if (nc_put_att_text(ncid, soa_c1SFSBS_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, soa_c1SFSIC_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, soa_c1SFSIC_id, "long_name", 59, "soa_c1 wet deposition flux (incloud, convective) at surface")) ERR;
if (nc_put_att_text(ncid, soa_c1SFSIC_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, soa_c1SFSIS_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, soa_c1SFSIS_id, "long_name", 59, "soa_c1 wet deposition flux (incloud, stratiform) at surface")) ERR;
if (nc_put_att_text(ncid, soa_c1SFSIS_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, soa_c1SFWET_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, soa_c1SFWET_id, "long_name", 37, "soa_c1 wet deposition flux at surface")) ERR;
if (nc_put_att_text(ncid, soa_c1SFWET_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, soa_c1TBF_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, soa_c1TBF_id, "long_name", 36, "soa_c1 turbulent dry deposition flux")) ERR;
if (nc_put_att_text(ncid, soa_c1TBF_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, soa_c1_sfcsiz3_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, soa_c1_sfcsiz3_id, "long_name", 54, "soa_c1 calcsize aitken-to-accum adjust column tendency")) ERR;
if (nc_put_att_text(ncid, soa_c1_sfcsiz3_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, soa_c1_sfcsiz4_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, soa_c1_sfcsiz4_id, "long_name", 54, "soa_c1 calcsize accum-to-aitken adjust column tendency")) ERR;
if (nc_put_att_text(ncid, soa_c1_sfcsiz4_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, soa_c1_sfgaex2_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, soa_c1_sfgaex2_id, "long_name", 52, "soa_c1 gas-aerosol-exchange renaming column tendency")) ERR;
if (nc_put_att_text(ncid, soa_c1_sfgaex2_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, soa_c2_id, "units", 5, "kg/kg")) ERR;
if (nc_put_att_text(ncid, soa_c2_id, "long_name", 21, "soa_c2 in cloud water")) ERR;
if (nc_put_att_text(ncid, soa_c2_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, soa_c2DDF_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, soa_c2DDF_id, "long_name", 50, "soa_c2 dry deposition flux at bottom (grav + turb)")) ERR;
if (nc_put_att_text(ncid, soa_c2DDF_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, soa_c2GVF_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, soa_c2GVF_id, "long_name", 40, "soa_c2 gravitational dry deposition flux")) ERR;
if (nc_put_att_text(ncid, soa_c2GVF_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, soa_c2SFSBC_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, soa_c2SFSBC_id, "long_name", 62, "soa_c2 wet deposition flux (belowcloud, convective) at surface")) ERR;
if (nc_put_att_text(ncid, soa_c2SFSBC_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, soa_c2SFSBS_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, soa_c2SFSBS_id, "long_name", 62, "soa_c2 wet deposition flux (belowcloud, stratiform) at surface")) ERR;
if (nc_put_att_text(ncid, soa_c2SFSBS_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, soa_c2SFSIC_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, soa_c2SFSIC_id, "long_name", 59, "soa_c2 wet deposition flux (incloud, convective) at surface")) ERR;
if (nc_put_att_text(ncid, soa_c2SFSIC_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, soa_c2SFSIS_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, soa_c2SFSIS_id, "long_name", 59, "soa_c2 wet deposition flux (incloud, stratiform) at surface")) ERR;
if (nc_put_att_text(ncid, soa_c2SFSIS_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, soa_c2SFWET_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, soa_c2SFWET_id, "long_name", 37, "soa_c2 wet deposition flux at surface")) ERR;
if (nc_put_att_text(ncid, soa_c2SFWET_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, soa_c2TBF_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, soa_c2TBF_id, "long_name", 36, "soa_c2 turbulent dry deposition flux")) ERR;
if (nc_put_att_text(ncid, soa_c2TBF_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, soa_c2_sfcsiz3_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, soa_c2_sfcsiz3_id, "long_name", 54, "soa_c2 calcsize aitken-to-accum adjust column tendency")) ERR;
if (nc_put_att_text(ncid, soa_c2_sfcsiz3_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, soa_c2_sfcsiz4_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, soa_c2_sfcsiz4_id, "long_name", 54, "soa_c2 calcsize accum-to-aitken adjust column tendency")) ERR;
if (nc_put_att_text(ncid, soa_c2_sfcsiz4_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, soa_c2_sfgaex2_id, "units", 7, "kg/m2/s")) ERR;
if (nc_put_att_text(ncid, soa_c2_sfgaex2_id, "long_name", 52, "soa_c2 gas-aerosol-exchange renaming column tendency")) ERR;
if (nc_put_att_text(ncid, soa_c2_sfgaex2_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, wat_a1_id, "units", 1, "m")) ERR;
if (nc_put_att_text(ncid, wat_a1_id, "long_name", 36, "aerosol water, interstitial, mode 01")) ERR;
if (nc_put_att_text(ncid, wat_a1_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, wat_a2_id, "units", 1, "m")) ERR;
if (nc_put_att_text(ncid, wat_a2_id, "long_name", 36, "aerosol water, interstitial, mode 02")) ERR;
if (nc_put_att_text(ncid, wat_a2_id, "cell_methods", 10, "time: mean")) ERR;
if (nc_put_att_text(ncid, wat_a3_id, "units", 1, "m")) ERR;
if (nc_put_att_text(ncid, wat_a3_id, "long_name", 36, "aerosol water, interstitial, mode 03")) ERR;
if (nc_put_att_text(ncid, wat_a3_id, "cell_methods", 10, "time: mean")) ERR;
get_mem_used2(&memused);
printf("before enddef data memory %d MB\n", memused);
/* leave define mode */
if (nc_enddef (ncid)) ERR;
get_mem_used2(&memused);
printf("before close data memory %d MB\n", memused);
/* assign variable data */
if (nc_close(ncid)) ERR;
get_mem_used2(&memused);
printf("after close data memory %d MB\n", memused);
SUMMARIZE_ERR;
FINAL_RESULTS;
}