diff options
Diffstat (limited to 'Dragon/src/g2s_convert.f90')
| -rw-r--r-- | Dragon/src/g2s_convert.f90 | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Dragon/src/g2s_convert.f90 b/Dragon/src/g2s_convert.f90 index c8f1fe9..1f28bb0 100644 --- a/Dragon/src/g2s_convert.f90 +++ b/Dragon/src/g2s_convert.f90 @@ -306,7 +306,7 @@ subroutine g2s_convert(impx,ipAl,ipZa,ipSal) tabSegArc(i)%b=real(anglEnd) tabSegArc(i)%a=real(anglStart) else - write(hsmg,'(35hg2s_convert: invalid element type=,i3,1h.)') itype + write(hsmg,'(34hg2s_convert: invalid element type=,i3,1h.)') itype call XABORT(hsmg) endif tabSegArc(i)%nodeg=nplus |