Changeset 4502 for palm/trunk/SOURCE/netcdf_interface_mod.f90

Timestamp:

Apr 17, 2020 4:14:16 PM (4 years ago)

Author:

schwenkel

Message:

Implementation of ice microphysics

File:

• palm/trunk/SOURCE/netcdf_interface_mod.f90 (modified) (7 diffs)

palm/trunk/SOURCE/netcdf_interface_mod.f90

@@ -25 +25 @@
 ! -----------------
 ! $Id$
+! Implementation of ice microphysics
+! 
+! 4455 2020-03-11 12:20:29Z Giersch
 ! Axis attribute added to netcdf output
 ! 
@@ -880 +883 @@
                 CASE ( 'e', 'nc', 'nr', 'p', 'pc', 'pr', 'prr',                &
                        'q', 'qc', 'ql', 'ql_c', 'ql_v', 'ql_vp', 'qr', 'qv',   &
-                       's', 'theta', 'thetal', 'thetav' )
+                       's', 'theta', 'thetal', 'thetav', 'qi', 'ni' )
 
                    grid_x = 'x'
@@ -1644 +1647 @@
                 CASE ( 'e', 'nc', 'nr', 'p', 'pc', 'pr', 'prr',   &
                        'q', 'qc', 'ql', 'ql_c', 'ql_v', 'ql_vp', 'qr', 'qv',   &
-                       's', 'theta', 'thetal', 'thetav' )
+                       's', 'theta', 'thetal', 'thetav', 'qi', 'ni' )
 
                    grid_x = 'x'
@@ -2659 +2662 @@
 !
 !--                   Most variables are defined on the zu grid
-                      CASE ( 'e_xy', 'nc_xy', 'nr_xy', 'p_xy',                 &
+                      CASE ( 'e_xy', 'nc_xy', 'ni_xy', 'nr_xy', 'p_xy',        &
                              'pc_xy', 'pr_xy', 'prr_xy', 'q_xy',               &
-                             'qc_xy', 'ql_xy', 'ql_c_xy', 'ql_v_xy',           &
+                             'qc_xy', 'qi_xy', 'ql_xy', 'ql_c_xy', 'ql_v_xy',  &
                              'ql_vp_xy', 'qr_xy', 'qv_xy',                     &
                              's_xy',                                           &
@@ -3583 +3586 @@
 !
 !--                Most variables are defined on the zu grid
-                   CASE ( 'e_xz', 'nc_xz', 'nr_xz', 'p_xz', 'pc_xz',           &
-                          'pr_xz', 'prr_xz', 'q_xz', 'qc_xz',                  &
+                   CASE ( 'e_xz', 'nc_xz', 'ni_xz', 'nr_xz', 'p_xz', 'pc_xz',  &
+                          'pr_xz', 'prr_xz', 'q_xz', 'qc_xz', 'qi_xz',         &
                           'ql_xz', 'ql_c_xz', 'ql_v_xz', 'ql_vp_xz', 'qr_xz',  &
                           'qv_xz', 's_xz',                                     &
@@ -4460 +4463 @@
 !
 !--                Most variables are defined on the zu grid
-                   CASE ( 'e_yz', 'nc_yz', 'nr_yz', 'p_yz', 'pc_yz',           &
-                          'pr_yz','prr_yz', 'q_yz', 'qc_yz', 'ql_yz',          &
+                   CASE ( 'e_yz', 'nc_yz', 'ni_yz', 'nr_yz', 'p_yz', 'pc_yz',  &
+                          'pr_yz','prr_yz', 'q_yz', 'qc_yz', 'qi_yz', 'ql_yz', &
                           'ql_c_yz', 'ql_v_yz', 'ql_vp_yz', 'qr_yz', 'qv_yz',  &
                           's_yz',                                              &
@@ -5853 +5856 @@
 !
 !--             Most variables are defined on the zu levels
-                CASE ( 'e', 'nc', 'nr', 'p', 'pc', 'pr', 'prr',   &
+                CASE ( 'e', 'nc', 'nr', 'p', 'pc', 'pr', 'prr', 'ni', 'qi',    &
                        'q', 'qc', 'ql', 'ql_c', 'ql_v', 'ql_vp', 'qr', 'qv',   &
                        'rho_sea_water', 's', 'sa', &