%PDF- %PDF-
Direktori : /opt/cloudlinux/venv/lib/python3.11/site-packages/numpy/f2py/tests/src/crackfortran/ |
Current File : //opt/cloudlinux/venv/lib/python3.11/site-packages/numpy/f2py/tests/src/crackfortran/gh2848.f90 |
subroutine gh2848( & ! first 2 parameters par1, par2,& ! last 2 parameters par3, par4) integer, intent(in) :: par1, par2 integer, intent(out) :: par3, par4 par3 = par1 par4 = par2 end subroutine gh2848