Searched refs:offnsk (Results 1 – 2 of 2) sorted by relevance
24209 static real offnsk; in make2bar_() local33900 if (-(*offnsk) < -9.995f) { in putfig_()33902 r__1 = -(*offnsk); in putfig_()33906 } else if (-(*offnsk) < -.995f || -(*offnsk) > 9.995f) { in putfig_()33908 r__1 = -(*offnsk); in putfig_()33912 } else if (-(*offnsk) < -1e-4f || -(*offnsk) > .995f) { in putfig_()33914 r__1 = -(*offnsk); in putfig_()33920 r__1 = -(*offnsk); in putfig_()34146 if (*offnsk < -9.995f) { in putfig_()34151 } else if (*offnsk < -.995f || *offnsk > 9.995f) { in putfig_()[all …]
21587 if (abs(offnsk) .gt. .0001) then21592 if (-offnsk .lt. -9.995) then21595 else if (-offnsk.lt.-.995 .or. -offnsk.gt.9.995) then21598 else if (-offnsk.lt.-.0001 .or. -offnsk.gt..995) then21599 write(notexq(6:9),'(f4.2)')-offnsk21728 if (abs(offnsk) .gt. .0001) then21730 if (offnsk .lt. -9.995) then21733 else if (offnsk.lt.-.995 .or. offnsk.gt.9.995) then21736 else if (offnsk.lt.-.0001 .or. offnsk.gt..995) then21737 write(notexq(6:9),'(f4.2)')offnsk[all …]