Changeset 98 for palm/trunk/SOURCE
- Timestamp:
- Jun 21, 2007 9:36:33 AM (17 years ago)
- Location:
- palm/trunk/SOURCE
- Files:
-
- 32 edited
Legend:
- Unmodified
- Added
- Removed
-
palm/trunk/SOURCE/advec_particles.f90
r95 r98 4 4 ! Actual revisions: 5 5 ! ----------------- 6 ! hydro_press renamed hyp6 ! 7 7 ! TEST: PRINT statements on unit 9 (commented out) 8 8 ! … … 10 10 ! ----------------- 11 11 ! $Id$ 12 ! 13 ! 95 2007-06-02 16:48:38Z raasch 14 ! hydro_press renamed hyp 12 15 ! 13 16 ! 75 2007-03-22 09:54:05Z raasch -
palm/trunk/SOURCE/advec_s_bc.f90
r97 r98 4 4 ! Actual revisions: 5 5 ! ----------------- 6 ! Advection of salinity included 7 ! Bugfix: Error in boundary condition for TKE removed 6 ! 8 7 ! 9 8 ! Former revisions: 10 9 ! ----------------- 11 10 ! $Id$ 11 ! 12 ! 97 2007-06-21 08:23:15Z raasch 13 ! Advection of salinity included 14 ! Bugfix: Error in boundary condition for TKE removed 12 15 ! 13 16 ! 63 2007-03-13 03:52:49Z raasch -
palm/trunk/SOURCE/average_3d_data.f90
r96 r98 4 4 ! Actual revisions: 5 5 ! ----------------- 6 ! Averaging of density and salinity6 ! 7 7 ! 8 8 ! Former revisions: 9 9 ! ----------------- 10 10 ! $Id$ 11 ! 12 ! 96 2007-06-04 08:07:41Z raasch 13 ! Averaging of density and salinity 11 14 ! 12 15 ! 72 2007-03-19 08:20:46Z raasch -
palm/trunk/SOURCE/boundary_conds.f90
r95 r98 4 4 ! Actual revisions: 5 5 ! ----------------- 6 ! Boundary conditions for salinity added6 ! 7 7 ! 8 8 ! Former revisions: 9 9 ! ----------------- 10 10 ! $Id$ 11 ! 12 ! 95 2007-06-02 16:48:38Z raasch 13 ! Boundary conditions for salinity added 11 14 ! 12 15 ! 75 2007-03-22 09:54:05Z raasch -
palm/trunk/SOURCE/buoyancy.f90
r97 r98 4 4 ! Actual revisions: 5 5 ! ----------------- 6 ! 7 ! 8 ! Former revisions: 9 ! ----------------- 10 ! $Id$ 11 ! 12 ! 97 2007-06-21 08:23:15Z raasch 6 13 ! Routine reneralized to be used with temperature AND density: 7 14 ! argument theta renamed var, new argument var_reference, 8 15 ! use_pt_reference renamed use_reference, 9 16 ! calc_mean_pt_profile renamed calc_mean_profile 10 !11 ! Former revisions:12 ! -----------------13 ! $Id$14 17 ! 15 18 ! 57 2007-03-09 12:05:41Z raasch -
palm/trunk/SOURCE/calc_liquid_water_content.f90
r95 r98 4 4 ! Actual revisions: 5 5 ! ----------------- 6 ! hydro_press renamed hyp6 ! 7 7 ! 8 8 ! Former revisions: 9 9 ! ----------------- 10 10 ! $Id$ 11 ! 12 ! 95 2007-06-02 16:48:38Z raasch 13 ! hydro_press renamed hyp 11 14 ! 12 15 ! 19 2007-02-23 04:53:48Z raasch -
palm/trunk/SOURCE/check_parameters.f90
r97 r98 4 4 ! Actual revisions: 5 5 ! ----------------- 6 ! 7 ! 8 ! Former revisions: 9 ! ----------------- 10 ! $Id$ 11 ! 12 ! 97 2007-06-21 08:23:15Z raasch 6 13 ! Initial salinity profile is calculated, salinity boundary conditions are 7 14 ! checked, … … 9 16 ! +initial temperature and geostrophic velocity profiles for the ocean version, 10 17 ! use_pt_reference renamed use_reference 11 !12 ! Former revisions:13 ! -----------------14 ! $Id$15 18 ! 16 19 ! 89 2007-05-25 12:08:31Z raasch -
palm/trunk/SOURCE/data_output_2d.f90
r96 r98 4 4 ! Actual revisions: 5 5 ! ----------------- 6 ! Output of density and salinity6 ! 7 7 ! 8 8 ! Former revisions: 9 9 ! ----------------- 10 10 ! $Id$ 11 ! 12 ! 96 2007-06-04 08:07:41Z raasch 13 ! Output of density and salinity 11 14 ! 12 15 ! 75 2007-03-22 09:54:05Z raasch -
palm/trunk/SOURCE/data_output_3d.f90
r96 r98 4 4 ! Actual revisions: 5 5 ! ----------------- 6 ! Output of density and salinity6 ! 7 7 ! 8 8 ! Former revisions: 9 9 ! ----------------- 10 10 ! $Id$ 11 ! 12 ! 96 2007-06-04 08:07:41Z raasch 13 ! Output of density and salinity 11 14 ! 12 15 ! 75 2007-03-22 09:54:05Z raasch -
palm/trunk/SOURCE/diffusion_e.f90
r97 r98 4 4 ! Actual revisions: 5 5 ! ----------------- 6 ! 7 ! 8 ! Former revisions: 9 ! ----------------- 10 ! $Id$ 11 ! 12 ! 97 2007-06-21 08:23:15Z raasch 6 13 ! Adjustment of mixing length calculation for the ocean version. zw added to 7 14 ! argument list. … … 10 17 ! theta renamed var, dpt_dz renamed dvar_dz, +new argument var_reference 11 18 ! use_pt_reference renamed use_reference 12 !13 ! Former revisions:14 ! -----------------15 ! $Id$16 19 ! 17 20 ! 65 2007-03-13 12:11:43Z raasch -
palm/trunk/SOURCE/diffusivities.f90
r97 r98 4 4 ! Actual revisions: 5 5 ! ----------------- 6 ! 7 ! 8 ! Former revisions: 9 ! ----------------- 10 ! $Id$ 11 ! 12 ! 97 2007-06-21 08:23:15Z raasch 6 13 ! Adjustment of mixing length calculation for the ocean version. 7 14 ! This is also a bugfix, because the height above the topography is now … … 9 16 ! theta renamed var, dpt_dz renamed dvar_dz, +new argument var_reference 10 17 ! use_pt_reference renamed use_reference 11 !12 ! Former revisions:13 ! -----------------14 ! $Id$15 18 ! 16 19 ! 57 2007-03-09 12:05:41Z raasch -
palm/trunk/SOURCE/eqn_state_seawater.f90
r97 r98 10 10 ! $Id$ 11 11 ! 12 ! 97 2007-06-21 08:23:15Z raasch 12 13 ! Initial revision 13 14 ! -
palm/trunk/SOURCE/flow_statistics.f90
r97 r98 4 4 ! Actual revisions: 5 5 ! ----------------- 6 ! 7 ! 8 ! Former revisions: 9 ! ----------------- 10 ! $Id$ 11 ! 12 ! 97 2007-06-21 08:23:15Z raasch 6 13 ! Statistics for ocean version (salinity, density) added, 7 14 ! calculation of z_i and Deardorff velocity scale adjusted to be used with 8 15 ! the ocean version 9 !10 ! Former revisions:11 ! -----------------12 ! $Id$13 16 ! 14 17 ! 87 2007-05-22 15:46:47Z raasch -
palm/trunk/SOURCE/header.f90
r97 r98 4 4 ! Actual revisions: 5 5 ! ----------------- 6 ! Adjustments for the ocean version. 7 ! use_pt_reference renamed use_reference 6 ! 8 7 ! 9 8 ! Former revisions: 10 9 ! ----------------- 11 10 ! $Id$ 11 ! 12 ! 97 2007-06-21 08:23:15Z raasch 13 ! Adjustments for the ocean version. 14 ! use_pt_reference renamed use_reference 12 15 ! 13 16 ! 87 2007-05-22 15:46:47Z raasch -
palm/trunk/SOURCE/init_3d_model.f90
r97 r98 7 7 ! Actual revisions: 8 8 ! ----------------- 9 ! Initialization of salinity, call of init_ocean9 ! 10 10 ! 11 11 ! Former revisions: 12 12 ! ----------------- 13 13 ! $Id$ 14 ! 15 ! 97 2007-06-21 08:23:15Z raasch 16 ! Initialization of salinity, call of init_ocean 14 17 ! 15 18 ! 87 2007-05-22 15:46:47Z raasch -
palm/trunk/SOURCE/init_cloud_physics.f90
r95 r98 4 4 ! Actual revisions: 5 5 ! ----------------- 6 ! hydro_press renamed hyp6 ! 7 7 ! 8 8 ! Former revisions: 9 9 ! ------------------ 10 10 ! $Id$ 11 ! 12 ! 95 2007-06-02 16:48:38Z raasch 13 ! hydro_press renamed hyp 14 ! 15 ! February 2007 11 16 ! RCS Log replace by Id keyword, revision history cleaned up 12 17 ! -
palm/trunk/SOURCE/init_grid.f90
r94 r98 4 4 ! Actual revisions: 5 5 ! ----------------- 6 ! Grid definition for ocean version6 ! 7 7 ! 8 8 ! Former revisions: 9 9 ! ----------------- 10 10 ! $Id$ 11 ! 12 ! 94 2007-06-01 15:25:22Z raasch 13 ! Grid definition for ocean version 11 14 ! 12 15 ! 75 2007-03-22 09:54:05Z raasch -
palm/trunk/SOURCE/init_ocean.f90
r97 r98 4 4 ! Actual revisions: 5 5 ! ----------------- 6 ! hydro_press renamed hyp6 ! 7 7 ! 8 8 ! Former revisions: … … 10 10 ! $Id$ 11 11 ! 12 ! Initial revision (raasch 01/06/07) 12 ! 97 2007-06-21 08:23:15Z raasch 13 ! Initial revision 13 14 ! 14 15 ! Description: -
palm/trunk/SOURCE/modules.f90
r97 r98 5 5 ! Actual revisions: 6 6 ! ----------------- 7 ! +atmos_ocean_sign, ocean, r, + salinity variables 8 ! defaults of .._vertical_gradient_levels changed from -1.0 to -9999999.9 9 ! hydro_press renamed hyp, use_pt_reference renamed use_reference 7 ! 10 8 ! 11 9 ! Former revisions: 12 10 ! ----------------- 13 11 ! $Id$ 12 ! 13 ! 97 2007-06-21 08:23:15Z raasch 14 ! +atmos_ocean_sign, ocean, r, + salinity variables 15 ! defaults of .._vertical_gradient_levels changed from -1.0 to -9999999.9 16 ! hydro_press renamed hyp, use_pt_reference renamed use_reference 14 17 ! 15 18 ! 89 2007-05-25 12:08:31Z raasch -
palm/trunk/SOURCE/netcdf.f90
r97 r98 7 7 ! Current revisions: 8 8 ! ------------------ 9 ! Grids defined for rho and sa9 ! 10 10 ! 11 11 ! Former revisions: 12 12 ! ----------------- 13 13 ! $Id$ 14 ! 15 ! 97 2007-06-21 08:23:15Z raasch 16 ! Grids defined for rho and sa 14 17 ! 15 18 ! 48 2007-03-06 12:28:36Z raasch -
palm/trunk/SOURCE/parin.f90
r95 r98 4 4 ! Actual revisions: 5 5 ! ----------------- 6 ! 7 ! 8 ! Former revisions: 9 ! ----------------- 10 ! $Id$ 11 ! 12 ! 95 2007-06-02 16:48:38Z raasch 6 13 ! +bc_sa_t, bottom_salinityflux, ocean, sa_surface, sa_vertical_gradient, 7 14 ! sa_vertical_gradient_level, top_salinityflux in inipar, 8 15 ! sa_init is allocated 9 !10 ! Former revisions:11 ! -----------------12 ! $Id$13 16 ! 14 17 ! 87 2007-05-22 15:46:47Z raasch -
palm/trunk/SOURCE/production_e.f90
r97 r98 4 4 ! Actual revisions: 5 5 ! ----------------- 6 ! energy production by density flux (in ocean) added 7 ! use_pt_reference renamed use_reference 6 ! 8 7 ! 9 8 ! Former revisions: 10 9 ! ----------------- 11 10 ! $Id$ 11 ! 12 ! 97 2007-06-21 08:23:15Z raasch 13 ! Energy production by density flux (in ocean) added 14 ! use_pt_reference renamed use_reference 12 15 ! 13 16 ! 75 2007-03-22 09:54:05Z raasch -
palm/trunk/SOURCE/prognostic_equations.f90
r97 r98 4 4 ! Actual revisions: 5 5 ! ----------------- 6 ! 7 ! 8 ! Former revisions: 9 ! ----------------- 10 ! $Id$ 11 ! 12 ! 97 2007-06-21 08:23:15Z raasch 6 13 ! prognostic equation for salinity, density is calculated from equation of 7 14 ! state for seawater and is used for calculation of buoyancy, … … 11 18 ! in calls of buoyancy and diffusion_e, calc_mean_pt_profile renamed 12 19 ! calc_mean_profile 13 !14 ! Former revisions:15 ! -----------------16 ! $Id$17 20 ! 18 21 ! 75 2007-03-22 09:54:05Z raasch -
palm/trunk/SOURCE/read_3d_binary.f90
r96 r98 4 4 ! Actual revisions: 5 5 ! ----------------- 6 ! +rho_av, sa, sa_av, saswsb, saswst6 ! 7 7 ! 8 8 ! Former revisions: 9 9 ! ----------------- 10 10 ! $Id$ 11 ! 12 ! 96 2007-06-04 08:07:41Z raasch 13 ! +rho_av, sa, sa_av, saswsb, saswst 11 14 ! 12 15 ! 73 2007-03-20 08:33:14Z raasch -
palm/trunk/SOURCE/read_var_list.f90
r95 r98 4 4 ! Actual revisions: 5 5 ! ----------------- 6 ! +bc_sa_t, ocean, sa_init, sa_surface, sa_vertical_gradient, 7 ! sa_vertical_gradient_level, bottom/top_salinity_flux 6 ! 8 7 ! 9 8 ! Former revisions: 10 9 ! ----------------- 11 10 ! $Id$ 11 ! 12 ! 95 2007-06-02 16:48:38Z raasch 13 ! +bc_sa_t, ocean, sa_init, sa_surface, sa_vertical_gradient, 14 ! sa_vertical_gradient_level, bottom/top_salinity_flux 12 15 ! 13 16 ! 87 2007-05-22 15:46:47Z raasch -
palm/trunk/SOURCE/run_control.f90
r97 r98 4 4 ! Actual revisions: 5 5 ! ----------------- 6 ! Timestep format changed6 ! 7 7 ! 8 8 ! Former revisions: 9 9 ! ----------------- 10 10 ! $Id$ 11 ! 12 ! 97 2007-06-21 08:23:15Z raasch 13 ! Timestep and z_i format changed 11 14 ! 12 15 ! 87 2007-05-22 15:46:47Z raasch -
palm/trunk/SOURCE/sum_up_3d_data.f90
r96 r98 4 4 ! Actual revisions: 5 5 ! ----------------- 6 ! +sum-up of density and salinity6 ! 7 7 ! 8 8 ! Former revisions: 9 9 ! ----------------- 10 10 ! $Id$ 11 ! 12 ! 96 2007-06-04 08:07:41Z raasch 13 ! +sum-up of density and salinity 11 14 ! 12 15 ! 72 2007-03-19 08:20:46Z raasch -
palm/trunk/SOURCE/swap_timelevel.f90
r95 r98 4 4 ! Actual revisions: 5 5 ! ----------------- 6 ! Swaping of salinity6 ! 7 7 ! 8 8 ! Former revisions: 9 9 ! ----------------- 10 10 ! $Id$ 11 ! 12 ! 95 2007-06-02 16:48:38Z raasch 13 ! Swaping of salinity 11 14 ! 12 15 ! 75 2007-03-22 09:54:05Z raasch -
palm/trunk/SOURCE/time_integration.f90
r97 r98 4 4 ! Actual revisions: 5 5 ! ----------------- 6 ! 7 ! 8 ! Former revisions: 9 ! ----------------- 10 ! $Id$ 11 ! 12 ! 97 2007-06-21 08:23:15Z raasch 6 13 ! diffusivities is called with argument rho in case of ocean runs, 7 14 ! new argument pt_/prho_reference in calls of diffusivities, 8 15 ! ghostpoint exchange for salinity and density 9 !10 ! Former revisions:11 ! -----------------12 ! $Id$13 16 ! 14 17 ! 87 2007-05-22 15:46:47Z raasch -
palm/trunk/SOURCE/user_interface.f90
r95 r98 4 4 ! Actual revisions: 5 5 ! ----------------- 6 ! user action for salinity added6 ! 7 7 ! 8 8 ! Former revisions: 9 9 ! ----------------- 10 10 ! $Id$ 11 ! 12 ! 95 2007-06-02 16:48:38Z raasch 13 ! user action for salinity added 11 14 ! 12 15 ! 89 2007-05-25 12:08:31Z raasch -
palm/trunk/SOURCE/write_3d_binary.f90
r96 r98 4 4 ! Actual revisions: 5 5 ! ----------------- 6 ! +rho_av, sa, sa_av, saswsb, saswst6 ! 7 7 ! 8 8 ! Former revisions: 9 9 ! ----------------- 10 10 ! $Id$ 11 ! 12 ! 96 2007-06-04 08:07:41Z raasch 13 ! +rho_av, sa, sa_av, saswsb, saswst 11 14 ! 12 15 ! 75 2007-03-22 09:54:05Z raasch -
palm/trunk/SOURCE/write_var_list.f90
r95 r98 4 4 ! Actual revisions: 5 5 ! ----------------- 6 ! +bc_sa_t, ocean, sa_init, sa_surface, sa_vertical_gradient, 7 ! sa_vertical_gradient_level, bottom/top_salinity_flux 6 ! 8 7 ! 9 8 ! Former revisions: 10 9 ! ----------------- 11 10 ! $Id$ 11 ! 12 ! 95 2007-06-02 16:48:38Z raasch 13 ! +bc_sa_t, ocean, sa_init, sa_surface, sa_vertical_gradient, 14 ! sa_vertical_gradient_level, bottom/top_salinity_flux 12 15 ! 13 16 ! 87 2007-05-22 15:46:47Z raasch
Note: See TracChangeset
for help on using the changeset viewer.