- Timestamp:
- Mar 19, 2024, 3:34:21 PM (2 months ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
LMDZ6/trunk/libf/phylmd/ecrad/radiation/radiation_flux.F90
r4773 r4853 20 20 ! 2021-01-20 R. Hogan Added heating_rate_out_of_physical_bounds function 21 21 ! 2022-12-07 R. Hogan Added top-of-atmosphere spectral output 22 23 #include "ecrad_config.h" 22 24 23 25 module radiation_flux … … 117 119 118 120 ! Added for DWD (2020) 119 #ifdef __SX__121 #ifdef DWD_VECTOR_OPTIMIZATIONS 120 122 logical, parameter :: use_indexed_sum_vec = .true. 121 123 #else
Note: See TracChangeset
for help on using the changeset viewer.