Changeset 3614 for palm/trunk/SOURCE/ocean_mod.f90
- Timestamp:
- Dec 10, 2018 7:05:46 AM (4 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
palm/trunk/SOURCE/ocean_mod.f90
r3568 r3614 25 25 ! ----------------- 26 26 ! $Id$ 27 ! unused variables removed 28 ! 29 ! 3568 2018-11-27 16:07:59Z raasch 27 30 ! bugifx: calculate equation of state for seawater even if salinity is switched 28 31 ! off … … 512 515 SUBROUTINE ocean_parin 513 516 514 USE control_parameters, &515 ONLY: message_string516 517 517 IMPLICIT NONE 518 518 … … 706 706 707 707 USE control_parameters, & 708 ONLY: data_output_pr , message_string708 ONLY: data_output_pr 709 709 710 710 USE indices … … 1172 1172 USE indices, & 1173 1173 ONLY: nxlg, nxrg, nyng, nysg, nzb, nzt 1174 1175 USE pmc_interface, &1176 ONLY: nested_run1177 1174 1178 1175 IMPLICIT NONE … … 2160 2157 2161 2158 USE indices, & 2162 ONLY: n xl, nxr, nys, nysv, nyn, nzb, nzt2159 ONLY: nzb, nzt 2163 2160 2164 2161 IMPLICIT NONE
Note: See TracChangeset
for help on using the changeset viewer.