99 |
& adkapgm |
& adkapgm |
100 |
_RL adkapgm (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
_RL adkapgm (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
101 |
#endif |
#endif |
102 |
|
#ifdef ALLOW_BOTTOMDRAG_CONTROL |
103 |
|
COMMON /ADDYNVARS_BOTTOMDRAG/ |
104 |
|
& adbottomdragfld |
105 |
|
_RL adbottomdragfld (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
106 |
|
#endif |
107 |
#if (defined (ALLOW_EDTAUX_CONTROL) || defined (ALLOW_EDTAUY_CONTROL)) |
#if (defined (ALLOW_EDTAUX_CONTROL) || defined (ALLOW_EDTAUY_CONTROL)) |
108 |
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, |
109 |
$nsy) |
$nsy) |