Skip to content
Snippets Groups Projects
Commit 5ed12c5a authored by RODIER Quentin's avatar RODIER Quentin
Browse files

Quentin 14/09/2023: bugfix PFIELD must be a TARGET in arglist_ll_phy as in arglist_ll

parent 732bd3d6
No related branches found
No related tags found
No related merge requests found
......@@ -50,7 +50,7 @@ MODULE MODE_ARGSLIST_ll_PHY
!
TYPE(DIMPHYEX_t), INTENT(IN) :: D
TYPE(LIST_ll), POINTER :: TPLIST ! list of fields
REAL, DIMENSION(D%NIT,D%NJT,D%NKT), INTENT(IN) :: PFIELD ! field which is unpaked here
REAL, DIMENSION(D%NIT,D%NJT,D%NKT), TARGET :: PFIELD ! field which is unpaked here
! of fields
CHARACTER(LEN=*), INTENT(IN) :: HNAME ! Name of the field to be added
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment