uninitialized variable

This commit is contained in:
edoapra 2022-01-31 18:53:29 -08:00
parent f8814b699b
commit 8a95f11bf9
No known key found for this signature in database
GPG key ID: 472C4EBB4F3AEDFA

View file

@ -982,6 +982,7 @@ c
stpang = mepgs_cosang(abvec, bcvec, .true.)
c
grms = 0d0
c ogrms = 0d0
srms = 0d0
gmax = 0d0
smax = 0d0