solve_puzzle Subroutine

public subroutine solve_puzzle(grid)

Receives a puzzle grid and solves it.

Arguments

Type IntentOptional Attributes Name
integer, intent(inout), dimension(9, 9) :: grid

Input problem grid and returns solved grid.

Calls

proc~~solve_puzzle~~CallsGraph proc~solve_puzzle solve_puzzle proc~list_possible_digits list_possible_digits proc~solve_puzzle->proc~list_possible_digits proc~sort sort proc~solve_puzzle->proc~sort

Called by

proc~~solve_puzzle~~CalledByGraph proc~solve_puzzle solve_puzzle proc~cli_solver cli_solver proc~cli_solver->proc~solve_puzzle proc~create_puzzle create_puzzle proc~create_puzzle->proc~solve_puzzle

Variables

Type Visibility Attributes Name Initial
integer, public :: col
integer, public, dimension(1:81, 1:3) :: empty_cells
integer, public, dimension(9, 9) :: grid0
integer, public :: i
integer, public :: j
integer, public :: nb_empty
integer, public :: nb_possible
integer, public, dimension(1:9) :: possible_digit
real, public :: r
integer, public :: row