gh2848.f90
| 282 B | Satir:
0
| f90
Geri
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
Kaydet
Ctrl+S ile kaydet