Skip to content
Snippets Groups Projects
Commit d2f0a1cb authored by WAUTELET Philippe's avatar WAUTELET Philippe
Browse files

Philippe 06/02/2019: minor: standardize 2 units in written/read fields

parent 27205b92
No related branches found
No related tags found
No related merge requests found
Hide whitespace changes
Inline Side-by-side
src/MNH/lima_ccn_activation.f90
+ 1
− 1
View file @ d2f0a1cb
...@@ -472,7 +472,7 @@ IF ( OCLOSE_OUT ) THEN ...@@ -472,7 +472,7 @@ IF ( OCLOSE_OUT ) THEN
TZFIELD%CMNHNAME ='NACT' TZFIELD%CMNHNAME ='NACT'
TZFIELD%CSTDNAME = '' TZFIELD%CSTDNAME = ''
TZFIELD%CLONGNAME = TRIM(TZFIELD%CMNHNAME) TZFIELD%CLONGNAME = TRIM(TZFIELD%CMNHNAME)
TZFIELD%CUNITS = '/kg' TZFIELD%CUNITS = 'kg-1'
TZFIELD%CDIR = 'XY' TZFIELD%CDIR = 'XY'
TZFIELD%CCOMMENT = 'X_Y_Z_NACT' TZFIELD%CCOMMENT = 'X_Y_Z_NACT'
TZFIELD%NGRID = 1 TZFIELD%NGRID = 1
......
src/MNH/lima_warm_nucl.f90
+ 1
− 1
View file @ d2f0a1cb
...@@ -540,7 +540,7 @@ IF ( OCLOSE_OUT ) THEN ...@@ -540,7 +540,7 @@ IF ( OCLOSE_OUT ) THEN
TZFIELD%CMNHNAME ='NACT' TZFIELD%CMNHNAME ='NACT'
TZFIELD%CSTDNAME = '' TZFIELD%CSTDNAME = ''
TZFIELD%CLONGNAME = TRIM(TZFIELD%CMNHNAME) TZFIELD%CLONGNAME = TRIM(TZFIELD%CMNHNAME)
TZFIELD%CUNITS = '/kg' TZFIELD%CUNITS = 'kg-1'
TZFIELD%CDIR = 'XY' TZFIELD%CDIR = 'XY'
TZFIELD%CCOMMENT = 'X_Y_Z_NACT' TZFIELD%CCOMMENT = 'X_Y_Z_NACT'
TZFIELD%NGRID = 1 TZFIELD%NGRID = 1
......
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment

Documentation | Mentions légales | CGU | Accessibilité : non conforme