Skip to content
Snippets Groups Projects
Commit 3f1b77af authored by Sebastien Masson's avatar Sebastien Masson
Browse files

Merge branch 'fix_iom_filename_parsing_agrif' into 'branch_4.2'

Fix iom filename parsing agrif

See merge request nemo/nemo!64
parents bb15bd01 dcfb5495
No related branches found
No related tags found
No related merge requests found
......@@ -751,7 +751,7 @@ CONTAINS
! =============
clname = trim(cdname)
IF ( .NOT. Agrif_Root() .AND. .NOT. lliof ) THEN
iln = INDEX(clname,'/')
iln = INDEX(clname,'/', BACK=.TRUE.)
cltmpn = clname(1:iln)
clname = clname(iln+1:LEN_TRIM(clname))
clname=TRIM(cltmpn)//TRIM(Agrif_CFixed())//'_'//TRIM(clname)
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment