projects
/
unres.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
dfa IDFAMAX=25000
[unres.git]
/
source
/
unres
/
src-HCD-5D
/
COMMON.VAR
diff --git
a/source/unres/src-HCD-5D/COMMON.VAR
b/source/unres/src-HCD-5D/COMMON.VAR
index
1ab0a16
..
d061411
100644
(file)
--- a/
source/unres/src-HCD-5D/COMMON.VAR
+++ b/
source/unres/src-HCD-5D/COMMON.VAR
@@
-17,6
+17,6
@@
C in MCM).
common /oldgeo/ varsave(maxvar,maxsave),esave(maxsave),
& Origin(maxsave),nstore
C freeze some variables
common /oldgeo/ varsave(maxvar,maxsave),esave(maxsave),
& Origin(maxsave),nstore
C freeze some variables
- logical mask_r
- common /restr/ varall(maxvar),mask_r,mask_theta(maxres),
+ logical mask_r,sideonly
+ common /restr/ varall(maxvar),mask_r,sideonly,mask_theta(maxres),
& mask_phi(maxres),mask_side(maxres)
& mask_phi(maxres),mask_side(maxres)