Skip to content
Snippets Groups Projects
Commit bc8c45f9 authored by Antoine Cyril David Hoffmann's avatar Antoine Cyril David Hoffmann :seedling:
Browse files

removed redundant terminal output

parent 290333e5
No related branches found
No related tags found
No related merge requests found
...@@ -38,3 +38,4 @@ src/srcinfo/srcinfo.h ...@@ -38,3 +38,4 @@ src/srcinfo/srcinfo.h
local/ local/
*/*.sh */*.sh
Gallery/ Gallery/
.vscode/settings.json
...@@ -39,13 +39,11 @@ CONTAINS ...@@ -39,13 +39,11 @@ CONTAINS
ENDIF ENDIF
CALL getatt(fidrst,"/data/input/" , "pmaxi", pmaxi_cp) CALL getatt(fidrst,"/data/input/" , "pmaxi", pmaxi_cp)
CALL getatt(fidrst,"/data/input/" , "jmaxi", jmaxi_cp) CALL getatt(fidrst,"/data/input/" , "jmaxi", jmaxi_cp)
IF (my_id .EQ. 0) WRITE(*,*) "Pi_cp = ", pmaxi_cp
IF (my_id .EQ. 0) WRITE(*,*) "Ji_cp = ", jmaxi_cp
CALL getatt(fidrst,"/data/input/" , "start_iframe5d", n0) CALL getatt(fidrst,"/data/input/" , "start_iframe5d", n0)
IF ((KIN_E .AND. ((pmaxe_cp .NE. pmaxe) .OR. (jmaxe_cp .NE. jmaxe))) .OR.& IF ((KIN_E .AND. ((pmaxe_cp .NE. pmaxe) .OR. (jmaxe_cp .NE. jmaxe))) .OR.&
(pmaxi_cp .NE. pmaxi) .OR. (jmaxi_cp .NE. jmaxi)) THEN (pmaxi_cp .NE. pmaxi) .OR. (jmaxi_cp .NE. jmaxi)) THEN
IF(my_id.EQ.0)WRITE(*,*) '! Extending the polynomials basis !' IF(my_id.EQ.0) WRITE(*,*) '! Extending the polynomials basis !'
CALL load_output_adapt_pj CALL load_output_adapt_pj
ELSE ELSE
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment