| Line | Branch | Exec | Source |
|---|---|---|---|
| 1 | !!!############################################################################# | ||
| 2 | !!! Code written by Ned Thaddeus Taylor | ||
| 3 | !!! Code part of the ATHENA library - a feedforward neural network library | ||
| 4 | !!!############################################################################# | ||
| 5 | !!! module contains implementation of a 1D input layer | ||
| 6 | !!!############################################################################# | ||
| 7 | module input1d_layer | ||
| 8 | use constants, only: real12 | ||
| 9 | use base_layer, only: input_layer_type | ||
| 10 | implicit none | ||
| 11 | |||
| 12 | |||
| 13 | type, extends(input_layer_type) :: input1d_layer_type | ||
| 14 | real(real12), allocatable, dimension(:,:) :: output | ||
| 15 | contains | ||
| 16 | procedure, pass(this) :: get_output => get_output_input1d | ||
| 17 | procedure, pass(this) :: init => init_input1d | ||
| 18 | procedure, pass(this) :: set_batch_size => set_batch_size_input1d | ||
| 19 | procedure, pass(this) :: forward => forward_rank | ||
| 20 | procedure, pass(this) :: backward => backward_rank | ||
| 21 | procedure, pass(this) :: set => set_input1d | ||
| 22 | end type input1d_layer_type | ||
| 23 | |||
| 24 | interface input1d_layer_type | ||
| 25 | module function layer_setup(input_shape, batch_size) result(layer) | ||
| 26 | integer, dimension(:), optional, intent(in) :: input_shape | ||
| 27 | integer, optional, intent(in) :: batch_size | ||
| 28 | type(input1d_layer_type) :: layer | ||
| 29 | end function layer_setup | ||
| 30 | end interface input1d_layer_type | ||
| 31 | |||
| 32 | |||
| 33 | private | ||
| 34 | public :: input1d_layer_type | ||
| 35 | |||
| 36 | |||
| 37 | contains | ||
| 38 | |||
| 39 | !!!############################################################################# | ||
| 40 | !!! get layer outputs | ||
| 41 | !!!############################################################################# | ||
| 42 | 4 | pure subroutine get_output_input1d(this, output) | |
| 43 | implicit none | ||
| 44 | class(input1d_layer_type), intent(in) :: this | ||
| 45 | real(real12), allocatable, dimension(..), intent(out) :: output | ||
| 46 | |||
| 47 | select rank(output) | ||
| 48 | rank(1) | ||
| 49 |
7/10✗ Branch 0 not taken.
✓ Branch 1 taken 4 times.
✓ Branch 2 taken 4 times.
✓ Branch 3 taken 2 times.
✓ Branch 4 taken 2 times.
✓ Branch 5 taken 2 times.
✗ Branch 7 not taken.
✓ Branch 8 taken 2 times.
✓ Branch 9 taken 2 times.
✗ Branch 10 not taken.
|
8 | output = reshape(this%output, [size(this%output)]) |
| 50 | rank(2) | ||
| 51 |
18/36✗ Branch 0 not taken.
✓ Branch 1 taken 2 times.
✗ Branch 3 not taken.
✓ Branch 4 taken 2 times.
✗ Branch 6 not taken.
✓ Branch 7 taken 2 times.
✗ Branch 9 not taken.
✓ Branch 10 taken 2 times.
✗ Branch 12 not taken.
✓ Branch 13 taken 2 times.
✗ Branch 15 not taken.
✓ Branch 16 taken 2 times.
✗ Branch 18 not taken.
✓ Branch 19 taken 2 times.
✗ Branch 21 not taken.
✓ Branch 22 taken 2 times.
✗ Branch 24 not taken.
✓ Branch 25 taken 2 times.
✗ Branch 26 not taken.
✗ Branch 27 not taken.
✗ Branch 28 not taken.
✗ Branch 29 not taken.
✓ Branch 30 taken 2 times.
✗ Branch 31 not taken.
✓ Branch 32 taken 2 times.
✗ Branch 33 not taken.
✓ Branch 34 taken 2 times.
✗ Branch 35 not taken.
✓ Branch 36 taken 2 times.
✗ Branch 37 not taken.
✓ Branch 38 taken 2 times.
✗ Branch 39 not taken.
✓ Branch 40 taken 2 times.
✓ Branch 41 taken 2 times.
✓ Branch 42 taken 3 times.
✓ Branch 43 taken 2 times.
|
7 | output = this%output |
| 52 | end select | ||
| 53 | |||
| 54 | 4 | end subroutine get_output_input1d | |
| 55 | !!!############################################################################# | ||
| 56 | |||
| 57 | |||
| 58 | !!!##########################################################################!!! | ||
| 59 | !!! * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * !!! | ||
| 60 | !!!##########################################################################!!! | ||
| 61 | |||
| 62 | |||
| 63 | !!!############################################################################# | ||
| 64 | !!! forward propagation assumed rank handler | ||
| 65 | !!! placeholder to satisfy deferred | ||
| 66 | !!!############################################################################# | ||
| 67 | 6 | pure subroutine forward_rank(this, input) | |
| 68 | implicit none | ||
| 69 | class(input1d_layer_type), intent(inout) :: this | ||
| 70 | real(real12), dimension(..), intent(in) :: input | ||
| 71 | |||
| 72 | select rank(input) | ||
| 73 | rank(1) | ||
| 74 |
16/24✓ Branch 0 taken 2 times.
✓ Branch 1 taken 1 times.
✓ Branch 2 taken 2 times.
✗ Branch 3 not taken.
✗ Branch 4 not taken.
✓ Branch 5 taken 2 times.
✓ Branch 8 taken 1 times.
✗ Branch 9 not taken.
✓ Branch 10 taken 1 times.
✓ Branch 11 taken 1 times.
✓ Branch 12 taken 2 times.
✓ Branch 13 taken 1 times.
✓ Branch 14 taken 1 times.
✗ Branch 15 not taken.
✓ Branch 16 taken 1 times.
✗ Branch 17 not taken.
✓ Branch 18 taken 1 times.
✗ Branch 19 not taken.
✗ Branch 20 not taken.
✗ Branch 21 not taken.
✓ Branch 22 taken 1 times.
✓ Branch 23 taken 1 times.
✓ Branch 24 taken 2 times.
✓ Branch 25 taken 1 times.
|
9 | this%output = reshape(input, shape=shape(this%output)) |
| 75 | rank(2) | ||
| 76 |
16/24✓ Branch 0 taken 2 times.
✓ Branch 1 taken 1 times.
✓ Branch 2 taken 2 times.
✗ Branch 3 not taken.
✗ Branch 4 not taken.
✓ Branch 5 taken 2 times.
✓ Branch 8 taken 1 times.
✗ Branch 9 not taken.
✓ Branch 10 taken 1 times.
✓ Branch 11 taken 1 times.
✓ Branch 12 taken 2 times.
✓ Branch 13 taken 1 times.
✓ Branch 14 taken 1 times.
✗ Branch 15 not taken.
✓ Branch 16 taken 1 times.
✗ Branch 17 not taken.
✓ Branch 18 taken 1 times.
✗ Branch 19 not taken.
✗ Branch 20 not taken.
✗ Branch 21 not taken.
✓ Branch 22 taken 1 times.
✓ Branch 23 taken 1 times.
✓ Branch 24 taken 2 times.
✓ Branch 25 taken 1 times.
|
9 | this%output = reshape(input, shape=shape(this%output)) |
| 77 | rank(3) | ||
| 78 |
16/24✓ Branch 0 taken 2 times.
✓ Branch 1 taken 1 times.
✓ Branch 2 taken 2 times.
✗ Branch 3 not taken.
✗ Branch 4 not taken.
✓ Branch 5 taken 2 times.
✓ Branch 8 taken 1 times.
✗ Branch 9 not taken.
✓ Branch 10 taken 1 times.
✓ Branch 11 taken 1 times.
✓ Branch 12 taken 2 times.
✓ Branch 13 taken 1 times.
✓ Branch 14 taken 1 times.
✗ Branch 15 not taken.
✓ Branch 16 taken 1 times.
✗ Branch 17 not taken.
✓ Branch 18 taken 1 times.
✗ Branch 19 not taken.
✗ Branch 20 not taken.
✗ Branch 21 not taken.
✓ Branch 22 taken 1 times.
✓ Branch 23 taken 1 times.
✓ Branch 24 taken 2 times.
✓ Branch 25 taken 1 times.
|
9 | this%output = reshape(input, shape=shape(this%output)) |
| 79 | rank(4) | ||
| 80 |
16/24✓ Branch 0 taken 2 times.
✓ Branch 1 taken 1 times.
✓ Branch 2 taken 2 times.
✗ Branch 3 not taken.
✗ Branch 4 not taken.
✓ Branch 5 taken 2 times.
✓ Branch 8 taken 1 times.
✗ Branch 9 not taken.
✓ Branch 10 taken 1 times.
✓ Branch 11 taken 1 times.
✓ Branch 12 taken 2 times.
✓ Branch 13 taken 1 times.
✓ Branch 14 taken 1 times.
✗ Branch 15 not taken.
✓ Branch 16 taken 1 times.
✗ Branch 17 not taken.
✓ Branch 18 taken 1 times.
✗ Branch 19 not taken.
✗ Branch 20 not taken.
✗ Branch 21 not taken.
✓ Branch 22 taken 1 times.
✓ Branch 23 taken 1 times.
✓ Branch 24 taken 2 times.
✓ Branch 25 taken 1 times.
|
9 | this%output = reshape(input, shape=shape(this%output)) |
| 81 | rank(5) | ||
| 82 |
16/24✓ Branch 0 taken 2 times.
✓ Branch 1 taken 1 times.
✓ Branch 2 taken 2 times.
✗ Branch 3 not taken.
✗ Branch 4 not taken.
✓ Branch 5 taken 2 times.
✓ Branch 8 taken 1 times.
✗ Branch 9 not taken.
✓ Branch 10 taken 1 times.
✓ Branch 11 taken 1 times.
✓ Branch 12 taken 2 times.
✓ Branch 13 taken 1 times.
✓ Branch 14 taken 1 times.
✗ Branch 15 not taken.
✓ Branch 16 taken 1 times.
✗ Branch 17 not taken.
✓ Branch 18 taken 1 times.
✗ Branch 19 not taken.
✗ Branch 20 not taken.
✗ Branch 21 not taken.
✓ Branch 22 taken 1 times.
✓ Branch 23 taken 1 times.
✓ Branch 24 taken 2 times.
✓ Branch 25 taken 1 times.
|
9 | this%output = reshape(input, shape=shape(this%output)) |
| 83 | rank(6) | ||
| 84 |
16/24✓ Branch 0 taken 2 times.
✓ Branch 1 taken 1 times.
✓ Branch 2 taken 2 times.
✗ Branch 3 not taken.
✗ Branch 4 not taken.
✓ Branch 5 taken 2 times.
✓ Branch 8 taken 1 times.
✗ Branch 9 not taken.
✓ Branch 10 taken 1 times.
✓ Branch 11 taken 1 times.
✓ Branch 12 taken 2 times.
✓ Branch 13 taken 1 times.
✓ Branch 14 taken 1 times.
✗ Branch 15 not taken.
✓ Branch 16 taken 1 times.
✗ Branch 17 not taken.
✓ Branch 18 taken 1 times.
✗ Branch 19 not taken.
✗ Branch 20 not taken.
✗ Branch 21 not taken.
✓ Branch 22 taken 1 times.
✓ Branch 23 taken 1 times.
✓ Branch 24 taken 2 times.
✓ Branch 25 taken 1 times.
|
9 | this%output = reshape(input, shape=shape(this%output)) |
| 85 | end select | ||
| 86 | 6 | end subroutine forward_rank | |
| 87 | !!!############################################################################# | ||
| 88 | |||
| 89 | |||
| 90 | !!!############################################################################# | ||
| 91 | !!! backward propagation assumed rank handler | ||
| 92 | !!! placeholder to satisfy deferred | ||
| 93 | !!!############################################################################# | ||
| 94 | 1 | pure subroutine backward_rank(this, input, gradient) | |
| 95 | implicit none | ||
| 96 | class(input1d_layer_type), intent(inout) :: this | ||
| 97 | real(real12), dimension(..), intent(in) :: input | ||
| 98 | real(real12), dimension(..), intent(in) :: gradient | ||
| 99 | 1 | return | |
| 100 | end subroutine backward_rank | ||
| 101 | !!!############################################################################# | ||
| 102 | |||
| 103 | |||
| 104 | !!!##########################################################################!!! | ||
| 105 | !!! * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * !!! | ||
| 106 | !!!##########################################################################!!! | ||
| 107 | |||
| 108 | |||
| 109 | !!!############################################################################# | ||
| 110 | !!! set up layer | ||
| 111 | !!!############################################################################# | ||
| 112 | #if defined(GFORTRAN) | ||
| 113 | module function layer_setup(input_shape, batch_size) result(layer) | ||
| 114 | implicit none | ||
| 115 | integer, dimension(:), optional, intent(in) :: input_shape | ||
| 116 | integer, optional, intent(in) :: batch_size | ||
| 117 | |||
| 118 | type(input1d_layer_type) :: layer | ||
| 119 | #else | ||
| 120 |
2/4✓ Branch 0 taken 4 times.
✗ Branch 1 not taken.
✓ Branch 2 taken 4 times.
✗ Branch 3 not taken.
|
4 | module procedure layer_setup |
| 121 | implicit none | ||
| 122 | #endif | ||
| 123 | |||
| 124 | |||
| 125 |
3/8✓ Branch 0 taken 4 times.
✗ Branch 1 not taken.
✗ Branch 2 not taken.
✗ Branch 3 not taken.
✓ Branch 4 taken 4 times.
✗ Branch 5 not taken.
✗ Branch 6 not taken.
✓ Branch 7 taken 4 times.
|
4 | layer%name = "input1d" |
| 126 | 4 | layer%input_rank = 1 | |
| 127 | !!-------------------------------------------------------------------------- | ||
| 128 | !! initialise batch size | ||
| 129 | !!-------------------------------------------------------------------------- | ||
| 130 |
2/2✓ Branch 0 taken 1 times.
✓ Branch 1 taken 3 times.
|
4 | if(present(batch_size)) layer%batch_size = batch_size |
| 131 | |||
| 132 | |||
| 133 | !!-------------------------------------------------------------------------- | ||
| 134 | !! initialise layer shape | ||
| 135 | !!-------------------------------------------------------------------------- | ||
| 136 |
5/10✓ Branch 0 taken 4 times.
✗ Branch 1 not taken.
✓ Branch 2 taken 4 times.
✗ Branch 3 not taken.
✗ Branch 4 not taken.
✓ Branch 5 taken 4 times.
✗ Branch 7 not taken.
✓ Branch 8 taken 4 times.
✗ Branch 10 not taken.
✓ Branch 11 taken 4 times.
|
4 | if(present(input_shape)) call layer%init(input_shape=input_shape) |
| 137 | |||
| 138 | #if defined(GFORTRAN) | ||
| 139 | end function layer_setup | ||
| 140 | #else | ||
| 141 |
1/2✓ Branch 0 taken 4 times.
✗ Branch 1 not taken.
|
8 | end procedure layer_setup |
| 142 | #endif | ||
| 143 | !!!############################################################################# | ||
| 144 | |||
| 145 | |||
| 146 | !!!############################################################################# | ||
| 147 | !!! initialise layer | ||
| 148 | !!!############################################################################# | ||
| 149 |
1/2✓ Branch 0 taken 4 times.
✗ Branch 1 not taken.
|
4 | subroutine init_input1d(this, input_shape, batch_size, verbose) |
| 150 | implicit none | ||
| 151 | class(input1d_layer_type), intent(inout) :: this | ||
| 152 | integer, dimension(:), intent(in) :: input_shape | ||
| 153 | integer, optional, intent(in) :: batch_size | ||
| 154 | integer, optional, intent(in) :: verbose | ||
| 155 | |||
| 156 | integer :: verbose_ = 0 | ||
| 157 | |||
| 158 | |||
| 159 | !!-------------------------------------------------------------------------- | ||
| 160 | !! initialise optional arguments | ||
| 161 | !!-------------------------------------------------------------------------- | ||
| 162 |
1/2✗ Branch 0 not taken.
✓ Branch 1 taken 4 times.
|
4 | if(present(verbose)) verbose_ = verbose |
| 163 |
1/2✗ Branch 0 not taken.
✓ Branch 1 taken 4 times.
|
4 | if(present(batch_size)) this%batch_size = batch_size |
| 164 | |||
| 165 | |||
| 166 | !!-------------------------------------------------------------------------- | ||
| 167 | !! initialise input shape | ||
| 168 | !!-------------------------------------------------------------------------- | ||
| 169 |
4/8✓ Branch 0 taken 4 times.
✗ Branch 1 not taken.
✗ Branch 2 not taken.
✓ Branch 3 taken 4 times.
✗ Branch 5 not taken.
✓ Branch 6 taken 4 times.
✗ Branch 8 not taken.
✓ Branch 9 taken 4 times.
|
4 | if(.not.allocated(this%input_shape)) call this%set_shape(input_shape) |
| 170 | |||
| 171 |
10/20✗ Branch 0 not taken.
✓ Branch 1 taken 4 times.
✗ Branch 3 not taken.
✓ Branch 4 taken 4 times.
✗ Branch 6 not taken.
✓ Branch 7 taken 4 times.
✗ Branch 9 not taken.
✓ Branch 10 taken 4 times.
✗ Branch 12 not taken.
✓ Branch 13 taken 4 times.
✗ Branch 14 not taken.
✗ Branch 15 not taken.
✓ Branch 16 taken 4 times.
✗ Branch 17 not taken.
✓ Branch 18 taken 4 times.
✗ Branch 19 not taken.
✓ Branch 20 taken 4 times.
✗ Branch 21 not taken.
✓ Branch 22 taken 4 times.
✓ Branch 23 taken 4 times.
|
8 | this%output_shape = this%input_shape |
| 172 |
6/10✗ Branch 0 not taken.
✓ Branch 1 taken 4 times.
✗ Branch 3 not taken.
✓ Branch 4 taken 4 times.
✗ Branch 6 not taken.
✓ Branch 7 taken 4 times.
✗ Branch 9 not taken.
✓ Branch 10 taken 4 times.
✓ Branch 12 taken 4 times.
✓ Branch 13 taken 4 times.
|
8 | this%num_outputs = product(this%input_shape) |
| 173 | |||
| 174 | |||
| 175 | !!-------------------------------------------------------------------------- | ||
| 176 | !! initialise batch size-dependent arrays | ||
| 177 | !!-------------------------------------------------------------------------- | ||
| 178 |
2/2✓ Branch 0 taken 1 times.
✓ Branch 1 taken 3 times.
|
4 | if(this%batch_size.gt.0) call this%set_batch_size(this%batch_size) |
| 179 | |||
| 180 | 4 | end subroutine init_input1d | |
| 181 | !!!############################################################################# | ||
| 182 | |||
| 183 | |||
| 184 | !!!############################################################################# | ||
| 185 | !!! set batch size | ||
| 186 | !!!############################################################################# | ||
| 187 | 14 | subroutine set_batch_size_input1d(this, batch_size, verbose) | |
| 188 | implicit none | ||
| 189 | class(input1d_layer_type), intent(inout) :: this | ||
| 190 | integer, intent(in) :: batch_size | ||
| 191 | integer, optional, intent(in) :: verbose | ||
| 192 | |||
| 193 | integer :: verbose_ = 0 | ||
| 194 | |||
| 195 | |||
| 196 | !!-------------------------------------------------------------------------- | ||
| 197 | !! initialise optional arguments | ||
| 198 | !!-------------------------------------------------------------------------- | ||
| 199 |
1/2✗ Branch 0 not taken.
✓ Branch 1 taken 14 times.
|
14 | if(present(verbose)) verbose_ = verbose |
| 200 | 14 | this%batch_size = batch_size | |
| 201 | |||
| 202 | |||
| 203 | !!-------------------------------------------------------------------------- | ||
| 204 | !! allocate arrays | ||
| 205 | !!-------------------------------------------------------------------------- | ||
| 206 |
1/2✓ Branch 0 taken 14 times.
✗ Branch 1 not taken.
|
14 | if(allocated(this%input_shape))then |
| 207 |
3/4✓ Branch 0 taken 10 times.
✓ Branch 1 taken 4 times.
✗ Branch 2 not taken.
✓ Branch 3 taken 10 times.
|
14 | if(allocated(this%output)) deallocate(this%output) |
| 208 | ✗ | allocate(this%output(this%input_shape(1), this%batch_size), & | |
| 209 |
23/42✗ Branch 0 not taken.
✓ Branch 1 taken 14 times.
✗ Branch 3 not taken.
✓ Branch 4 taken 14 times.
✓ Branch 6 taken 14 times.
✗ Branch 7 not taken.
✗ Branch 8 not taken.
✓ Branch 9 taken 14 times.
✓ Branch 10 taken 14 times.
✗ Branch 11 not taken.
✗ Branch 12 not taken.
✓ Branch 13 taken 14 times.
✗ Branch 14 not taken.
✓ Branch 15 taken 14 times.
✗ Branch 16 not taken.
✓ Branch 17 taken 14 times.
✗ Branch 18 not taken.
✓ Branch 19 taken 14 times.
✗ Branch 21 not taken.
✓ Branch 22 taken 14 times.
✗ Branch 23 not taken.
✓ Branch 24 taken 14 times.
✗ Branch 26 not taken.
✓ Branch 27 taken 14 times.
✗ Branch 29 not taken.
✓ Branch 30 taken 14 times.
✗ Branch 32 not taken.
✓ Branch 33 taken 14 times.
✗ Branch 35 not taken.
✓ Branch 36 taken 14 times.
✗ Branch 38 not taken.
✓ Branch 39 taken 14 times.
✗ Branch 41 not taken.
✓ Branch 42 taken 14 times.
✗ Branch 44 not taken.
✓ Branch 45 taken 14 times.
✗ Branch 47 not taken.
✓ Branch 48 taken 14 times.
✓ Branch 50 taken 14 times.
✓ Branch 51 taken 14 times.
✓ Branch 52 taken 780 times.
✓ Branch 53 taken 14 times.
|
808 | source=0._real12) |
| 210 | end if | ||
| 211 | |||
| 212 | 14 | end subroutine set_batch_size_input1d | |
| 213 | !!!############################################################################# | ||
| 214 | |||
| 215 | |||
| 216 | !!!##########################################################################!!! | ||
| 217 | !!! * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * !!! | ||
| 218 | !!!##########################################################################!!! | ||
| 219 | |||
| 220 | |||
| 221 | !!!############################################################################# | ||
| 222 | !!! set input layer values | ||
| 223 | !!!############################################################################# | ||
| 224 | 523 | pure subroutine set_input1d(this, input) | |
| 225 | implicit none | ||
| 226 | class(input1d_layer_type), intent(inout) :: this | ||
| 227 | real(real12), & | ||
| 228 | dimension(..), intent(in) :: input | ||
| 229 | !dimension(this%batch_size * this%num_outputs), intent(in) :: input | ||
| 230 | |||
| 231 | select rank(input) | ||
| 232 | rank(1) | ||
| 233 |
16/24✓ Branch 0 taken 2 times.
✓ Branch 1 taken 1 times.
✓ Branch 2 taken 2 times.
✗ Branch 3 not taken.
✗ Branch 4 not taken.
✓ Branch 5 taken 2 times.
✓ Branch 8 taken 1 times.
✗ Branch 9 not taken.
✓ Branch 10 taken 1 times.
✓ Branch 11 taken 1 times.
✓ Branch 12 taken 2 times.
✓ Branch 13 taken 1 times.
✓ Branch 14 taken 1 times.
✗ Branch 15 not taken.
✓ Branch 16 taken 1 times.
✗ Branch 17 not taken.
✓ Branch 18 taken 1 times.
✗ Branch 19 not taken.
✗ Branch 20 not taken.
✗ Branch 21 not taken.
✓ Branch 22 taken 1 times.
✓ Branch 23 taken 1 times.
✓ Branch 24 taken 2 times.
✓ Branch 25 taken 1 times.
|
9 | this%output = reshape(input, shape=shape(this%output)) |
| 234 | rank(2) | ||
| 235 |
16/24✓ Branch 0 taken 1036 times.
✓ Branch 1 taken 518 times.
✓ Branch 2 taken 1036 times.
✗ Branch 3 not taken.
✗ Branch 4 not taken.
✓ Branch 5 taken 1036 times.
✓ Branch 8 taken 518 times.
✗ Branch 9 not taken.
✓ Branch 10 taken 518 times.
✓ Branch 11 taken 518 times.
✓ Branch 12 taken 1521 times.
✓ Branch 13 taken 518 times.
✓ Branch 14 taken 518 times.
✗ Branch 15 not taken.
✓ Branch 16 taken 518 times.
✗ Branch 17 not taken.
✓ Branch 18 taken 518 times.
✗ Branch 19 not taken.
✗ Branch 20 not taken.
✗ Branch 21 not taken.
✓ Branch 22 taken 518 times.
✓ Branch 23 taken 518 times.
✓ Branch 24 taken 1521 times.
✓ Branch 25 taken 518 times.
|
5632 | this%output = reshape(input, shape=shape(this%output)) |
| 236 | rank(3) | ||
| 237 |
16/24✓ Branch 0 taken 2 times.
✓ Branch 1 taken 1 times.
✓ Branch 2 taken 2 times.
✗ Branch 3 not taken.
✗ Branch 4 not taken.
✓ Branch 5 taken 2 times.
✓ Branch 8 taken 1 times.
✗ Branch 9 not taken.
✓ Branch 10 taken 1 times.
✓ Branch 11 taken 1 times.
✓ Branch 12 taken 2 times.
✓ Branch 13 taken 1 times.
✓ Branch 14 taken 1 times.
✗ Branch 15 not taken.
✓ Branch 16 taken 1 times.
✗ Branch 17 not taken.
✓ Branch 18 taken 1 times.
✗ Branch 19 not taken.
✗ Branch 20 not taken.
✗ Branch 21 not taken.
✓ Branch 22 taken 1 times.
✓ Branch 23 taken 1 times.
✓ Branch 24 taken 2 times.
✓ Branch 25 taken 1 times.
|
9 | this%output = reshape(input, shape=shape(this%output)) |
| 238 | rank(4) | ||
| 239 |
16/24✓ Branch 0 taken 2 times.
✓ Branch 1 taken 1 times.
✓ Branch 2 taken 2 times.
✗ Branch 3 not taken.
✗ Branch 4 not taken.
✓ Branch 5 taken 2 times.
✓ Branch 8 taken 1 times.
✗ Branch 9 not taken.
✓ Branch 10 taken 1 times.
✓ Branch 11 taken 1 times.
✓ Branch 12 taken 2 times.
✓ Branch 13 taken 1 times.
✓ Branch 14 taken 1 times.
✗ Branch 15 not taken.
✓ Branch 16 taken 1 times.
✗ Branch 17 not taken.
✓ Branch 18 taken 1 times.
✗ Branch 19 not taken.
✗ Branch 20 not taken.
✗ Branch 21 not taken.
✓ Branch 22 taken 1 times.
✓ Branch 23 taken 1 times.
✓ Branch 24 taken 2 times.
✓ Branch 25 taken 1 times.
|
9 | this%output = reshape(input, shape=shape(this%output)) |
| 240 | rank(5) | ||
| 241 |
16/24✓ Branch 0 taken 2 times.
✓ Branch 1 taken 1 times.
✓ Branch 2 taken 2 times.
✗ Branch 3 not taken.
✗ Branch 4 not taken.
✓ Branch 5 taken 2 times.
✓ Branch 8 taken 1 times.
✗ Branch 9 not taken.
✓ Branch 10 taken 1 times.
✓ Branch 11 taken 1 times.
✓ Branch 12 taken 2 times.
✓ Branch 13 taken 1 times.
✓ Branch 14 taken 1 times.
✗ Branch 15 not taken.
✓ Branch 16 taken 1 times.
✗ Branch 17 not taken.
✓ Branch 18 taken 1 times.
✗ Branch 19 not taken.
✗ Branch 20 not taken.
✗ Branch 21 not taken.
✓ Branch 22 taken 1 times.
✓ Branch 23 taken 1 times.
✓ Branch 24 taken 2 times.
✓ Branch 25 taken 1 times.
|
9 | this%output = reshape(input, shape=shape(this%output)) |
| 242 | rank(6) | ||
| 243 |
16/24✓ Branch 0 taken 2 times.
✓ Branch 1 taken 1 times.
✓ Branch 2 taken 2 times.
✗ Branch 3 not taken.
✗ Branch 4 not taken.
✓ Branch 5 taken 2 times.
✓ Branch 8 taken 1 times.
✗ Branch 9 not taken.
✓ Branch 10 taken 1 times.
✓ Branch 11 taken 1 times.
✓ Branch 12 taken 2 times.
✓ Branch 13 taken 1 times.
✓ Branch 14 taken 1 times.
✗ Branch 15 not taken.
✓ Branch 16 taken 1 times.
✗ Branch 17 not taken.
✓ Branch 18 taken 1 times.
✗ Branch 19 not taken.
✗ Branch 20 not taken.
✗ Branch 21 not taken.
✓ Branch 22 taken 1 times.
✓ Branch 23 taken 1 times.
✓ Branch 24 taken 2 times.
✓ Branch 25 taken 1 times.
|
9 | this%output = reshape(input, shape=shape(this%output)) |
| 244 | end select | ||
| 245 | |||
| 246 | 523 | end subroutine set_input1d | |
| 247 | !!!############################################################################# | ||
| 248 | |||
| 249 | |||
| 250 |
43/74✓ Branch 0 taken 14 times.
✓ Branch 1 taken 9 times.
✓ Branch 2 taken 14 times.
✗ Branch 3 not taken.
✓ Branch 4 taken 25 times.
✗ Branch 5 not taken.
✓ Branch 6 taken 18 times.
✗ Branch 7 not taken.
✓ Branch 8 taken 7 times.
✓ Branch 9 taken 11 times.
✓ Branch 10 taken 1 times.
✓ Branch 11 taken 4 times.
✓ Branch 12 taken 1 times.
✓ Branch 13 taken 3 times.
✓ Branch 14 taken 1 times.
✓ Branch 15 taken 2 times.
✓ Branch 16 taken 1 times.
✓ Branch 17 taken 1 times.
✓ Branch 18 taken 1 times.
✗ Branch 19 not taken.
✓ Branch 20 taken 523 times.
✗ Branch 21 not taken.
✓ Branch 22 taken 523 times.
✗ Branch 23 not taken.
✓ Branch 24 taken 1 times.
✓ Branch 25 taken 522 times.
✓ Branch 26 taken 518 times.
✓ Branch 27 taken 4 times.
✓ Branch 28 taken 1 times.
✓ Branch 29 taken 3 times.
✓ Branch 30 taken 1 times.
✓ Branch 31 taken 2 times.
✓ Branch 32 taken 1 times.
✓ Branch 33 taken 1 times.
✓ Branch 34 taken 1 times.
✗ Branch 35 not taken.
✗ Branch 37 not taken.
✗ Branch 38 not taken.
✗ Branch 39 not taken.
✓ Branch 40 taken 7 times.
✗ Branch 42 not taken.
✓ Branch 43 taken 7 times.
✓ Branch 45 taken 7 times.
✓ Branch 46 taken 7 times.
✗ Branch 47 not taken.
✓ Branch 48 taken 7 times.
✗ Branch 49 not taken.
✗ Branch 50 not taken.
✗ Branch 52 not taken.
✗ Branch 53 not taken.
✗ Branch 55 not taken.
✗ Branch 56 not taken.
✗ Branch 58 not taken.
✗ Branch 59 not taken.
✗ Branch 61 not taken.
✗ Branch 62 not taken.
✗ Branch 64 not taken.
✗ Branch 65 not taken.
✓ Branch 67 taken 7 times.
✗ Branch 68 not taken.
✗ Branch 69 not taken.
✓ Branch 70 taken 7 times.
✓ Branch 71 taken 7 times.
✗ Branch 72 not taken.
✗ Branch 73 not taken.
✓ Branch 74 taken 7 times.
✓ Branch 75 taken 7 times.
✗ Branch 76 not taken.
✗ Branch 77 not taken.
✓ Branch 78 taken 7 times.
✓ Branch 79 taken 7 times.
✗ Branch 80 not taken.
✓ Branch 81 taken 3 times.
✓ Branch 82 taken 4 times.
|
585 | end module input1d_layer |
| 251 | !!!############################################################################# | ||
| 252 |