/opt/imh-python/lib/python3.9/site-packages/numpy/f2py/tests/src/common/
/opt/imh-python/lib/python3.9/site-packages/numpy/f2py/tests/src/common
NameSizeModeActions
block.f2240644editdlrm
Edit: /opt/imh-python/lib/python3.9/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