It may be faster here to define a new variable lscale and do
Open
- Dominant language
- Fortran
- Stars
- 35
- Forks
- 106
- Avg merge
- 6d 5h
- Merged PRs (30d)
- 4
Description
It may be faster here to define a new variable lscale and do
```
if(present(scale)) then
lscale = scale
else
lscale = 1.0R8
endif
```
in this way you avoid the if inside the loop which prevents vectorization.
_Originally posted by @jedwards4b in https://github.com/ESCOMP/CMEPS/pull/129#discussion_r520611039_
Contributor guide
No contributing guide indexed for this repository
Assessment
This issue has not been assessed yet.