Commit 3476c926 authored by Frank Freimuth's avatar Frank Freimuth

Update wann_torque_rs.F

parent 815cd222
......@@ -379,7 +379,7 @@ c***********************************************************
open(321,file=trim(torquename3)//'_unf',
& form='unformatted'
#ifdef CPP_INTEL
,convert='BIG_ENDIAN')
& ,convert='BIG_ENDIAN'
#endif
& )
else ! l_ndegen
......@@ -387,7 +387,7 @@ c***********************************************************
open(321,file=trim(torquename2)//'_unf',
& form='unformatted'
#ifdef CPP_INTEL
,convert='BIG_ENDIAN')
& ,convert='BIG_ENDIAN'
#endif
& )
endif ! l_ndegen
......
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