Changeset 5159 for LMDZ6/branches/Amaury_dev/libf/phylmd/ecrad/driver

Timestamp:

Aug 2, 2024, 9:58:25 PM (7 weeks ago)

Author:

abarral

Message:

Put dimensions.h and paramet.h into modules

Location:

LMDZ6/branches/Amaury_dev/libf/phylmd/ecrad/driver

Files:

• ecrad_driver.F90 (modified) (1 diff)
• ecrad_driver_config.F90 (modified) (1 diff)
• ecrad_driver_read_input.F90 (modified) (1 diff)
• ecrad_ifs_driver.F90 (modified) (3 diffs)
• ecrad_ifs_driver_blocked.F90 (modified) (3 diffs)
• ifs_blocking.F90 (modified) (4 diffs)
• test_aerosol_optics_description.F90 (modified) (1 diff)
• test_cloud_generator.F90 (modified) (1 diff)
• test_spartacus_math.F90 (modified) (1 diff)

LMDZ6/branches/Amaury_dev/libf/phylmd/ecrad/driver/ecrad_driver.F90

@@ -1 +1 @@
 ! ecrad_driver.F90 - Driver for offline ECRAD radiation scheme
-!
+
 ! (C) Copyright 2014- ECMWF.
-!
+
 ! This software is licensed under the terms of the Apache Licence Version 2.0
 ! which can be obtained at http://www.apache.org/licenses/LICENSE-2.0.
-!
+
 ! In applying this licence, ECMWF does not waive the privileges and immunities
 ! granted to it by virtue of its status as an intergovernmental organisation
 ! nor does it submit to any jurisdiction.
-!
+
 ! Author:  Robin Hogan
 ! Email:   r.j.hogan@ecmwf.int
-!
+
 ! ECRAD is the radiation scheme used in the ECMWF Integrated
 ! Forecasting System in cycle 43R3 and later. Several solvers are

LMDZ6/branches/Amaury_dev/libf/phylmd/ecrad/driver/ecrad_driver_config.F90

@@ -1 +1 @@
 ! ecrad_driver_config.F90 - Configure driver for offline ecRad radiation scheme
-!
+
 ! (C) Copyright 2015- ECMWF.
-!
+
 ! This software is licensed under the terms of the Apache Licence Version 2.0
 ! which can be obtained at http://www.apache.org/licenses/LICENSE-2.0.
-!
+
 ! In applying this licence, ECMWF does not waive the privileges and immunities
 ! granted to it by virtue of its status as an intergovernmental organisation
 ! nor does it submit to any jurisdiction.
-!
+
 ! Author:  Robin Hogan
 ! Email:   r.j.hogan@ecmwf.int

LMDZ6/branches/Amaury_dev/libf/phylmd/ecrad/driver/ecrad_driver_read_input.F90

@@ -1 +1 @@
 ! ecrad_driver_read_input.F90 - Read input structures from NetCDF file
-!
+
 ! (C) Copyright 2018- ECMWF.
-!
+
 ! This software is licensed under the terms of the Apache Licence Version 2.0
 ! which can be obtained at http://www.apache.org/licenses/LICENSE-2.0.
-!
+
 ! In applying this licence, ECMWF does not waive the privileges and immunities
 ! granted to it by virtue of its status as an intergovernmental organisation
 ! nor does it submit to any jurisdiction.
-!
+
 ! Author:  Robin Hogan
 ! Email:   r.j.hogan@ecmwf.int

LMDZ6/branches/Amaury_dev/libf/phylmd/ecrad/driver/ecrad_ifs_driver.F90

@@ -1 +1 @@
 ! ecrad_ifs_driver.F90 - Driver for offline ECRAD radiation scheme
-!
+
 ! (C) Copyright 2014- ECMWF.
-!
+
 ! This software is licensed under the terms of the Apache Licence Version 2.0
 ! which can be obtained at http://www.apache.org/licenses/LICENSE-2.0.
-!
+
 ! In applying this licence, ECMWF does not waive the privileges and immunities
 ! granted to it by virtue of its status as an intergovernmental organisation
 ! nor does it submit to any jurisdiction.
-!
+
 ! Author:  Robin Hogan
 ! Email:   r.j.hogan@ecmwf.int
-!
+
 ! ECRAD is the radiation scheme used in the ECMWF Integrated
 ! Forecasting System in cycle 43R3 and later. Several solvers are
@@ -26 +26 @@
 ! 2) Name of a NetCDF file containing one or more atmospheric profiles
 ! 3) Name of output NetCDF file
-!
+
 ! This version uses the infrastructure of the IFS, such as computing
 ! effective radius and cloud overlap from latitude and other
@@ -36 +36 @@
 ! satisfying this requirement is test/ifs/ecrad_meridian.nc in the
 ! ecRad package.
-!
+
 ! Note that the purpose of this file is simply to demonstrate the use
 ! of the setup_radiation_scheme and radiation_scheme routines; all the

LMDZ6/branches/Amaury_dev/libf/phylmd/ecrad/driver/ecrad_ifs_driver_blocked.F90

@@ -1 +1 @@
 ! ecrad_ifs_driver_blocked.F90 - Driver for offline ECRAD radiation scheme
-!
+
 ! (C) Copyright 2014- ECMWF.
-!
+
 ! This software is licensed under the terms of the Apache Licence Version 2.0
 ! which can be obtained at http://www.apache.org/licenses/LICENSE-2.0.
-!
+
 ! In applying this licence, ECMWF does not waive the privileges and immunities
 ! granted to it by virtue of its status as an intergovernmental organisation
 ! nor does it submit to any jurisdiction.
-!
+
 ! Author:  Robin Hogan
 ! Email:   r.j.hogan@ecmwf.int
-!
+
 ! ECRAD is the radiation scheme used in the ECMWF Integrated
 ! Forecasting System in cycle 43R3 and later. Several solvers are
@@ -26 +26 @@
 ! 2) Name of a NetCDF file containing one or more atmospheric profiles
 ! 3) Name of output NetCDF file
-!
+
 ! This version uses the infrastructure of the IFS, such as computing
 ! effective radius and cloud overlap from latitude and other
@@ -36 +36 @@
 ! satisfying this requirement is test/ifs/ecrad_meridian.nc in the
 ! ecRad package.
-!
+
 ! Note that the purpose of this file is simply to demonstrate the use
 ! of the setup_radiation_scheme and radiation_scheme routines as well

LMDZ6/branches/Amaury_dev/libf/phylmd/ecrad/driver/ifs_blocking.F90

@@ -1 +1 @@
 ! ifs_blocking.F90 - Reshuffle ecRad data into an NPROMA-blocked data structure
-!
+
 ! (C) Copyright 2022- ECMWF.
-!
+
 ! This software is licensed under the terms of the Apache Licence Version 2.0
 ! which can be obtained at http://www.apache.org/licenses/LICENSE-2.0.
-!
+
 ! In applying this licence, ECMWF does not waive the privileges and immunities
 ! granted to it by virtue of its status as an intergovernmental organisation
 ! nor does it submit to any jurisdiction.
-!
+
 ! Author:  Balthasar Reuter
 ! Email:   balthasar.reuter@ecmwf.int
@@ -78 +78 @@
   endif
 
-  !
+
   ! RADINTG
   !
@@ -344 +344 @@
 
     !  -------------------------------------------------------
-    !
+
     !  INPUT LOOP
-    !
+
     !  -------------------------------------------------------
 
@@ -524 +524 @@
 
     !  -------------------------------------------------------
-    !
+
     !  OUTPUT LOOP
-    !
+
     !  -------------------------------------------------------
 

LMDZ6/branches/Amaury_dev/libf/phylmd/ecrad/driver/test_aerosol_optics_description.F90

@@ -1 +1 @@
 ! (C) Copyright 2022- ECMWF.
-!
+
 ! This software is licensed under the terms of the Apache Licence Version 2.0
 ! which can be obtained at http://www.apache.org/licenses/LICENSE-2.0.
-!
+
 ! In applying this licence, ECMWF does not waive the privileges and immunities
 ! granted to it by virtue of its status as an intergovernmental organisation
 ! nor does it submit to any jurisdiction.
-!
+
 ! Author:  Robin Hogan
 ! Email:   r.j.hogan@ecmwf.int

LMDZ6/branches/Amaury_dev/libf/phylmd/ecrad/driver/test_cloud_generator.F90

@@ -1 +1 @@
 ! (C) Copyright 2017- ECMWF.
-!
+
 ! This software is licensed under the terms of the Apache Licence Version 2.0
 ! which can be obtained at http://www.apache.org/licenses/LICENSE-2.0.
-!
+
 ! In applying this licence, ECMWF does not waive the privileges and immunities
 ! granted to it by virtue of its status as an intergovernmental organisation

LMDZ6/branches/Amaury_dev/libf/phylmd/ecrad/driver/test_spartacus_math.F90

@@ -1 +1 @@
 ! (C) Copyright 2014- ECMWF.
-!
+
 ! This software is licensed under the terms of the Apache Licence Version 2.0
 ! which can be obtained at http://www.apache.org/licenses/LICENSE-2.0.
-!
+
 ! In applying this licence, ECMWF does not waive the privileges and immunities
 ! granted to it by virtue of its status as an intergovernmental organisation