Initialise the error_handling module variables
subroutine init_error_handling
!! Initialise the error_handling module variables
implicit none
errors_on = .false.
error_id = 0
error_status = ERROR_OKAY
idiags = INT_DEFAULT
fdiags = FLT_DEFAULT
error_head => null()
error_tail => null()
end subroutine init_error_handling