Commit 93119d2a authored by Jorn Bruggeman's avatar Jorn Bruggeman
parents 6461fb67 dbde1b19
......@@ -298,7 +298,7 @@
if (calc_temp .and. save_t) then
fv = temp_missing
mv = temp_missing
vr(1) = 0.
vr(1) = -2.
vr(2) = 40.
err = nf90_def_var(ncid,'temp',NCDF_FLOAT_PRECISION,f4_dims,temp_id)
if (err .NE. NF90_NOERR) go to 10
......
Markdown is supported
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