Skip to content

Commit 9f6c39b

Browse files
committed
Remove allocatable attribute in linear_scaling
In MOM_self_attr_load module.
1 parent 7e645ab commit 9f6c39b

File tree

2 files changed

+3
-3
lines changed

2 files changed

+3
-3
lines changed

src/parameterizations/lateral/MOM_self_attr_load.F90

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -33,7 +33,7 @@ module MOM_self_attr_load
3333
!< If true, use bottom pressure anomaly instead of SSH to calculate SAL.
3434
real :: eta_prop
3535
!< The partial derivative of eta_sal with the local value of eta [nondim].
36-
real, allocatable :: linear_scaling
36+
real :: linear_scaling
3737
!< Dimensional coefficients for scalar SAL [nondim or Z T2 L-2 R-1 ~> m Pa-1]
3838
type(sht_CS), allocatable :: sht
3939
!< Spherical harmonic transforms (SHT) control structure

src/parameterizations/lateral/MOM_spherical_harmonics.F90

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -1,12 +1,12 @@
11
!> Laplace's spherical harmonic transforms (SHT)
22
module MOM_spherical_harmonics
3+
use MOM_coms_infra, only : sum_across_PEs
4+
use MOM_coms, only : reproducing_sum
35
use MOM_cpu_clock, only : cpu_clock_id, cpu_clock_begin, cpu_clock_end, &
46
CLOCK_MODULE, CLOCK_ROUTINE, CLOCK_LOOP
57
use MOM_error_handler, only : MOM_error, FATAL
68
use MOM_file_parser, only : get_param, log_version, param_file_type
79
use MOM_grid, only : ocean_grid_type
8-
use MOM_coms_infra, only : sum_across_PEs
9-
use MOM_coms, only : reproducing_sum
1010

1111
implicit none ; private
1212

0 commit comments

Comments
 (0)