C+ C NAME: C bStr2Flt C CALLING SEQUENCE: logical function bStr2Flt(CStr,N,R) C PROCEDURE: C bStr2Flt is a special case of a Str2Flt call. C SEE ALSO: C Str2Flt C MODIFICATION HISTORY: C DEC-1992, Paul Hick (UCSD/CASS; pphick@ucsd.edu) C- character CStr*(*) character cL1(1)*20 real R(N) M = N L1 = 0 call Str2Flt_Exp(.TRUE.) call Str2Flt(CStr,M,R) call Str2Flt_Crumbs(L,L1,cL1) !------- ! Exactly N numbers in CStr with no leftover characters. ! (If M = -N there are more then N numbers in CStr) bStr2Flt = N .eq. M .and. L .eq. 0 return end