Commit dfd03fc

committed

import linalg_error_handling

1 parent 33c2de6 commit dfd03fcCopy full SHA for dfd03fc

File tree

-2

lines changed

-2

lines changed

Lines changed: 1 addition & 1 deletion

Original file line number	Diff line number	Diff line change
`@@ -1,6 +1,6 @@`
`1`	`1`	`program example_state1`
`2`	`2`	`use stdlib_linalg_state, only: linalg_state_type, LINALG_SUCCESS, LINALG_VALUE_ERROR, &`
`3`		`- operator(/=)`
	`3`	`+ operator(/=)`
`4`	`4`	`implicit none`
`5`	`5`	`type(linalg_state_type) :: err`
`6`	`6`

Lines changed: 2 additions & 1 deletion

Original file line number	Diff line number	Diff line change
`@@ -4,7 +4,8 @@ program example_state2`
`4`	`4`	!! 1) the different mechanisms that can be used to initialize the `linalg_state` variable providing
`5`	`5`	`!! strings, scalars, or arrays, on input to it;`
`6`	`6`	!! 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`
`8`	`9`	`implicit none`
`9`	`10`	`integer :: info`
`10`	`11`	`type(linalg_state_type) :: err`

Comments

(0)