Skip to content

Commit

Permalink
240102.142818.HKT remove printing
Browse files Browse the repository at this point in the history
  • Loading branch information
zaikunzhang committed Jan 2, 2024
1 parent 565940c commit 95ae22c
Showing 1 changed file with 1 addition and 3 deletions.
4 changes: 1 addition & 3 deletions matlab/mex_gateways/fmxapi.F90
Original file line number Diff line number Diff line change
Expand Up @@ -12,7 +12,7 @@ module fmxapi_mod
!
! Started in July 2020
!
! Last Modified: Tuesday, January 02, 2024 PM02:20:24
! Last Modified: Tuesday, January 02, 2024 PM02:27:24
!--------------------------------------------------------------------------------------------------!

! N.B.:
Expand Down Expand Up @@ -675,8 +675,6 @@ subroutine write_rvector(x, px, shape_type)
if (any(abs(x - x_dp) > cvsnTol * max(abs(x), ONE)) .or. .not. all(is_nan(x) .eqv. is_nan(x_dp))) then
wid = 'FMXAPI:LargeConversionError'
msg = 'WRITE_RVECTOR: Large error occurs when converting REAL(RP) to REAL(DP) (maybe due to overflow).'
write (*, *) 'x = ', x
write (*, *) 'x_dp = ', x_dp
call mexWarnMsgIdAndTxt(wid, msg)
end if
end if
Expand Down

0 comments on commit 95ae22c

Please sign in to comment.