Skip to content

Commit dfd03fc

Browse files
committed
import linalg_error_handling
1 parent 33c2de6 commit dfd03fc

File tree

2 files changed

+3
-2
lines changed

2 files changed

+3
-2
lines changed

example/linalg/example_state1.f90

+1-1
Original file line numberDiff line numberDiff line change
@@ -1,6 +1,6 @@
11
program example_state1
22
use stdlib_linalg_state, only: linalg_state_type, LINALG_SUCCESS, LINALG_VALUE_ERROR, &
3-
operator(/=)
3+
operator(/=)
44
implicit none
55
type(linalg_state_type) :: err
66

example/linalg/example_state2.f90

+2-1
Original file line numberDiff line numberDiff line change
@@ -4,7 +4,8 @@ program example_state2
44
!! 1) the different mechanisms that can be used to initialize the `linalg_state` variable providing
55
!! strings, scalars, or arrays, on input to it;
66
!! 2) `pure` setup of the error control
7-
use stdlib_linalg_state, only: linalg_state_type, LINALG_VALUE_ERROR, LINALG_SUCCESS
7+
use stdlib_linalg_state, only: linalg_state_type, LINALG_VALUE_ERROR, LINALG_SUCCESS, &
8+
linalg_error_handling
89
implicit none
910
integer :: info
1011
type(linalg_state_type) :: err

0 commit comments

Comments
 (0)