Home
last modified time | relevance | path

Searched refs:uyunit (Results 1 – 3 of 3) sorted by relevance

/dports/science/cdcl/dcl-5.4.8-C/src/grph2/ugpack/
H A Dugunit.c35 static real uxunit, vxunit, uyunit, vyunit; in ugunit_() local
66 ugrget_("UYUNIT", &uyunit, (ftnlen)6); in ugunit_()
68 if (uyunit == rundef) { in ugunit_()
70 uyunit = vyunit / yfact2; in ugunit_()
71 ugrset_("UYUNIT", &uyunit, (ftnlen)6); in ugunit_()
73 vyunit = uyunit * yfact2; in ugunit_()
H A Dugsut.c59 static real uxunit, vxunit, vyunit, uyunit; in ugsut_0_() local
130 ugrget_("UYUNIT", &uyunit, (ftnlen)6); in ugsut_0_()
H A Dugvect.c81 static real uxunit, uyunit; in ugvect_() local
209 ugrget_("UYUNIT ", &uyunit, (ftnlen)8); in ugvect_()
216 do_fio(&c__1, (char *)&uyunit, (ftnlen)sizeof(real)); in ugvect_()