11.01.2013 Views

NX Nastran DMAP Programmer's Guide - Kxcad.net

NX Nastran DMAP Programmer's Guide - Kxcad.net

NX Nastran DMAP Programmer's Guide - Kxcad.net

SHOW MORE
SHOW LESS

Create successful ePaper yourself

Turn your PDF publications into a flip-book with our unique Google optimized e-Paper software.

DOM12<br />

Performs soft and hard convergence checks in design optimization<br />

BADMESH Input-logical-default=FALSE. Bad geometry was detected.<br />

XYUNIT Input-integer-default=0. Fortran unit number to which the DOM12<br />

FSDCYC Input-logical-default=FALSE. Fully stressed design cycle flag. Set to<br />

TRUE if this is a fully stressed design cycle.<br />

Example:<br />

1. Excerpt from sub<strong>DMAP</strong> DESOPT following hard convergence:<br />

DBVIEW XPREV=XINIT<br />

DBVIEW PROPPV=PROPI<br />

DBVIEW HISPV=HIS<br />

(WHERE DESITER=DESCYCLP) $<br />

(WHERE DESITER=DESCYCLP AND DPTYPE=*) $<br />

(WHERE DESITER=DESCYCLP) $<br />

DOM12XPREV,XINIT,CVALRG,PROPPV,PROPIF,OPTPRMG,<br />

HISPV,DESTAB,,,EDOM,MTRAK,EPT,GEOM2,MPT,<br />

EPTTABF,DVPTABF,,/<br />

HISADD,NEWPRM,,NEWDES/<br />

DESCYCLE/OBJPV/OBJIN/S,N,CNVFLG/2/OPTEXIT//<br />

MDTRKFLG/DESPCH/DESPCH1/MODETRAK/EIGNFREQ/<br />

DSAPRT/PROTYP $<br />

APPENDHISADD,/HISX/2 $<br />

EQUIVXHISX/HIS/-1 $<br />

DBSTATUS NEWPRM,NEWDES//S,N,NONEWP/S,N,NONEWD $<br />

IF ( NONEWP>0 ) EQUIVX NEWPRM/OPTPRMG/-1 $<br />

IF ( NONEWD>0 ) EQUIVX NEWDES/DESTAB/-1 $<br />

2. Excerpt from sub<strong>DMAP</strong> DESOPT following soft convergence:<br />

DBVIEW PROPIF =PROPI<br />

DBVIEW PROPOF=PROPO<br />

DBVIEW EPTTABF =EPTTAB<br />

DBVIEW DVPTABF =DVPTAB<br />

WHERE (DPTYPE=*) $<br />

(WHERE DPTYPE = *)<br />

WHERE (DPTYPE=*) $<br />

WHERE (DPTYPE=*) $<br />

DOM12XINIT,XO,CVALO,PROPIF,PROPOF,OPTPRMG,HIS,DESTAB,<br />

GEOM1N,COORDO,,,EPT,GEOM2,MPT,EPTTABF,DVPTABF,,/<br />

HISADD,NEWPRM,,NEWDES/<br />

DESCYCLE/OBJIN/OBJOUT/S,N,CNVFLG/1/OPTEXIT//<br />

MDTRKFLG/DESPCH/DESPCH1/MODETRAK/EIGNFREQ//PROTYP $<br />

APPENDHISADD,/HISX/2 $<br />

EQUIVXHISX/HIS/-1 $<br />

913

Hooray! Your file is uploaded and ready to be published.

Saved successfully!

Ooh no, something went wrong!