コード例 #1
0
ファイル: force_g5.c プロジェクト: Milkyway-at-home/nemo
void
vtc_set_scale(double xmax, double mmin)
{
    if (!grape_is_opened()) {
	grape_open();
    }
    g5_set_range(-xmax, xmax, mmin);
}
コード例 #2
0
ファイル: pg5_fortran.c プロジェクト: Guo-astro/FDPS
void FNAME(g5_set_range)(double *xmin, double *xmax, double *mmin)
{
    g5_set_range(*xmin, *xmax, *mmin);
}