HEX

Server: Apache

System: Linux srv10.cpanelhost.cl 3.10.0-962.3.2.lve1.5.88.el7.x86_64 #1 SMP Fri Sep 26 14:06:42 UTC 2025 x86_64

User: cco26461 (4967)

PHP: 7.4.33

Disabled: NONE

Upload Files

File: //opt/cloudlinux/venv/lib64/python3.11/site-packages/numpy/f2py/tests/src/common/block.f

      SUBROUTINE INITCB
      DOUBLE PRECISION LONG
      CHARACTER        STRING
      INTEGER          OK
    
      COMMON  /BLOCK/ LONG, STRING, OK
      LONG = 1.0
      STRING = '2'
      OK = 3
      RETURN
      END