94 |
& addiffKr |
& addiffKr |
95 |
_RL addiffKr (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
_RL addiffKr (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
96 |
#endif |
#endif |
97 |
|
#ifdef ALLOW_KAPGM_CONTROL |
98 |
|
COMMON /ADDYNVARS_KAPGM/ |
99 |
|
& adkapgm |
100 |
|
_RL adkapgm (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
101 |
|
#endif |
102 |
#if (defined (ALLOW_EDTAUX_CONTROL) || defined (ALLOW_EDTAUY_CONTROL)) |
#if (defined (ALLOW_EDTAUX_CONTROL) || defined (ALLOW_EDTAUY_CONTROL)) |
103 |
double precision adeddytaux(1-olx:snx+olx,1-oly:sny+oly,nr,nsx, |
double precision adeddytaux(1-olx:snx+olx,1-oly:sny+oly,nr,nsx, |
104 |
$nsy) |
$nsy) |