| 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 the Glorot initialiser | ||
| 6 | !!!############################################################################# | ||
| 7 | !!! Glorot initialiser reference: ... | ||
| 8 | !!! ... https://proceedings.mlr.press/v9/glorot10a.html | ||
| 9 | !!!############################################################################# | ||
| 10 | module initialiser_glorot | ||
| 11 | use constants, only: real12, pi | ||
| 12 | use custom_types, only: initialiser_type | ||
| 13 | implicit none | ||
| 14 | |||
| 15 | |||
| 16 | type, extends(initialiser_type) :: glorot_uniform_type | ||
| 17 | contains | ||
| 18 | procedure, pass(this) :: initialise => glorot_uniform_initialise | ||
| 19 | end type glorot_uniform_type | ||
| 20 | type(glorot_uniform_type) :: glorot_uniform | ||
| 21 | type, extends(initialiser_type) :: glorot_normal_type | ||
| 22 | contains | ||
| 23 | procedure, pass(this) :: initialise => glorot_normal_initialise | ||
| 24 | end type glorot_normal_type | ||
| 25 | type(glorot_normal_type) :: glorot_normal | ||
| 26 | |||
| 27 | |||
| 28 | private | ||
| 29 | |||
| 30 | public :: glorot_uniform | ||
| 31 | public :: glorot_normal | ||
| 32 | |||
| 33 | |||
| 34 | contains | ||
| 35 | |||
| 36 | !!!############################################################################# | ||
| 37 | !!! Xavier Glorot initialisation (uniform) | ||
| 38 | !!!############################################################################# | ||
| 39 | 32 | subroutine glorot_uniform_initialise(this, input, fan_in, fan_out) | |
| 40 | implicit none | ||
| 41 | class(glorot_uniform_type), intent(inout) :: this | ||
| 42 | real(real12), dimension(..), intent(out) :: input | ||
| 43 | integer, optional, intent(in) :: fan_in, fan_out !no. in and out params | ||
| 44 | |||
| 45 | real(real12) :: scale | ||
| 46 | |||
| 47 | 32 | scale = sqrt(6._real12/real(fan_in+fan_out,real12)) | |
| 48 | select rank(input) | ||
| 49 | rank(0) | ||
| 50 | 1 | call random_number(input) | |
| 51 | 1 | input = (input * 2._real12 - 1._real12) * scale | |
| 52 | rank(1) | ||
| 53 | 1 | call random_number(input) | |
| 54 |
11/20✗ Branch 1 not taken.
✓ Branch 2 taken 1 times.
✗ Branch 4 not taken.
✓ Branch 5 taken 1 times.
✗ Branch 7 not taken.
✓ Branch 8 taken 1 times.
✗ Branch 10 not taken.
✓ Branch 11 taken 1 times.
✗ Branch 13 not taken.
✓ Branch 14 taken 1 times.
✗ Branch 16 not taken.
✓ Branch 17 taken 1 times.
✗ Branch 19 not taken.
✓ Branch 20 taken 1 times.
✗ Branch 22 not taken.
✓ Branch 23 taken 1 times.
✗ Branch 25 not taken.
✓ Branch 26 taken 1 times.
✓ Branch 28 taken 1 times.
✓ Branch 29 taken 1 times.
|
2 | input = (input * 2._real12 - 1._real12) * scale |
| 55 | rank(2) | ||
| 56 | 12 | call random_number(input) | |
| 57 |
22/40✗ Branch 1 not taken.
✓ Branch 2 taken 12 times.
✗ Branch 4 not taken.
✓ Branch 5 taken 12 times.
✗ Branch 7 not taken.
✓ Branch 8 taken 12 times.
✗ Branch 10 not taken.
✓ Branch 11 taken 12 times.
✗ Branch 13 not taken.
✓ Branch 14 taken 12 times.
✗ Branch 16 not taken.
✓ Branch 17 taken 12 times.
✗ Branch 19 not taken.
✓ Branch 20 taken 12 times.
✗ Branch 22 not taken.
✓ Branch 23 taken 12 times.
✗ Branch 25 not taken.
✓ Branch 26 taken 12 times.
✗ Branch 28 not taken.
✓ Branch 29 taken 12 times.
✗ Branch 31 not taken.
✓ Branch 32 taken 12 times.
✗ Branch 34 not taken.
✓ Branch 35 taken 12 times.
✗ Branch 37 not taken.
✓ Branch 38 taken 12 times.
✗ Branch 40 not taken.
✓ Branch 41 taken 12 times.
✗ Branch 43 not taken.
✓ Branch 44 taken 12 times.
✗ Branch 46 not taken.
✓ Branch 47 taken 12 times.
✗ Branch 49 not taken.
✓ Branch 50 taken 12 times.
✗ Branch 52 not taken.
✓ Branch 53 taken 12 times.
✓ Branch 55 taken 137 times.
✓ Branch 56 taken 12 times.
✓ Branch 57 taken 24185 times.
✓ Branch 58 taken 137 times.
|
24334 | input = (input * 2._real12 - 1._real12) * scale |
| 58 | rank(3) | ||
| 59 | 5 | call random_number(input) | |
| 60 |
33/60✗ Branch 1 not taken.
✓ Branch 2 taken 5 times.
✗ Branch 4 not taken.
✓ Branch 5 taken 5 times.
✗ Branch 7 not taken.
✓ Branch 8 taken 5 times.
✗ Branch 10 not taken.
✓ Branch 11 taken 5 times.
✗ Branch 13 not taken.
✓ Branch 14 taken 5 times.
✗ Branch 16 not taken.
✓ Branch 17 taken 5 times.
✗ Branch 19 not taken.
✓ Branch 20 taken 5 times.
✗ Branch 22 not taken.
✓ Branch 23 taken 5 times.
✗ Branch 25 not taken.
✓ Branch 26 taken 5 times.
✗ Branch 28 not taken.
✓ Branch 29 taken 5 times.
✗ Branch 31 not taken.
✓ Branch 32 taken 5 times.
✗ Branch 34 not taken.
✓ Branch 35 taken 5 times.
✗ Branch 37 not taken.
✓ Branch 38 taken 5 times.
✗ Branch 40 not taken.
✓ Branch 41 taken 5 times.
✗ Branch 43 not taken.
✓ Branch 44 taken 5 times.
✗ Branch 46 not taken.
✓ Branch 47 taken 5 times.
✗ Branch 49 not taken.
✓ Branch 50 taken 5 times.
✗ Branch 52 not taken.
✓ Branch 53 taken 5 times.
✗ Branch 55 not taken.
✓ Branch 56 taken 5 times.
✗ Branch 58 not taken.
✓ Branch 59 taken 5 times.
✗ Branch 61 not taken.
✓ Branch 62 taken 5 times.
✗ Branch 64 not taken.
✓ Branch 65 taken 5 times.
✗ Branch 67 not taken.
✓ Branch 68 taken 5 times.
✗ Branch 70 not taken.
✓ Branch 71 taken 5 times.
✗ Branch 73 not taken.
✓ Branch 74 taken 5 times.
✗ Branch 76 not taken.
✓ Branch 77 taken 5 times.
✗ Branch 79 not taken.
✓ Branch 80 taken 5 times.
✓ Branch 82 taken 36 times.
✓ Branch 83 taken 5 times.
✓ Branch 84 taken 100 times.
✓ Branch 85 taken 36 times.
✓ Branch 86 taken 298 times.
✓ Branch 87 taken 100 times.
|
439 | input = (input * 2._real12 - 1._real12) * scale |
| 61 | rank(4) | ||
| 62 | 6 | call random_number(input) | |
| 63 |
44/80✗ Branch 1 not taken.
✓ Branch 2 taken 6 times.
✗ Branch 4 not taken.
✓ Branch 5 taken 6 times.
✗ Branch 7 not taken.
✓ Branch 8 taken 6 times.
✗ Branch 10 not taken.
✓ Branch 11 taken 6 times.
✗ Branch 13 not taken.
✓ Branch 14 taken 6 times.
✗ Branch 16 not taken.
✓ Branch 17 taken 6 times.
✗ Branch 19 not taken.
✓ Branch 20 taken 6 times.
✗ Branch 22 not taken.
✓ Branch 23 taken 6 times.
✗ Branch 25 not taken.
✓ Branch 26 taken 6 times.
✗ Branch 28 not taken.
✓ Branch 29 taken 6 times.
✗ Branch 31 not taken.
✓ Branch 32 taken 6 times.
✗ Branch 34 not taken.
✓ Branch 35 taken 6 times.
✗ Branch 37 not taken.
✓ Branch 38 taken 6 times.
✗ Branch 40 not taken.
✓ Branch 41 taken 6 times.
✗ Branch 43 not taken.
✓ Branch 44 taken 6 times.
✗ Branch 46 not taken.
✓ Branch 47 taken 6 times.
✗ Branch 49 not taken.
✓ Branch 50 taken 6 times.
✗ Branch 52 not taken.
✓ Branch 53 taken 6 times.
✗ Branch 55 not taken.
✓ Branch 56 taken 6 times.
✗ Branch 58 not taken.
✓ Branch 59 taken 6 times.
✗ Branch 61 not taken.
✓ Branch 62 taken 6 times.
✗ Branch 64 not taken.
✓ Branch 65 taken 6 times.
✗ Branch 67 not taken.
✓ Branch 68 taken 6 times.
✗ Branch 70 not taken.
✓ Branch 71 taken 6 times.
✗ Branch 73 not taken.
✓ Branch 74 taken 6 times.
✗ Branch 76 not taken.
✓ Branch 77 taken 6 times.
✗ Branch 79 not taken.
✓ Branch 80 taken 6 times.
✗ Branch 82 not taken.
✓ Branch 83 taken 6 times.
✗ Branch 85 not taken.
✓ Branch 86 taken 6 times.
✗ Branch 88 not taken.
✓ Branch 89 taken 6 times.
✗ Branch 91 not taken.
✓ Branch 92 taken 6 times.
✗ Branch 94 not taken.
✓ Branch 95 taken 6 times.
✗ Branch 97 not taken.
✓ Branch 98 taken 6 times.
✗ Branch 100 not taken.
✓ Branch 101 taken 6 times.
✗ Branch 103 not taken.
✓ Branch 104 taken 6 times.
✗ Branch 106 not taken.
✓ Branch 107 taken 6 times.
✓ Branch 109 taken 99 times.
✓ Branch 110 taken 6 times.
✓ Branch 111 taken 291 times.
✓ Branch 112 taken 99 times.
✓ Branch 113 taken 873 times.
✓ Branch 114 taken 291 times.
✓ Branch 115 taken 2619 times.
✓ Branch 116 taken 873 times.
|
3888 | input = (input * 2._real12 - 1._real12) * scale |
| 64 | rank(5) | ||
| 65 | 6 | call random_number(input) | |
| 66 |
55/100✗ Branch 1 not taken.
✓ Branch 2 taken 6 times.
✗ Branch 4 not taken.
✓ Branch 5 taken 6 times.
✗ Branch 7 not taken.
✓ Branch 8 taken 6 times.
✗ Branch 10 not taken.
✓ Branch 11 taken 6 times.
✗ Branch 13 not taken.
✓ Branch 14 taken 6 times.
✗ Branch 16 not taken.
✓ Branch 17 taken 6 times.
✗ Branch 19 not taken.
✓ Branch 20 taken 6 times.
✗ Branch 22 not taken.
✓ Branch 23 taken 6 times.
✗ Branch 25 not taken.
✓ Branch 26 taken 6 times.
✗ Branch 28 not taken.
✓ Branch 29 taken 6 times.
✗ Branch 31 not taken.
✓ Branch 32 taken 6 times.
✗ Branch 34 not taken.
✓ Branch 35 taken 6 times.
✗ Branch 37 not taken.
✓ Branch 38 taken 6 times.
✗ Branch 40 not taken.
✓ Branch 41 taken 6 times.
✗ Branch 43 not taken.
✓ Branch 44 taken 6 times.
✗ Branch 46 not taken.
✓ Branch 47 taken 6 times.
✗ Branch 49 not taken.
✓ Branch 50 taken 6 times.
✗ Branch 52 not taken.
✓ Branch 53 taken 6 times.
✗ Branch 55 not taken.
✓ Branch 56 taken 6 times.
✗ Branch 58 not taken.
✓ Branch 59 taken 6 times.
✗ Branch 61 not taken.
✓ Branch 62 taken 6 times.
✗ Branch 64 not taken.
✓ Branch 65 taken 6 times.
✗ Branch 67 not taken.
✓ Branch 68 taken 6 times.
✗ Branch 70 not taken.
✓ Branch 71 taken 6 times.
✗ Branch 73 not taken.
✓ Branch 74 taken 6 times.
✗ Branch 76 not taken.
✓ Branch 77 taken 6 times.
✗ Branch 79 not taken.
✓ Branch 80 taken 6 times.
✗ Branch 82 not taken.
✓ Branch 83 taken 6 times.
✗ Branch 85 not taken.
✓ Branch 86 taken 6 times.
✗ Branch 88 not taken.
✓ Branch 89 taken 6 times.
✗ Branch 91 not taken.
✓ Branch 92 taken 6 times.
✗ Branch 94 not taken.
✓ Branch 95 taken 6 times.
✗ Branch 97 not taken.
✓ Branch 98 taken 6 times.
✗ Branch 100 not taken.
✓ Branch 101 taken 6 times.
✗ Branch 103 not taken.
✓ Branch 104 taken 6 times.
✗ Branch 106 not taken.
✓ Branch 107 taken 6 times.
✗ Branch 109 not taken.
✓ Branch 110 taken 6 times.
✗ Branch 112 not taken.
✓ Branch 113 taken 6 times.
✗ Branch 115 not taken.
✓ Branch 116 taken 6 times.
✗ Branch 118 not taken.
✓ Branch 119 taken 6 times.
✗ Branch 121 not taken.
✓ Branch 122 taken 6 times.
✗ Branch 124 not taken.
✓ Branch 125 taken 6 times.
✗ Branch 127 not taken.
✓ Branch 128 taken 6 times.
✗ Branch 130 not taken.
✓ Branch 131 taken 6 times.
✗ Branch 133 not taken.
✓ Branch 134 taken 6 times.
✓ Branch 136 taken 99 times.
✓ Branch 137 taken 6 times.
✓ Branch 138 taken 291 times.
✓ Branch 139 taken 99 times.
✓ Branch 140 taken 873 times.
✓ Branch 141 taken 291 times.
✓ Branch 142 taken 2619 times.
✓ Branch 143 taken 873 times.
✓ Branch 144 taken 7857 times.
✓ Branch 145 taken 2619 times.
|
11745 | input = (input * 2._real12 - 1._real12) * scale |
| 67 | rank(6) | ||
| 68 | 1 | call random_number(input) | |
| 69 |
66/120✗ Branch 1 not taken.
✓ Branch 2 taken 1 times.
✗ Branch 4 not taken.
✓ Branch 5 taken 1 times.
✗ Branch 7 not taken.
✓ Branch 8 taken 1 times.
✗ Branch 10 not taken.
✓ Branch 11 taken 1 times.
✗ Branch 13 not taken.
✓ Branch 14 taken 1 times.
✗ Branch 16 not taken.
✓ Branch 17 taken 1 times.
✗ Branch 19 not taken.
✓ Branch 20 taken 1 times.
✗ Branch 22 not taken.
✓ Branch 23 taken 1 times.
✗ Branch 25 not taken.
✓ Branch 26 taken 1 times.
✗ Branch 28 not taken.
✓ Branch 29 taken 1 times.
✗ Branch 31 not taken.
✓ Branch 32 taken 1 times.
✗ Branch 34 not taken.
✓ Branch 35 taken 1 times.
✗ Branch 37 not taken.
✓ Branch 38 taken 1 times.
✗ Branch 40 not taken.
✓ Branch 41 taken 1 times.
✗ Branch 43 not taken.
✓ Branch 44 taken 1 times.
✗ Branch 46 not taken.
✓ Branch 47 taken 1 times.
✗ Branch 49 not taken.
✓ Branch 50 taken 1 times.
✗ Branch 52 not taken.
✓ Branch 53 taken 1 times.
✗ Branch 55 not taken.
✓ Branch 56 taken 1 times.
✗ Branch 58 not taken.
✓ Branch 59 taken 1 times.
✗ Branch 61 not taken.
✓ Branch 62 taken 1 times.
✗ Branch 64 not taken.
✓ Branch 65 taken 1 times.
✗ Branch 67 not taken.
✓ Branch 68 taken 1 times.
✗ Branch 70 not taken.
✓ Branch 71 taken 1 times.
✗ Branch 73 not taken.
✓ Branch 74 taken 1 times.
✗ Branch 76 not taken.
✓ Branch 77 taken 1 times.
✗ Branch 79 not taken.
✓ Branch 80 taken 1 times.
✗ Branch 82 not taken.
✓ Branch 83 taken 1 times.
✗ Branch 85 not taken.
✓ Branch 86 taken 1 times.
✗ Branch 88 not taken.
✓ Branch 89 taken 1 times.
✗ Branch 91 not taken.
✓ Branch 92 taken 1 times.
✗ Branch 94 not taken.
✓ Branch 95 taken 1 times.
✗ Branch 97 not taken.
✓ Branch 98 taken 1 times.
✗ Branch 100 not taken.
✓ Branch 101 taken 1 times.
✗ Branch 103 not taken.
✓ Branch 104 taken 1 times.
✗ Branch 106 not taken.
✓ Branch 107 taken 1 times.
✗ Branch 109 not taken.
✓ Branch 110 taken 1 times.
✗ Branch 112 not taken.
✓ Branch 113 taken 1 times.
✗ Branch 115 not taken.
✓ Branch 116 taken 1 times.
✗ Branch 118 not taken.
✓ Branch 119 taken 1 times.
✗ Branch 121 not taken.
✓ Branch 122 taken 1 times.
✗ Branch 124 not taken.
✓ Branch 125 taken 1 times.
✗ Branch 127 not taken.
✓ Branch 128 taken 1 times.
✗ Branch 130 not taken.
✓ Branch 131 taken 1 times.
✗ Branch 133 not taken.
✓ Branch 134 taken 1 times.
✗ Branch 136 not taken.
✓ Branch 137 taken 1 times.
✗ Branch 139 not taken.
✓ Branch 140 taken 1 times.
✗ Branch 142 not taken.
✓ Branch 143 taken 1 times.
✗ Branch 145 not taken.
✓ Branch 146 taken 1 times.
✗ Branch 148 not taken.
✓ Branch 149 taken 1 times.
✗ Branch 151 not taken.
✓ Branch 152 taken 1 times.
✗ Branch 154 not taken.
✓ Branch 155 taken 1 times.
✗ Branch 157 not taken.
✓ Branch 158 taken 1 times.
✗ Branch 160 not taken.
✓ Branch 161 taken 1 times.
✓ Branch 163 taken 1 times.
✓ Branch 164 taken 1 times.
✓ Branch 165 taken 1 times.
✓ Branch 166 taken 1 times.
✓ Branch 167 taken 1 times.
✓ Branch 168 taken 1 times.
✓ Branch 169 taken 1 times.
✓ Branch 170 taken 1 times.
✓ Branch 171 taken 1 times.
✓ Branch 172 taken 1 times.
✓ Branch 173 taken 1 times.
✓ Branch 174 taken 1 times.
|
7 | input = (input * 2._real12 - 1._real12) * scale |
| 70 | end select | ||
| 71 | |||
| 72 | 32 | end subroutine glorot_uniform_initialise | |
| 73 | !!!############################################################################# | ||
| 74 | |||
| 75 | |||
| 76 | !!!############################################################################# | ||
| 77 | !!! Xavier Glorot initialisation (normal) | ||
| 78 | !!!############################################################################# | ||
| 79 | 7 | subroutine glorot_normal_initialise(this, input, fan_in, fan_out) | |
| 80 | implicit none | ||
| 81 | class(glorot_normal_type), intent(inout) :: this | ||
| 82 | real(real12), dimension(..), intent(out) :: input | ||
| 83 | integer, optional, intent(in) :: fan_in, fan_out !no. in and out params | ||
| 84 | |||
| 85 | real(real12) :: scale, norm | ||
| 86 | |||
| 87 | 7 | scale = sqrt(2._real12/real(fan_in+fan_out,real12)) ! standard deviation | |
| 88 | 7 | scale = 2._real12 * scale**2._real12 ! 2*variance | |
| 89 | 7 | norm = 1._real12 / (sqrt(pi*scale)) ! normalisation | |
| 90 | select rank(input) | ||
| 91 | rank(0) | ||
| 92 | 1 | call random_number(input) | |
| 93 | input = norm * & | ||
| 94 | 1 | exp( (-(input * 2._real12 - 1._real12)**2._real12) / scale ) | |
| 95 | rank(1) | ||
| 96 | 1 | call random_number(input) | |
| 97 | ✗ | input = norm * & | |
| 98 |
11/20✗ Branch 1 not taken.
✓ Branch 2 taken 1 times.
✗ Branch 4 not taken.
✓ Branch 5 taken 1 times.
✗ Branch 7 not taken.
✓ Branch 8 taken 1 times.
✗ Branch 10 not taken.
✓ Branch 11 taken 1 times.
✗ Branch 13 not taken.
✓ 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 taken 1 times.
✗ Branch 21 not taken.
✓ Branch 22 taken 1 times.
✓ Branch 24 taken 1 times.
✓ Branch 25 taken 1 times.
|
2 | exp( (-(input * 2._real12 - 1._real12)**2._real12) / scale ) |
| 99 | rank(2) | ||
| 100 | 1 | call random_number(input) | |
| 101 | ✗ | input = norm * & | |
| 102 |
22/40✗ Branch 1 not taken.
✓ Branch 2 taken 1 times.
✗ Branch 4 not taken.
✓ Branch 5 taken 1 times.
✗ Branch 7 not taken.
✓ Branch 8 taken 1 times.
✗ Branch 10 not taken.
✓ Branch 11 taken 1 times.
✗ Branch 13 not taken.
✓ Branch 14 taken 1 times.
✗ Branch 16 not taken.
✓ Branch 17 taken 1 times.
✗ Branch 19 not taken.
✓ Branch 20 taken 1 times.
✗ Branch 22 not taken.
✓ Branch 23 taken 1 times.
✗ Branch 25 not taken.
✓ Branch 26 taken 1 times.
✗ Branch 27 not taken.
✓ Branch 28 taken 1 times.
✗ Branch 29 not taken.
✓ Branch 30 taken 1 times.
✗ Branch 31 not taken.
✓ Branch 32 taken 1 times.
✗ Branch 33 not taken.
✓ Branch 34 taken 1 times.
✗ Branch 36 not taken.
✓ Branch 37 taken 1 times.
✗ Branch 38 not taken.
✓ Branch 39 taken 1 times.
✗ Branch 40 not taken.
✓ Branch 41 taken 1 times.
✗ Branch 42 not taken.
✓ Branch 43 taken 1 times.
✗ Branch 44 not taken.
✓ Branch 45 taken 1 times.
✓ Branch 47 taken 10 times.
✓ Branch 48 taken 1 times.
✓ Branch 49 taken 10 times.
✓ Branch 50 taken 10 times.
|
21 | exp( (-(input * 2._real12 - 1._real12)**2._real12) / scale ) |
| 103 | rank(3) | ||
| 104 | 1 | call random_number(input) | |
| 105 | ✗ | input = norm * & | |
| 106 |
33/60✗ Branch 1 not taken.
✓ Branch 2 taken 1 times.
✗ Branch 4 not taken.
✓ Branch 5 taken 1 times.
✗ Branch 7 not taken.
✓ Branch 8 taken 1 times.
✗ Branch 10 not taken.
✓ Branch 11 taken 1 times.
✗ Branch 13 not taken.
✓ Branch 14 taken 1 times.
✗ Branch 16 not taken.
✓ Branch 17 taken 1 times.
✗ Branch 19 not taken.
✓ Branch 20 taken 1 times.
✗ Branch 22 not taken.
✓ Branch 23 taken 1 times.
✗ Branch 25 not taken.
✓ Branch 26 taken 1 times.
✗ Branch 28 not taken.
✓ Branch 29 taken 1 times.
✗ Branch 31 not taken.
✓ Branch 32 taken 1 times.
✗ Branch 34 not taken.
✓ Branch 35 taken 1 times.
✗ Branch 37 not taken.
✓ Branch 38 taken 1 times.
✗ Branch 39 not taken.
✓ Branch 40 taken 1 times.
✗ Branch 41 not taken.
✓ Branch 42 taken 1 times.
✗ Branch 43 not taken.
✓ Branch 44 taken 1 times.
✗ Branch 45 not taken.
✓ Branch 46 taken 1 times.
✗ Branch 48 not taken.
✓ Branch 49 taken 1 times.
✗ Branch 50 not taken.
✓ Branch 51 taken 1 times.
✗ Branch 52 not taken.
✓ Branch 53 taken 1 times.
✗ Branch 54 not taken.
✓ Branch 55 taken 1 times.
✗ Branch 56 not taken.
✓ Branch 57 taken 1 times.
✗ Branch 59 not taken.
✓ Branch 60 taken 1 times.
✗ Branch 61 not taken.
✓ Branch 62 taken 1 times.
✗ Branch 63 not taken.
✓ Branch 64 taken 1 times.
✗ Branch 65 not taken.
✓ Branch 66 taken 1 times.
✗ Branch 67 not taken.
✓ Branch 68 taken 1 times.
✓ Branch 70 taken 1 times.
✓ Branch 71 taken 1 times.
✓ Branch 72 taken 1 times.
✓ Branch 73 taken 1 times.
✓ Branch 74 taken 1 times.
✓ Branch 75 taken 1 times.
|
4 | exp( (-(input * 2._real12 - 1._real12)**2._real12) / scale ) |
| 107 | rank(4) | ||
| 108 | 1 | call random_number(input) | |
| 109 | ✗ | input = norm * & | |
| 110 |
44/80✗ Branch 1 not taken.
✓ Branch 2 taken 1 times.
✗ Branch 4 not taken.
✓ Branch 5 taken 1 times.
✗ Branch 7 not taken.
✓ Branch 8 taken 1 times.
✗ Branch 10 not taken.
✓ Branch 11 taken 1 times.
✗ Branch 13 not taken.
✓ Branch 14 taken 1 times.
✗ Branch 16 not taken.
✓ Branch 17 taken 1 times.
✗ Branch 19 not taken.
✓ Branch 20 taken 1 times.
✗ Branch 22 not taken.
✓ Branch 23 taken 1 times.
✗ Branch 25 not taken.
✓ Branch 26 taken 1 times.
✗ Branch 28 not taken.
✓ Branch 29 taken 1 times.
✗ Branch 31 not taken.
✓ Branch 32 taken 1 times.
✗ Branch 34 not taken.
✓ Branch 35 taken 1 times.
✗ Branch 37 not taken.
✓ Branch 38 taken 1 times.
✗ Branch 40 not taken.
✓ Branch 41 taken 1 times.
✗ Branch 43 not taken.
✓ Branch 44 taken 1 times.
✗ Branch 46 not taken.
✓ Branch 47 taken 1 times.
✗ Branch 49 not taken.
✓ Branch 50 taken 1 times.
✗ Branch 51 not taken.
✓ Branch 52 taken 1 times.
✗ Branch 53 not taken.
✓ Branch 54 taken 1 times.
✗ Branch 55 not taken.
✓ Branch 56 taken 1 times.
✗ Branch 57 not taken.
✓ Branch 58 taken 1 times.
✗ Branch 60 not taken.
✓ Branch 61 taken 1 times.
✗ Branch 62 not taken.
✓ Branch 63 taken 1 times.
✗ Branch 64 not taken.
✓ Branch 65 taken 1 times.
✗ Branch 66 not taken.
✓ Branch 67 taken 1 times.
✗ Branch 68 not taken.
✓ Branch 69 taken 1 times.
✗ Branch 71 not taken.
✓ Branch 72 taken 1 times.
✗ Branch 73 not taken.
✓ Branch 74 taken 1 times.
✗ Branch 75 not taken.
✓ Branch 76 taken 1 times.
✗ Branch 77 not taken.
✓ Branch 78 taken 1 times.
✗ Branch 79 not taken.
✓ Branch 80 taken 1 times.
✗ Branch 82 not taken.
✓ Branch 83 taken 1 times.
✗ Branch 84 not taken.
✓ Branch 85 taken 1 times.
✗ Branch 86 not taken.
✓ Branch 87 taken 1 times.
✗ Branch 88 not taken.
✓ Branch 89 taken 1 times.
✗ Branch 90 not taken.
✓ Branch 91 taken 1 times.
✓ Branch 93 taken 32 times.
✓ Branch 94 taken 1 times.
✓ Branch 95 taken 96 times.
✓ Branch 96 taken 32 times.
✓ Branch 97 taken 288 times.
✓ Branch 98 taken 96 times.
✓ Branch 99 taken 864 times.
✓ Branch 100 taken 288 times.
|
1281 | exp( (-(input * 2._real12 - 1._real12)**2._real12) / scale ) |
| 111 | rank(5) | ||
| 112 | 1 | call random_number(input) | |
| 113 | ✗ | input = norm * & | |
| 114 |
55/100✗ Branch 1 not taken.
✓ Branch 2 taken 1 times.
✗ Branch 4 not taken.
✓ Branch 5 taken 1 times.
✗ Branch 7 not taken.
✓ Branch 8 taken 1 times.
✗ Branch 10 not taken.
✓ Branch 11 taken 1 times.
✗ Branch 13 not taken.
✓ Branch 14 taken 1 times.
✗ Branch 16 not taken.
✓ Branch 17 taken 1 times.
✗ Branch 19 not taken.
✓ Branch 20 taken 1 times.
✗ Branch 22 not taken.
✓ Branch 23 taken 1 times.
✗ Branch 25 not taken.
✓ Branch 26 taken 1 times.
✗ Branch 28 not taken.
✓ Branch 29 taken 1 times.
✗ Branch 31 not taken.
✓ Branch 32 taken 1 times.
✗ Branch 34 not taken.
✓ Branch 35 taken 1 times.
✗ Branch 37 not taken.
✓ Branch 38 taken 1 times.
✗ Branch 40 not taken.
✓ Branch 41 taken 1 times.
✗ Branch 43 not taken.
✓ Branch 44 taken 1 times.
✗ Branch 46 not taken.
✓ Branch 47 taken 1 times.
✗ Branch 49 not taken.
✓ Branch 50 taken 1 times.
✗ Branch 52 not taken.
✓ Branch 53 taken 1 times.
✗ Branch 55 not taken.
✓ Branch 56 taken 1 times.
✗ Branch 58 not taken.
✓ Branch 59 taken 1 times.
✗ Branch 61 not taken.
✓ Branch 62 taken 1 times.
✗ Branch 63 not taken.
✓ Branch 64 taken 1 times.
✗ Branch 65 not taken.
✓ Branch 66 taken 1 times.
✗ Branch 67 not taken.
✓ Branch 68 taken 1 times.
✗ Branch 69 not taken.
✓ Branch 70 taken 1 times.
✗ Branch 72 not taken.
✓ Branch 73 taken 1 times.
✗ Branch 74 not taken.
✓ Branch 75 taken 1 times.
✗ Branch 76 not taken.
✓ Branch 77 taken 1 times.
✗ Branch 78 not taken.
✓ Branch 79 taken 1 times.
✗ Branch 80 not taken.
✓ Branch 81 taken 1 times.
✗ Branch 83 not taken.
✓ Branch 84 taken 1 times.
✗ Branch 85 not taken.
✓ Branch 86 taken 1 times.
✗ Branch 87 not taken.
✓ Branch 88 taken 1 times.
✗ Branch 89 not taken.
✓ Branch 90 taken 1 times.
✗ Branch 91 not taken.
✓ Branch 92 taken 1 times.
✗ Branch 94 not taken.
✓ Branch 95 taken 1 times.
✗ Branch 96 not taken.
✓ Branch 97 taken 1 times.
✗ Branch 98 not taken.
✓ Branch 99 taken 1 times.
✗ Branch 100 not taken.
✓ Branch 101 taken 1 times.
✗ Branch 102 not taken.
✓ Branch 103 taken 1 times.
✗ Branch 105 not taken.
✓ Branch 106 taken 1 times.
✗ Branch 107 not taken.
✓ Branch 108 taken 1 times.
✗ Branch 109 not taken.
✓ Branch 110 taken 1 times.
✗ Branch 111 not taken.
✓ Branch 112 taken 1 times.
✗ Branch 113 not taken.
✓ Branch 114 taken 1 times.
✓ Branch 116 taken 32 times.
✓ Branch 117 taken 1 times.
✓ Branch 118 taken 96 times.
✓ Branch 119 taken 32 times.
✓ Branch 120 taken 288 times.
✓ Branch 121 taken 96 times.
✓ Branch 122 taken 864 times.
✓ Branch 123 taken 288 times.
✓ Branch 124 taken 2592 times.
✓ Branch 125 taken 864 times.
|
3873 | exp( (-(input * 2._real12 - 1._real12)**2._real12) / scale ) |
| 115 | rank(6) | ||
| 116 | 1 | call random_number(input) | |
| 117 | ✗ | input = norm * & | |
| 118 |
66/120✗ Branch 1 not taken.
✓ Branch 2 taken 1 times.
✗ Branch 4 not taken.
✓ Branch 5 taken 1 times.
✗ Branch 7 not taken.
✓ Branch 8 taken 1 times.
✗ Branch 10 not taken.
✓ Branch 11 taken 1 times.
✗ Branch 13 not taken.
✓ Branch 14 taken 1 times.
✗ Branch 16 not taken.
✓ Branch 17 taken 1 times.
✗ Branch 19 not taken.
✓ Branch 20 taken 1 times.
✗ Branch 22 not taken.
✓ Branch 23 taken 1 times.
✗ Branch 25 not taken.
✓ Branch 26 taken 1 times.
✗ Branch 28 not taken.
✓ Branch 29 taken 1 times.
✗ Branch 31 not taken.
✓ Branch 32 taken 1 times.
✗ Branch 34 not taken.
✓ Branch 35 taken 1 times.
✗ Branch 37 not taken.
✓ Branch 38 taken 1 times.
✗ Branch 40 not taken.
✓ Branch 41 taken 1 times.
✗ Branch 43 not taken.
✓ Branch 44 taken 1 times.
✗ Branch 46 not taken.
✓ Branch 47 taken 1 times.
✗ Branch 49 not taken.
✓ Branch 50 taken 1 times.
✗ Branch 52 not taken.
✓ Branch 53 taken 1 times.
✗ Branch 55 not taken.
✓ Branch 56 taken 1 times.
✗ Branch 58 not taken.
✓ Branch 59 taken 1 times.
✗ Branch 61 not taken.
✓ Branch 62 taken 1 times.
✗ Branch 64 not taken.
✓ Branch 65 taken 1 times.
✗ Branch 67 not taken.
✓ Branch 68 taken 1 times.
✗ Branch 70 not taken.
✓ Branch 71 taken 1 times.
✗ Branch 73 not taken.
✓ Branch 74 taken 1 times.
✗ Branch 75 not taken.
✓ Branch 76 taken 1 times.
✗ Branch 77 not taken.
✓ Branch 78 taken 1 times.
✗ Branch 79 not taken.
✓ Branch 80 taken 1 times.
✗ Branch 81 not taken.
✓ Branch 82 taken 1 times.
✗ Branch 84 not taken.
✓ Branch 85 taken 1 times.
✗ Branch 86 not taken.
✓ Branch 87 taken 1 times.
✗ Branch 88 not taken.
✓ Branch 89 taken 1 times.
✗ Branch 90 not taken.
✓ Branch 91 taken 1 times.
✗ Branch 92 not taken.
✓ Branch 93 taken 1 times.
✗ Branch 95 not taken.
✓ Branch 96 taken 1 times.
✗ Branch 97 not taken.
✓ Branch 98 taken 1 times.
✗ Branch 99 not taken.
✓ Branch 100 taken 1 times.
✗ Branch 101 not taken.
✓ Branch 102 taken 1 times.
✗ Branch 103 not taken.
✓ Branch 104 taken 1 times.
✗ Branch 106 not taken.
✓ Branch 107 taken 1 times.
✗ Branch 108 not taken.
✓ Branch 109 taken 1 times.
✗ Branch 110 not taken.
✓ Branch 111 taken 1 times.
✗ Branch 112 not taken.
✓ Branch 113 taken 1 times.
✗ Branch 114 not taken.
✓ Branch 115 taken 1 times.
✗ Branch 117 not taken.
✓ Branch 118 taken 1 times.
✗ Branch 119 not taken.
✓ Branch 120 taken 1 times.
✗ Branch 121 not taken.
✓ Branch 122 taken 1 times.
✗ Branch 123 not taken.
✓ Branch 124 taken 1 times.
✗ Branch 125 not taken.
✓ Branch 126 taken 1 times.
✗ Branch 128 not taken.
✓ Branch 129 taken 1 times.
✗ Branch 130 not taken.
✓ Branch 131 taken 1 times.
✗ Branch 132 not taken.
✓ Branch 133 taken 1 times.
✗ Branch 134 not taken.
✓ Branch 135 taken 1 times.
✗ Branch 136 not taken.
✓ Branch 137 taken 1 times.
✓ Branch 139 taken 1 times.
✓ Branch 140 taken 1 times.
✓ Branch 141 taken 1 times.
✓ Branch 142 taken 1 times.
✓ Branch 143 taken 1 times.
✓ Branch 144 taken 1 times.
✓ Branch 145 taken 1 times.
✓ Branch 146 taken 1 times.
✓ Branch 147 taken 1 times.
✓ Branch 148 taken 1 times.
✓ Branch 149 taken 1 times.
✓ Branch 150 taken 1 times.
|
7 | exp( (-(input * 2._real12 - 1._real12)**2._real12) / scale ) |
| 119 | end select | ||
| 120 | |||
| 121 | 7 | end subroutine glorot_normal_initialise | |
| 122 | !!!############################################################################# | ||
| 123 | |||
| 124 |
32/36✓ Branch 0 taken 31 times.
✓ Branch 1 taken 1 times.
✓ Branch 2 taken 31 times.
✗ Branch 3 not taken.
✓ Branch 4 taken 1 times.
✓ Branch 5 taken 31 times.
✓ Branch 6 taken 1 times.
✓ Branch 7 taken 30 times.
✓ Branch 8 taken 12 times.
✓ Branch 9 taken 18 times.
✓ Branch 10 taken 5 times.
✓ Branch 11 taken 13 times.
✓ Branch 12 taken 6 times.
✓ Branch 13 taken 7 times.
✓ Branch 14 taken 6 times.
✓ Branch 15 taken 1 times.
✓ Branch 16 taken 1 times.
✗ Branch 17 not taken.
✓ Branch 18 taken 6 times.
✓ Branch 19 taken 1 times.
✓ Branch 20 taken 6 times.
✗ Branch 21 not taken.
✓ Branch 22 taken 1 times.
✓ Branch 23 taken 6 times.
✓ Branch 24 taken 1 times.
✓ Branch 25 taken 5 times.
✓ Branch 26 taken 1 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.
|
171 | end module initialiser_glorot |
| 125 | !!!############################################################################# | ||
| 126 |