Changeset 1833 for palm/trunk/SOURCE/netcdf_interface.f90

Timestamp:

Apr 7, 2016 2:23:03 PM (7 years ago)

Author:

raasch

Message:

spectrum renamed spactra_par and further modularized, POINTER-attributes added in coupler-routines to avoid gfortran error messages

File:

• palm/trunk/SOURCE/netcdf_interface.f90 (modified) (3 diffs)

palm/trunk/SOURCE/netcdf_interface.f90

@@ -19 +19 @@
 ! Current revisions:
 ! ------------------
-!
+! spectrum renamed spectra_mod
 !
 ! Former revisions:
@@ -348 +348 @@
     USE control_parameters,                                                    &
         ONLY:  averaging_interval, averaging_interval_pr,                      &
-               averaging_interval_sp, data_output_pr,  domask,  dopr_n,        &
+               data_output_pr,  domask,  dopr_n,        &
                dopr_time_count, dopts_time_count, dots_time_count,             &
-               dosp_time_count, do2d, do2d_xz_time_count, do3d,                &
+               do2d, do2d_xz_time_count, do3d,                &
                do2d_yz_time_count, dt_data_output_av, dt_do2d_xy, dt_do2d_xz,  &
                dt_do2d_yz, dt_do3d, mask_size, do2d_xy_time_count,             &
@@ -380 +380 @@
         ONLY:  crmax, cross_profiles, dopr_index, profile_columns, profile_rows
 
-    USE spectrum,                                                              &
-        ONLY:  comp_spectra_level, data_output_sp, spectra_direction
+    USE spectra_mod,                                                           &
+        ONLY:  averaging_interval_sp, comp_spectra_level, data_output_sp, dosp_time_count, spectra_direction
 
     USE statistics,                                                            &