compute_geometric_parameters Subroutine

private subroutine compute_geometric_parameters()

Compute the geometric parameters based on the grid points

The geometric parameters include the face normals and areas and the cell volumes.

Arguments

None

Calls

proc~~compute_geometric_parameters~~CallsGraph proc~compute_geometric_parameters compute_geometric_parameters proc~compute_face_areas_and_normals compute_face_areas_and_normals proc~compute_geometric_parameters->proc~compute_face_areas_and_normals proc~dmsg dmsg proc~compute_geometric_parameters->proc~dmsg proc~compute_volumes compute_volumes proc~compute_geometric_parameters->proc~compute_volumes proc~compute_face_area_vectors compute_face_area_vectors proc~compute_face_areas_and_normals->proc~compute_face_area_vectors proc~compute_face_areas compute_face_areas proc~compute_face_areas_and_normals->proc~compute_face_areas proc~normalize_face_normals normalize_face_normals proc~compute_face_areas_and_normals->proc~normalize_face_normals proc~vol_hexahedron vol_hexahedron proc~compute_volumes->proc~vol_hexahedron proc~vol_tetrahedron vol_tetrahedron proc~vol_hexahedron->proc~vol_tetrahedron

Called by

proc~~compute_geometric_parameters~~CalledByGraph proc~compute_geometric_parameters compute_geometric_parameters proc~setup_geometry setup_geometry proc~setup_geometry->proc~compute_geometric_parameters proc~setup_solver setup_solver proc~setup_solver->proc~setup_geometry proc~setup_all setup_all proc~setup_all->proc~setup_geometry proc~start_run start_run proc~start_run->proc~setup_solver program~main main program~main->proc~start_run

Contents


Source Code

        subroutine compute_geometric_parameters()
            !< Compute the geometric parameters based on the grid points
            !<
            !< The geometric parameters include the face normals and 
            !< areas and the cell volumes.
            !-----------------------------------------------------------
            
            implicit none

            call dmsg(1, 'geometry', 'compute_geometric_parameters')

            call compute_face_areas_and_normals()
            call compute_volumes()

        end subroutine compute_geometric_parameters