@@ -169,7 +169,7 @@ function Column(;
169
169
subsurface_space =
170
170
ClimaCore. Spaces. CenterFiniteDifferenceSpace (device, mesh)
171
171
surface_space = obtain_surface_space (subsurface_space)
172
- subsurface_face_space = obtain_face_space (subsurface_space)
172
+ subsurface_face_space = ClimaCore . Spaces . face_space (subsurface_space)
173
173
space = (;
174
174
surface = surface_space,
175
175
subsurface = subsurface_space,
@@ -475,7 +475,7 @@ function HybridBox(;
475
475
)
476
476
477
477
surface_space = obtain_surface_space (subsurface_space)
478
- subsurface_face_space = obtain_face_space (subsurface_space)
478
+ subsurface_face_space = ClimaCore . Spaces . face_space (subsurface_space)
479
479
space = (;
480
480
surface = surface_space,
481
481
subsurface = subsurface_space,
@@ -603,7 +603,7 @@ function SphericalShell(;
603
603
vert_center_space,
604
604
)
605
605
surface_space = obtain_surface_space (subsurface_space)
606
- subsurface_face_space = obtain_face_space (subsurface_space)
606
+ subsurface_face_space = ClimaCore . Spaces . face_space (subsurface_space)
607
607
space = (;
608
608
surface = surface_space,
609
609
subsurface = subsurface_space,
@@ -735,14 +735,6 @@ function obtain_surface_domain(s::SphericalShell{FT}) where {FT}
735
735
return surface_domain
736
736
end
737
737
738
- """
739
- obtain_face_space(cs::ClimaCore.Spaces.AbstractSpace)
740
-
741
- Returns the face space, if applicable, for the center space `cs`.
742
- """
743
- obtain_face_space (cs:: ClimaCore.Spaces.AbstractSpace ) =
744
- @error (" No face space is defined for this space." )
745
-
746
738
"""
747
739
obtain_surface_space(cs::ClimaCore.Spaces.AbstractSpace)
748
740
@@ -751,25 +743,6 @@ Returns the surface space, if applicable, for the center space `cs`.
751
743
obtain_surface_space (cs:: ClimaCore.Spaces.AbstractSpace ) =
752
744
@error (" No surface space is defined for this space." )
753
745
754
- """
755
- obtain_face_space(cs::ClimaCore.Spaces.CenterExtrudedFiniteDifferenceSpace)
756
-
757
- Returns the face space for the CenterExtrudedFiniteDifferenceSpace `cs`.
758
- """
759
- function obtain_face_space (
760
- cs:: ClimaCore.Spaces.CenterExtrudedFiniteDifferenceSpace ,
761
- )
762
- return ClimaCore. Spaces. FaceExtrudedFiniteDifferenceSpace (cs)
763
- end
764
-
765
- """
766
- obtain_face_space(cs::ClimaCore.Spaces.CenterFiniteDifferenceSpace)
767
-
768
- Returns the face space corresponding to the CenterFiniteDifferenceSpace `cs`.
769
- """
770
- function obtain_face_space (cs:: ClimaCore.Spaces.CenterFiniteDifferenceSpace )
771
- return ClimaCore. Spaces. FaceFiniteDifferenceSpace (cs)
772
- end
773
746
774
747
"""
775
748
obtain_surface_space(cs::ClimaCore.Spaces.CenterExtrudedFiniteDifferenceSpace)
788
761
Returns the top level of the face space corresponding to the CenterFiniteDifferenceSpace `cs`.
789
762
"""
790
763
function obtain_surface_space (cs:: ClimaCore.Spaces.CenterFiniteDifferenceSpace )
791
- fs = obtain_face_space (cs)
764
+ fs = ClimaCore . Spaces . face_space (cs)
792
765
return ClimaCore. Spaces. level (
793
766
fs,
794
767
ClimaCore. Utilities. PlusHalf (ClimaCore. Spaces. nlevels (fs) - 1 ),
@@ -891,7 +864,7 @@ both as Fields. It also returns the widths of each layer as a field.
891
864
"""
892
865
function get_Δz (z:: ClimaCore.Fields.Field )
893
866
# Extract the differences between levels of the face space
894
- fs = obtain_face_space (axes (z))
867
+ fs = ClimaCore . Spaces . face_space (axes (z))
895
868
z_face = ClimaCore. Fields. coordinate_field (fs). z
896
869
Δz_face = ClimaCore. Fields. Δz_field (z_face)
897
870
Δz_top = ClimaCore. Fields. level (
@@ -936,7 +909,7 @@ A helper function which returns additional fields and field data corresponding t
936
909
domains which have a subsurface_space (Column, HybridBox, SphericalShell).
937
910
The fields are the center coordinates of the subsurface space, the spacing between
938
911
the top center and top surface and bottom center and bottom surface, as well as the
939
- field corresponding to the surface height z and layer widths. The field data are the
912
+ field corresponding to the surface height z and layer widths. The field data are the
940
913
depth of the domain and the minimum top layer thickness over the entire domain.
941
914
942
915
We allocate these once, upon domain construction, so that they are accessible
@@ -946,7 +919,7 @@ function get_additional_coordinate_field_data(subsurface_space)
946
919
surface_space = obtain_surface_space (subsurface_space)
947
920
z = ClimaCore. Fields. coordinate_field (subsurface_space). z
948
921
Δz_top, Δz_bottom, Δz = get_Δz (z)
949
- face_space = obtain_face_space (subsurface_space)
922
+ face_space = ClimaCore . Spaces . face_space (subsurface_space)
950
923
z_face = ClimaCore. Fields. coordinate_field (face_space). z
951
924
z_sfc = top_face_to_surface (z_face, surface_space)
952
925
d = depth (subsurface_space)
@@ -1060,7 +1033,6 @@ end
1060
1033
export AbstractDomain
1061
1034
export Column, Plane, HybridBox, Point, SphericalShell, SphericalSurface
1062
1035
export coordinates,
1063
- obtain_face_space,
1064
1036
obtain_surface_space,
1065
1037
top_center_to_surface,
1066
1038
bottom_center_to_surface,
0 commit comments