! { dg-do run } ! PR 25806: Functions returning pointers to arrays program a integer, target :: storage(5) integer :: s(3…
intent 源代码
汇集 intent 相关的电路原理图、PCB工程文件、单片机/FPGA源代码、数据手册与应用设计方案。
subroutine BigRead( InputFile, InputConf, Nham, Nljgrs, Niongrs, Nsp, & MaxSp, MaxSteps, MaxBeads, MaxInt, MaxReal, MaxEE, &…
subroutine e6interact( Nb, Xb, Yb, Zb, TYPEb, DAMP2b, DAMP3b, & Nmol, LENGTH, Nham, Nljgrs, & EPS, SIG, CP, ALP,…
subroutine CenterOfMass( Length, X, Y, Z, TYPEg, Ngrs, MASS, xcom, ycom, zcom ) implicit none ! This routine calculates the …
subroutine e6molecule( Nc, Xc, Yc, Zc, TYPEc, DAMP2c, DAMP3c, & Np, Xp, Yp, Zp, TYPEp, DAMP2p, DAMP3p, & Nham, N…
subroutine Fourier_Setup( Kmax, Alpha, CONST, KX, KY, KZ, Nkvec ) implicit none ! This routine calculates the constant part …
subroutine Sphere( xc, yc, zc, bondlength, xn, yn, zn, Seed ) implicit none ! This subroutine randomly places a bead on the …
subroutine Weights( Nham, stop_h, LNW, PSI_PI ) implicit none integer, intent(in) :: Nham integer, intent(in) :…
subroutine Create( InputConf, Nham, Nljgrs, Niongrs, Nsp, & MaxSp, MaxSteps, MaxBeads, & MaxInt, MaxReal, MaxEE, &…
subroutine Disp_Rot( MaxSp, Nmol, Nlj, Nion, & Xlj, Ylj, Zlj, TYPElj, DAMPlj2, DAMPlj3, & Xion, Yion, Zion, TYPEion,…