/
usr
/
local
/
lib64
/
python3.6
/
site-packages
/
numpy
/
f2py
/
tests
/
src
/
common
/
/usr/local/lib64/python3.6/site-packages/numpy/f2py/tests/src/common
mkdir
upload
Name
Size
Mode
Actions
block.f
224
0644
edit
dl
rm
Edit:
/usr/local/lib64/python3.6/site-packages/numpy/f2py/tests/src/common/block.f
(224B)
SUBROUTINE INITCB DOUBLE PRECISION LONG CHARACTER STRING INTEGER OK COMMON /BLOCK/ LONG, STRING, OK LONG = 1.0 STRING = '2' OK = 3 RETURN END
Save
cmd:
run