Changeset 95 for palm/trunk/SOURCE/read_var_list.f90

Timestamp:

Jun 2, 2007 4:48:38 PM (17 years ago)

Author:

raasch

Message:

further preliminary uncomplete changes for ocean version

File:

• palm/trunk/SOURCE/read_var_list.f90 (modified) (2 diffs)

palm/trunk/SOURCE/read_var_list.f90

@@ -4 +4 @@
 ! Actual revisions:
 ! -----------------
-! +ocean, sa_init, sa_surface, sa_vertical_gradient,
-! sa_vertical_gradient_level, top_salinity_flux
+! +bc_sa_t, ocean, sa_init, sa_surface, sa_vertical_gradient,
+! sa_vertical_gradient_level, bottom/top_salinity_flux
 !
 ! Former revisions:
@@ -161 +161 @@
           CASE ( 'bc_s_t' )
              READ ( 13 )  bc_s_t
+          CASE ( 'bc_sa_t' )
+             READ ( 13 )  bc_sa_t
           CASE ( 'bc_uv_b' )
              READ ( 13 )  bc_uv_b
           CASE ( 'bc_uv_t' )
              READ ( 13 )  bc_uv_t
+          CASE ( 'bottom_salinityflux' )
+             READ ( 13 )  bottom_salinityflux
           CASE ( 'building_height' )
              READ ( 13 )  building_height