iskm/learnxinyminutes-docs
1
0
Fork 0
mirror of https://github.com/adambard/learnxinyminutes-docs.git synced 2024-12-23 09:41:36 +00:00
Code Issues Actions Packages Projects Releases Wiki Activity

[fortran/en] correct sqrt (#5169)

Browse Source 
the integer inside the sqrt function need to be converted to real.
This commit is contained in:
Ily83 2024-11-08 23:31:48 +01:00 committed by GitHub
parent a7068ea636
commit ccdb3504c9
No known key found for this signature in database
GPG Key ID: B5690EEEBB952194
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
fortran.html.markdown
View File

@ -461,10 +461,10 @@ end module fruity
! to express loop-level parallelism
integer :: i
real :: array(100)
real :: array(10)
DO CONCURRENT (i = 1:size(array))
array(i) = sqrt(i**i)
array(i) = sqrt(real(i)**i)
END DO