Registry/registry.new3d_wif

   1 ###############################################################################
   2 #       This is an example registry.
   3 #       It has the necessary pieces to allow a set of input fields to come
   4 #       into the real program from metgrid.  These fields are assumed to
   5 #       be on a separate vertical coordinate from the standard metgrid
   6 #       atmospheric fields.  The usual purpose for this would be for
   7 #       bringing in aerosols.
   8 #               A different pressure for each month.
   9 #               The output from real is placed into the scalar arrays.
  10 ###############################################################################
  11
  12 ###   Thompson Water Ice Black-Carbon Friendly Aerosols WIF (updated in 4.4)
  13
  14 dimspec  wif    2     namelist=num_wif_levels          z     num_wif_levels
  15
  16 rconfig   integer num_wif_levels    namelist,domains       1              30      irh    "num_wif_levels" "number of levels in the Thompson Water Ice Friendly Aerosols" ""
  17 rconfig   integer wif_input_opt     namelist,domains       1              0       irh    "wif_input_opt"  "0=do not process the Water Ice Friendly Aerosol input from metgrid"
  18
  19 state    real       qnwfa_gc       i{wif}j      dyn_em      1        Z     i1         "QNWFA"   "water-friendly aerosol  num concentration"   "# kg-1"
  20 state    real       qnifa_gc       i{wif}j      dyn_em      1        Z     i1         "QNIFA"   "water-friendly aerosol  num concentration"   "# kg-1"
  21 state    real       qnbca_gc       i{wif}j      dyn_em      1        Z     i1         "QNBCA"   "black carbon   aerosol  num concentration"   "# kg-1"
  22 state    real       p_wif_gc       i{wif}j      dyn_em      1        Z     i1         "P_WIF"       "Pressure for first guess aerosol fields from metgrid"   "Pa"
  23
  24 state    real       p_wif_now      i{wif}j      dyn_em      1        Z     -          "P_WIF_NOW"   "Pressure for Water Ice Friendly Aerosols Now"   "Pa"
  25 state    real       p_wif_jan      i{wif}j      dyn_em      1        Z     i1         "P_WIF_JAN"   "Pressure for Water Ice Friendly Aerosols Jan"   "Pa"
  26 state    real       p_wif_feb      i{wif}j      dyn_em      1        Z     i1         "P_WIF_FEB"   "Pressure for Water Ice Friendly Aerosols Feb"   "Pa"
  27 state    real       p_wif_mar      i{wif}j      dyn_em      1        Z     i1         "P_WIF_MAR"   "Pressure for Water Ice Friendly Aerosols Mar"   "Pa"
  28 state    real       p_wif_apr      i{wif}j      dyn_em      1        Z     i1         "P_WIF_APR"   "Pressure for Water Ice Friendly Aerosols Apr"   "Pa"
  29 state    real       p_wif_may      i{wif}j      dyn_em      1        Z     i1         "P_WIF_MAY"   "Pressure for Water Ice Friendly Aerosols May"   "Pa"
  30 state    real       p_wif_jun      i{wif}j      dyn_em      1        Z     i1         "P_WIF_JUN"   "Pressure for Water Ice Friendly Aerosols Jun"   "Pa"
  31 state    real       p_wif_jul      i{wif}j      dyn_em      1        Z     i1         "P_WIF_JUL"   "Pressure for Water Ice Friendly Aerosols Jul"   "Pa"
  32 state    real       p_wif_aug      i{wif}j      dyn_em      1        Z     i1         "P_WIF_AUG"   "Pressure for Water Ice Friendly Aerosols Aug"   "Pa"
  33 state    real       p_wif_sep      i{wif}j      dyn_em      1        Z     i1         "P_WIF_SEP"   "Pressure for Water Ice Friendly Aerosols Sep"   "Pa"
  34 state    real       p_wif_oct      i{wif}j      dyn_em      1        Z     i1         "P_WIF_OCT"   "Pressure for Water Ice Friendly Aerosols Oct"   "Pa"
  35 state    real       p_wif_nov      i{wif}j      dyn_em      1        Z     i1         "P_WIF_NOV"   "Pressure for Water Ice Friendly Aerosols Nov"   "Pa"
  36 state    real       p_wif_dec      i{wif}j      dyn_em      1        Z     i1         "P_WIF_DEC"   "Pressure for Water Ice Friendly Aerosols Dec"   "Pa"
  37
  38 state    real       w_wif_now      i{wif}j      dyn_em      1        Z     -          "W_WIF_NOW"   "Background Water Friendly Aerosol option Now"   "# kg-1"
  39 state    real       w_wif_jan      i{wif}j      dyn_em      1        Z     i1         "W_WIF_JAN"   "Background Water Friendly Aerosol option Jan"   "# kg-1"
  40 state    real       w_wif_feb      i{wif}j      dyn_em      1        Z     i1         "W_WIF_FEB"   "Background Water Friendly Aerosol option Feb"   "# kg-1"
  41 state    real       w_wif_mar      i{wif}j      dyn_em      1        Z     i1         "W_WIF_MAR"   "Background Water Friendly Aerosol option Mar"   "# kg-1"
  42 state    real       w_wif_apr      i{wif}j      dyn_em      1        Z     i1         "W_WIF_APR"   "Background Water Friendly Aerosol option Apr"   "# kg-1"
  43 state    real       w_wif_may      i{wif}j      dyn_em      1        Z     i1         "W_WIF_MAY"   "Background Water Friendly Aerosol option May"   "# kg-1"
  44 state    real       w_wif_jun      i{wif}j      dyn_em      1        Z     i1         "W_WIF_JUN"   "Background Water Friendly Aerosol option Jun"   "# kg-1"
  45 state    real       w_wif_jul      i{wif}j      dyn_em      1        Z     i1         "W_WIF_JUL"   "Background Water Friendly Aerosol option Jul"   "# kg-1"
  46 state    real       w_wif_aug      i{wif}j      dyn_em      1        Z     i1         "W_WIF_AUG"   "Background Water Friendly Aerosol option Aug"   "# kg-1"
  47 state    real       w_wif_sep      i{wif}j      dyn_em      1        Z     i1         "W_WIF_SEP"   "Background Water Friendly Aerosol option Sep"   "# kg-1"
  48 state    real       w_wif_oct      i{wif}j      dyn_em      1        Z     i1         "W_WIF_OCT"   "Background Water Friendly Aerosol option Oct"   "# kg-1"
  49 state    real       w_wif_nov      i{wif}j      dyn_em      1        Z     i1         "W_WIF_NOV"   "Background Water Friendly Aerosol option Nov"   "# kg-1"
  50 state    real       w_wif_dec      i{wif}j      dyn_em      1        Z     i1         "W_WIF_DEC"   "Background Water Friendly Aerosol option Dec"   "# kg-1"
  51
  52 state    real       i_wif_now      i{wif}j      dyn_em      1        Z     -          "I_WIF_NOW"   "Background Ice   Friendly Aerosol option Now"   "# kg-1"
  53 state    real       i_wif_jan      i{wif}j      dyn_em      1        Z     i1         "I_WIF_JAN"   "Background Ice   Friendly Aerosol option Jan"   "# kg-1"
  54 state    real       i_wif_feb      i{wif}j      dyn_em      1        Z     i1         "I_WIF_FEB"   "Background Ice   Friendly Aerosol option Feb"   "# kg-1"
  55 state    real       i_wif_mar      i{wif}j      dyn_em      1        Z     i1         "I_WIF_MAR"   "Background Ice   Friendly Aerosol option Mar"   "# kg-1"
  56 state    real       i_wif_apr      i{wif}j      dyn_em      1        Z     i1         "I_WIF_APR"   "Background Ice   Friendly Aerosol option Apr"   "# kg-1"
  57 state    real       i_wif_may      i{wif}j      dyn_em      1        Z     i1         "I_WIF_MAY"   "Background Ice   Friendly Aerosol option May"   "# kg-1"
  58 state    real       i_wif_jun      i{wif}j      dyn_em      1        Z     i1         "I_WIF_JUN"   "Background Ice   Friendly Aerosol option Jun"   "# kg-1"
  59 state    real       i_wif_jul      i{wif}j      dyn_em      1        Z     i1         "I_WIF_JUL"   "Background Ice   Friendly Aerosol option Jul"   "# kg-1"
  60 state    real       i_wif_aug      i{wif}j      dyn_em      1        Z     i1         "I_WIF_AUG"   "Background Ice   Friendly Aerosol option Aug"   "# kg-1"
  61 state    real       i_wif_sep      i{wif}j      dyn_em      1        Z     i1         "I_WIF_SEP"   "Background Ice   Friendly Aerosol option Sep"   "# kg-1"
  62 state    real       i_wif_oct      i{wif}j      dyn_em      1        Z     i1         "I_WIF_OCT"   "Background Ice   Friendly Aerosol option Oct"   "# kg-1"
  63 state    real       i_wif_nov      i{wif}j      dyn_em      1        Z     i1         "I_WIF_NOV"   "Background Ice   Friendly Aerosol option Nov"   "# kg-1"
  64 state    real       i_wif_dec      i{wif}j      dyn_em      1        Z     i1         "I_WIF_DEC"   "Background Ice   Friendly Aerosol option Dec"   "# kg-1"
  65
  66 state    real       b_wif_now      i{wif}j      dyn_em      1        Z     -          "B_WIF_NOW"  "Background Black Carbon Aerosol option Now"   "# kg-1"
  67 state    real       b_wif_jan      i{wif}j      dyn_em      1        Z     i1         "B_WIF_JAN"  "Background Black Carbon Aerosol option Jan"   "# kg-1"
  68 state    real       b_wif_feb      i{wif}j      dyn_em      1        Z     i1         "B_WIF_FEB"  "Background Black Carbon Aerosol option Feb"   "# kg-1"
  69 state    real       b_wif_mar      i{wif}j      dyn_em      1        Z     i1         "B_WIF_MAR"  "Background Black Carbon Aerosol option Mar"   "# kg-1"
  70 state    real       b_wif_apr      i{wif}j      dyn_em      1        Z     i1         "B_WIF_APR"  "Background Black Carbon Aerosol option Apr"   "# kg-1"
  71 state    real       b_wif_may      i{wif}j      dyn_em      1        Z     i1         "B_WIF_MAY"  "Background Black Carbon Aerosol option May"   "# kg-1"
  72 state    real       b_wif_jun      i{wif}j      dyn_em      1        Z     i1         "B_WIF_JUN"  "Background Black Carbon Aerosol option Jun"   "# kg-1"
  73 state    real       b_wif_jul      i{wif}j      dyn_em      1        Z     i1         "B_WIF_JUL"  "Background Black Carbon Aerosol option Jul"   "# kg-1"
  74 state    real       b_wif_aug      i{wif}j      dyn_em      1        Z     i1         "B_WIF_AUG"  "Background Black Carbon Aerosol option Aug"   "# kg-1"
  75 state    real       b_wif_sep      i{wif}j      dyn_em      1        Z     i1         "B_WIF_SEP"  "Background Black Carbon Aerosol option Sep"   "# kg-1"
  76 state    real       b_wif_oct      i{wif}j      dyn_em      1        Z     i1         "B_WIF_OCT"  "Background Black Carbon Aerosol option Oct"   "# kg-1"
  77 state    real       b_wif_nov      i{wif}j      dyn_em      1        Z     i1         "B_WIF_NOV"  "Background Black Carbon Aerosol option Nov"   "# kg-1"
  78 state    real       b_wif_dec      i{wif}j      dyn_em      1        Z     i1         "B_WIF_DEC"  "Background Black Carbon Aerosol option Dec"   "# kg-1"
  79
  80 package   use_wif_input       wif_input_opt==1             -             state:p_wif_gc,p_wif_now,p_wif_jan,p_wif_feb,p_wif_mar,p_wif_apr,p_wif_may,p_wif_jun,p_wif_jul,p_wif_aug,p_wif_sep,p_wif_oct,p_wif_nov,p_wif_dec,qnwfa_gc,w_wif_now,w_wif_jan,w_wif_feb,w_wif_mar,w_wif_apr,w_wif_may,w_wif_jun,w_wif_jul,w_wif_aug,w_wif_sep,w_wif_oct,w_wif_nov,w_wif_dec,qnifa_gc,i_wif_now,i_wif_jan,i_wif_feb,i_wif_mar,i_wif_apr,i_wif_may,i_wif_jun,i_wif_jul,i_wif_aug,i_wif_sep,i_wif_oct,i_wif_nov,i_wif_dec
  81
  82 package   use_wif_input_bc    wif_input_opt==2             -             scalar:qnbca;state:qnbca2d,p_wif_gc,p_wif_now,p_wif_jan,p_wif_feb,p_wif_mar,p_wif_apr,p_wif_may,p_wif_jun,p_wif_jul,p_wif_aug,p_wif_sep,p_wif_oct,p_wif_nov,p_wif_dec,qnwfa_gc,w_wif_now,w_wif_jan,w_wif_feb,w_wif_mar,w_wif_apr,w_wif_may,w_wif_jun,w_wif_jul,w_wif_aug,w_wif_sep,w_wif_oct,w_wif_nov,w_wif_dec,qnifa_gc,i_wif_now,i_wif_jan,i_wif_feb,i_wif_mar,i_wif_apr,i_wif_may,i_wif_jun,i_wif_jul,i_wif_aug,i_wif_sep,i_wif_oct,i_wif_nov,i_wif_dec,b_wif_now,b_wif_jan,b_wif_feb,b_wif_mar,b_wif_apr,b_wif_may,b_wif_jun,b_wif_jul,b_wif_aug,b_wif_sep,b_wif_oct,b_wif_nov,b_wif_dec
  83
  84 package   emit_oc_bb          aer_fire_emit_opt==1         -             state:qnocbb2d
  85 package   emit_ocbc_bb        aer_fire_emit_opt==2         -             state:qnocbb2d,qnbcbb2d
  86
  87 state   real    qnwfa          ikjftb  scalar      1         -     \
  88    i0rhusdf=(bdy_interp:dt)    "QNWFA"         "water-friendly aerosol number con" "# kg(-1)"
  89 state   real    qnifa          ikjftb  scalar      1         -     \
  90    i0rhusdf=(bdy_interp:dt)    "QNIFA"         "ice-friendly aerosol number con"   "# kg(-1)"
  91 state   real    qnbca          ikjftb  scalar      1         -     \
  92    i0rhusdf=(bdy_interp:dt)    "QNBCA"         "black carbon aerosol number con"   "# kg(-1)"
  93
  94 state   real    dfi_qnwfa      ikjftb  dfi_scalar      1         -     \
  95    i0rhusdf=(bdy_interp:dt) "DFI_QNWFA"     "DFI water-friendly aerosol number con" "# kg(-1)"
  96 state   real    dfi_qnifa      ikjftb  dfi_scalar      1         -     \
  97    i0rhusdf=(bdy_interp:dt) "DFI_QNIFA"     "DFI ice-friendly aerosol number con"   "# kg(-1)"
  98 state   real    dfi_qnbca      ikjftb  dfi_scalar      1         -     \
  99    i0rhusdf=(bdy_interp:dt) "DFI_QNBCA"     "DFI black carbon aerosol number con"   "# kg(-1)"
 100