Skip to content
Snippets Groups Projects
Commit c680c72c authored by Juan Escobar's avatar Juan Escobar
Browse files

Juan 2/03/2020: compare_with_pgd_domain.f90, strange bug with pgi/20.04 <->...

Juan 2/03/2020: compare_with_pgd_domain.f90, strange bug with pgi/20.04 <-> corrupted size vs. prev_size , pgf901 TERMINATED by signal 6, add 1 write to avoid it ?!
parent 01163e87
No related branches found
No related tags found
No related merge requests found
......@@ -178,6 +178,7 @@ IF ( (ABS(PLAT0-XLAT0)>ZEPS*MAX(1.,ABS(XLAT0))) &
WRITE(ILUOUT0,*) ' | INPUT FILE AND PHYSIOGRAPHIC DATA DOMAINS ARE DIFFERENTS |'
WRITE(ILUOUT0,*) ' +----------------------------------------------------------+'
WRITE(ILUOUT0,*)
WRITE(ILUOUT0,*)
!callabortstop
CALL PRINT_MSG(NVERB_FATAL,'GEN','COMPARE_WITH_PGD_DOMAIN','')
ENDIF
......
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