"""
Defines functions for single precision 16 character field writing.
"""
from __future__ import (nested_scopes, generators, division, absolute_import,
print_function, unicode_literals)
import sys
from typing import List, Union, Optional, Any
from numpy import float32, isnan # type: ignore
from pyNastran.utils.numpy_utils import integer_types
from pyNastran.bdf.cards.utils import wipe_empty_fields
from pyNastran.bdf.field_writer_8 import set_blank_if_default
[docs]def set_string16_blank_if_default(value, default):
# type: (Any, Any) -> str
"""helper method for writing BDFs"""
val = set_blank_if_default(value, default)
if val is None:
return ' '
return '%16s' % val
[docs]def print_scientific_16(value):
# type: (float) -> str
"""
Prints a value in 16-character scientific notation.
This is a sub-method and shouldnt typically be called
.. seealso:: print_float_16 for a better method
"""
if value == 0.0:
return '%16s' % '0.'
python_value = '%16.14e' % value # -1.e-2
svalue, sexponent = python_value.strip().split('e')
exponent = int(sexponent) # removes 0s
if abs(value) < 1.:
sign = '-'
else:
sign = '+'
# the exponent will be added later...
sexp2 = str(exponent).strip('-+')
value2 = float(svalue)
# the plus 1 is for the sign
len_sexp = len(sexp2) + 1
leftover = 16 - len_sexp
if value < 0:
fmt = "%%1.%sf" % (leftover - 3)
else:
fmt = "%%1.%sf" % (leftover - 2)
svalue3 = fmt % value2
svalue4 = svalue3.strip('0')
field = "%16s" % (svalue4 + sign + sexp2)
return field
[docs]def print_float_16(value):
# type: (float) -> str
"""
Prints a float in nastran 16-character width syntax
using the highest precision possbile.
.. seealso:: print_float_8
"""
if isnan(value):
return ' '
elif value == 0.0:
return '%16s' % '0.'
elif value > 0.: # positive, not perfect...
if value < 5e-16:
field = print_scientific_16(value)
return field
elif value < 0.001:
field = print_scientific_16(value)
field2 = "%16.15f" % value # small value
field2 = field2.strip('0 ')
field1 = field.replace('-', 'e-')
if field2 == '.':
return print_scientific_16(value)
if len(field2) <= 16 and float(field1) == float(field2):
field = field2
field = field.strip(' 0')
return '%16s' % field
#elif value < 0.1:
#field = "%16.15f" % value
elif value < 1.:
field = "%16.15f" % value
elif value < 10.:
field = "%16.14f" % value
elif value < 100.:
field = "%16.13f" % value # 10 < x < 100
elif value < 1000.:
field = "%16.12f" % value
elif value < 10000.:
field = "%16.11f" % value
elif value < 100000.:
field = "%16.10f" % value
elif value < 1000000.:
field = "%16.9f" % value
elif value < 10000000.:
field = "%16.8f" % value
elif value < 100000000.:
field = "%16.7f" % value
elif value < 1000000000.:
field = "%16.6f" % value
elif value < 10000000000.:
field = "%16.5f" % value
elif value < 100000000000.:
field = "%16.4f" % value
elif value < 1000000000000.:
field = "%16.3f" % value
elif value < 10000000000000.:
field = "%16.2f" % value
elif value < 100000000000000.:
field = "%16.1f" % value
else: # big value # 123456789012345.
field = "%16.1f" % value
if field.index('.') < 16:
field = '%16.1f' % (round(value))
field = field[0:16] # drop off the .1f
#assert '.' != field[0], field
else:
field = print_scientific_16(value)
return field
else:
if value > -5e-15:
field = print_scientific_16(value)
return field
elif value > -0.01: # -0.001
field = print_scientific_16(value)
field2 = "%16.14f" % value # small value
field2 = field2.strip('0 ')
# get rid of the first minus sign, add it on afterwards
field1 = '-' + field.strip(' 0-').replace('-', 'e-')
if len(field2) <= 16 and float(field1) == float(field2):
field = field2.rstrip(' 0')
field = field.replace('-0.', '-.')
return '%16s' % field
#elif value > -0.1:
# -0.01 >x>-0.1...should be 5 (maybe scientific...)
#field = "%16.14f" % value
#field = field.replace('-0.', '-.')
elif value > -1.:
# -0.1 >x>-1.....should be 6, but the baseline 0 is kept...
field = "%16.14f" % value
field = field.replace('-0.', '-.')
elif value > -10.:
field = "%16.13f" % value # -1 >x>-10
elif value > -100.:
field = "%16.12f" % value # -1 > x > -10
elif value > -1000.:
field = "%16.11f" % value # -10 > x > -100
elif value > -10000.:
field = "%16.10f" % value # -100 > x > -1000
elif value > -100000.:
field = "%16.9f" % value # -1000 > x > -10000
elif value > -1000000.:
field = "%16.8f" % value # -10,000 > x > -100,000
elif value > -10000000.:
field = "%16.7f" % value # -100,000 > x > -1,000,000
elif value > -100000000.:
field = "%16.6f" % value # -1,000,000 > x > -10,000,000
elif value > -1000000000.:
field = "%16.5f" % value # -10,000,000 > x > -100,000,000
elif value > -10000000000.:
field = "%16.4f" % value # -100,000,000 > x > -1,000,000,000
elif value > -100000000000.:
field = "%16.3f" % value # -1,000,000,000 > x > -10,000,000,000
elif value > -1000000000000.:
field = "%16.2f" % value # -10,000,000,000 > x > -100,000,000,000
elif value > -10000000000000.:
field = "%16.1f" % value # -100,000,000,000 > x > -1,000,000,000,000
else:
field = "%16.1f" % value
try:
ifield = field.index('.')
except ValueError:
print('field = %s' % field)
raise
if ifield < 16:
field = '%15s.' % (int(round(value, 0)))
#assert '.' != field[0], field
else:
field = print_scientific_16(value)
return field
field = field.strip(' 0')
field = '%16s' % field
#assert len(field) == 16, ('value=%r field=%r is not 16 characters '
# 'long, its %s' % (value, field, len(field)))
return field
[docs]def print_field_16(value):
# type: (Optional[Union[int, float, str]]) -> str
"""
Prints a 16-character width field
Parameters
----------
value : int / float / str / None
the value to print
Returns
-------
field : str
an 16-character string
"""
if isinstance(value, integer_types):
field = "%16s" % value
elif isinstance(value, (float, float32)):
field = print_float_16(value)
elif value is None:
field = " "
else:
field = "%16s" % value
if len(field) != 16:
msg = 'field=%r is not 16 characters long...rawValue=%r' % (field, value)
raise RuntimeError(msg)
return field
[docs]def print_card_16(fields, wipe_fields=True):
# type: (List[Optional[Union[int, float, str]]], bool) -> str
"""
Prints a nastran-style card with 16-character width fields.
Parameters
----------
fields : List[varies]
all the fields in the BDF card (no trailing Nones)
wipe_fields : bool; default=True
some cards (e.g. PBEAM) have ending fields
that need to be there, others cannot have them.
Returns
-------
card : str
string representation of the card in small field format
.. note:: An internal field value of None or '' will be treated as
a blank field
.. note:: A large field format follows the 8-16-16-16-16-8 = 80
format where the first 8 is the card name or
blank (continuation). The last 8-character field indicates
an optional continuation, but because it's a left-justified
unneccessary field, print_card doesnt use it.
.. code-block:: python
>>> fields = ['DUMMY', 1, 2, 3, None, 4, 5, 6, 7, 8.]
>>> print_card_16(fields)
DUMMY* 1 2 3
* 4 5 6 7
* 8.
*
"""
if wipe_fields:
fields = wipe_empty_fields(fields)
nfields_main = len(fields) - 1 # chop off the card name
nbdf_lines = nfields_main // 8
if nfields_main % 8 != 0:
nbdf_lines += 1
nextra_fields = 8 * nbdf_lines - nfields_main
fields += [None] * nextra_fields
try:
out = '%-8s' % (fields[0] + '*')
except:
print("ERROR! fields=%s" % fields)
sys.stdout.flush()
raise
for i in range(1, len(fields)):
field = fields[i]
try:
out += print_field_16(field)
except:
print("bad fields = %s" % fields)
raise
if i % 4 == 0: # allow 1+4 fields per line
out = out.rstrip(' ')
if out[-1] == '\n': # empty line
out += '*'
out += '\n* '
out = out.rstrip(' *') # removes one continuation star
if not out.endswith('\n'):
out += '\n'
return out