Linux boca.hozzt.com 4.18.0-553.8.1.lve.el8.x86_64 #1 SMP Thu Jul 4 16:24:39 UTC 2024 x86_64
LiteSpeed
: 159.253.39.62 | : 18.222.3.153
Cant Read [ /etc/named.conf ]
7.4.33
renovkoron
Terminal
AUTO ROOT
Adminer
Backdoor Destroyer
Linux Exploit
Lock Shell
Lock File
Create User
CREATE RDP
PHP Mailer
BACKCONNECT
UNLOCK SHELL
HASH IDENTIFIER
README
+ Create Folder
+ Create File
/
opt /
cloudlinux /
venv /
lib /
python3.11 /
site-packages /
numpy /
f2py /
tests /
src /
string /
[ HOME SHELL ]
Name
Size
Permission
Action
char.f90
618
B
-rw-r--r--
fixed_string.f90
695
B
-rw-r--r--
scalar_string.f90
176
B
-rw-r--r--
string.f
248
B
-rw-r--r--
Delete
Unzip
Zip
${this.title}
Close
Code Editor : 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
Close
