golden hour

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

⬆️ Go Up

Upload

File/Folder	Size	Actions
char.f90	618 B	Del OK
fixed_string.f90	695 B	Del OK
scalar_string.f90	176 B	Del OK
string.f	248 B	Del OK

Edit: string.f

C FILE: STRING.F SUBROUTINE FOO(A,B,C,D) CHARACTER*5 A, B CHARACTER*(*) C,D Cf2py intent(in) a,c Cf2py intent(inout) b,d A(1:1) = 'A' B(1:1) = 'B' C(1:1) = 'C' D(1:1) = 'D' END C END OF FILE STRING.F
Save