Skip to content
Snippets Groups Projects
Commit f317224a authored by Debolskiy Andrey's avatar Debolskiy Andrey :bicyclist_tone5:
Browse files

quickfix

parent aebe02aa
No related branches found
No related tags found
No related merge requests found
<?xml version="1.0" encoding="UTF-8"?>
<module type="CPP_MODULE" version="4">
<component name="NewModuleRootManager">
<content url="file://$MODULE_DIR$" />
<orderEntry type="inheritedJdk" />
<orderEntry type="sourceFolder" forTests="false" />
</component>
</module>
\ No newline at end of file
<module classpath="CMake" type="CPP_MODULE" version="4" />
\ No newline at end of file
......@@ -8,6 +8,7 @@ module config_utils
implicit none
integer, public, save:: is_config_initialized = 0
public init_config, get_fluid_params, get_grid_params
public get_geo_forcing, get_heat_forcing
contains
......@@ -142,6 +143,8 @@ module config_utils
end if
end subroutine get_grid_params
!> @brief character array to string conversion
function char_array2str(char_array) result(str)
! ----------------------------------------------------------------------------
......
......@@ -23,7 +23,11 @@ module pbl_grid
public :: allocate_pbl_grid, deallocate_pbl_grid
public :: set_pbl_grid_via_edge !(grid,zpos,nk)
public :: set_pbl_grid_uniform
!public :: set_from_file()
public :: set_from_file
public :: set_inmcm_21
public :: get_sig_from_z
public :: get_z_from_sig
contains
subroutine allocate_pbl_grid(grid, nk)
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment