仪表盘
版本库
文件存储
活动
搜索
登录
main
/
fume-manage-python
油烟在线监测数据爬取
概况
操作记录
提交次数
目录
文档
分支
对比
blame
|
历史
|
原始文档
Merge branch 'master' of ssh://114.215.109.124:29418/fume-manage-python
zmc
2023-12-22
9fdbf60165db0400c2e8e6be2dc6e88138ac719a
[fume-manage-python.git]
/
Lib
/
site-packages
/
numpy
/
f2py
/
tests
/
src
/
crackfortran
/
gh2848.f90
1
2
3
4
5
6
7
8
9
10
11
12
13
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