TREX/trexio
1
0
Fork 0
mirror of https://github.com/TREX-CoE/trexio.git synced 2025-04-26 10:24:44 +02:00
Code Issues Projects Releases Wiki Activity

minor cleaning

Browse Source
This commit is contained in:
q-posev 2021-06-04 09:43:56 +02:00
parent 3ce9c57376
commit f1f47f4369
1 changed files with 1 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
tests/test.f90
View File

@ -46,7 +46,6 @@ subroutine test_write()
label_str='' label_str=''
do i = 1,num do i = 1,num
! label_str=label_str//trim(label(i))//' '
label_str=label_str//trim(label(i))//TREXIO_DELIM label_str=label_str//trim(label(i))//TREXIO_DELIM
enddo enddo
@ -146,7 +145,7 @@ subroutine test_read()
rc = trexio_read_nucleus_label(trex_file, label_str, 4) rc = trexio_read_nucleus_label(trex_file, label_str, 4)
! -------------------------------------------------- ! --------------------------------------------------
! dummy parser of big string with space delimeters ! dummy parser of big string with TREXIO_DELIM delimeters
! -------------------------------------------------- ! --------------------------------------------------
ind=1 ind=1
offset=1 offset=1