±±¾©Ê¯ÓÍ»¯¹¤Ñ§Ôº2026ÄêÑо¿ÉúÕÐÉú½ÓÊÕµ÷¼Á¹«¸æ
²é¿´: 1825  |  »Ø¸´: 3
µ±Ç°Ö»ÏÔʾÂú×ãÖ¸¶¨Ìõ¼þµÄ»ØÌû£¬µã»÷ÕâÀï²é¿´±¾»°ÌâµÄËùÓлØÌû

ľżСÌì

½ð³æ (СÓÐÃûÆø)

[ÇóÖú] ¸ÕÌ帽½üÍø¸ñËæ¸ÕÌåÒ»ÆðÔ˶¯ ÒÑÓÐ1È˲ÎÓë

ÀûÓÃudf¼ÆËã¶¯Íø¸ñÎÊÌ⣬ÎÒÏëÒª×öµÄÊÇʹµÃ½á¹¹Ì帽½üµÄÍø¸ñËæ¸ÕÌåÒ»ÆðÔ˶¯¡£
udf½éÉÜ£º¸ÃudfʹÓÃnewmarkËã·¨½øÐв¢ÐÐÔËË㣬ʹÓÃÁËdefine cg motion,²¢½«¸ÕÌåÔ˶¯ºóµÄ×ø±êÊä³öµ½txtÎļþÖС£
ÎÊÌ⣺±àдµÄudfûÓÐÎÊÌ⣬Äܹ»Ê¹µÃ½á¹¹ÌåÔ˶¯£¬µ«Êǵ±°Ñ¸½½üÍø¸ñ£¨´Ë²¿·ÖÍø¸ñÒѾ­µ¥¶À»®·Ö²¢ÃüÃûΪfb£©£¬½«¸ÃÍø¸ñÉèÖÃΪrigid body ʹÓÃͬһ¸öudf£¬·¢ÏÖ³öÏÖÔËÐдíÎó¡£Ò²¾ÍÊDz»ÉèÖÃfbΪrigid bodyʱºò¿ÉÒÔÔËÐУ¬ÉèÖóÉrigid bodyʱºò²»ÄÜÔËÐС£
ÎÄÏ×ÖÐÌáµ½£¬ÊÇÒª±àдÁ½¸öudfÀ´ÊµÏÖ¡£
ÇóÖúµÚ¶þ¸öudf¸ÃÔõôд£¿
»Ø¸´´ËÂ¥

» ±¾ÌûÒÑ»ñµÃµÄºì»¨£¨×îÐÂ10¶ä£©

» ²ÂÄãϲ»¶

ÌìµÀ³êÇÚ
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

b380324212

Í­³æ (СÓÐÃûÆø)

¡¾´ð°¸¡¿Ó¦Öú»ØÌû

¡ï ¡ï ¡ï ¡ï ¡ï ¡ï ¡ï ¡ï ¡ï ¡ï
¸Ðл²ÎÓ룬ӦÖúÖ¸Êý +1
ľżСÌì: ½ð±Ò+10 2016-07-08 20:53:23
#include <stdio.h>
#include <math.h>
#include "udf.h"

#define WALLID 44
#define NUM_CALLS 7

DEFINE_CG_MOTION(cylinder, dt, vel, omega, time, dtime)
{
          FILE *fp=NULL;
        char filename[]="out.txt";

        Domain *domain=Get_Domain(1);
        Thread *t=Lookup_Thread(domain, WALLID);
        face_t f;

        static real lift=0.0,drag=0,lift_coeff=0.0,drag_coeff=0.0;

        static real a0=0.0,a1=0.0,a2=0.0,a3=0.0,a4=0.0,a5=0.0,a6=0.0,a7=0.0,KK=0.0,DeltT=0.0;
        static real Y=0.0,YY=0.0,Y1=0.0,YY1=0.0,YYY=0.0,PPt=0.0,Y0=0.0,YY0=0.0,YYY0=0.0;

        static int last_call=0;
        static int calls=0;

        int i;

        real rho=998.2, U=0.015, Dia=0.01;
        real m=0.2, k=0.710612, c=0;
        real Beta=0.25, Gama=0.5;

        real A[ND_ND],press_forces[ND_ND],viscous_forces[ND_ND];

        real x_force=0.0, y_force=0.0;


        if ((++calls)==NUM_CALLS)
                last_call=1;

        if (last_call)
    {
                NV_S(A,=,0.0);
                begin_f_loop(f,t)
                {
                        F_AREA(A,f,t);
                        press_forces[0]+=F_P(f,t)*A[0];
                        press_forces[1]+=F_P(f,t)*A[1];
                        viscous_forces[0]+=F_STORAGE_R_N3V(f,t,SV_WALL_SHEAR)[0];
                        viscous_forces[1]+=F_STORAGE_R_N3V(f,t,SV_WALL_SHEAR)[1];
                }
                end_f_loop(f,t)
       
                drag=press_forces[0]-viscous_forces[0];
                lift=press_forces[1]-viscous_forces[1];
                drag_coeff=drag/(0.5*rho*U*U*Dia);
                lift_coeff=lift/(0.5*rho*U*U*Dia);

                DeltT=dtime;
                a0 =1/(Beta*DeltT*DeltT);
                a1=Gama/(Beta*DeltT);
                a2=1/(Beta*DeltT);
                a3=1/(2*Beta)-1;
                a4=Gama/Beta-1;
                a5=(Gama/(2*Beta)-1)*DeltT;
                a6=(1-Gama)*DeltT;
                a7=DeltT*Gama;

                KK=k+a0*m+a1*c;

                PPt=lift+m*(a0*Y0+a2*YY0+a3*YYY0)+c*(a1*Y0+a4*YY0+a5*YYY0);
                Y=PPt/KK;
                YYY=(Y-Y0)*a0-a2*YY0-YYY0*a3;
                YY=YY0+(1-Gama)*DeltT*YYY0+Gama*DeltT*YYY;
                Y0=Y;
                YY0=YY;
                YYY0=YYY;


                Message("\n ===================================================================================";
                Message("\n %-12s  %-12s   %-12s   %-12s   %-12s   %-12s  ","Flow_time","Y","lift_coeff","drag_coeff","lift","drag";
                  Message("\n %12.8f  %12.8f  %12.8f  %12.8f  %12.8f  %12.8f  ",time,Y,lift_coeff,drag_coeff,lift,drag);


                if ((fp=fopen(filename,"a")==NULL)
                        Message("\n Warning: Unable to open %s for writing!!!\n",filename);
                else
                {
                        Message("\n Writing datas to %s...",filename);
                          fprintf(fp,"%12.8f  %12.8f  %12.8f  %12.8f  %12.8f  %12.8f %12.8f %12.8f  \n",time,Y,lift_coeff,drag_coeff,lift,drag,PPt,KK);
                          fclose(fp);
                        Message("\n Done!";
                        Message("\n ===================================================================================";
                }
               
                calls=0;
                last_call=0;
        }
        vel[0]=0.0;
        vel[1]=YY;
}
3Â¥2016-07-08 10:00:52
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû
²é¿´È«²¿ 4 ¸ö»Ø´ð

СºÚţС°×æ¤

гæ (³õÈëÎÄ̳)

Ëͺ컨һ¶ä
Â¥Ö÷¿ÉÒÔ·ÖÏíÏ ʹ¸ÕÌåÔ˶¯µÄudfÂð
4Â¥2018-07-18 15:01:29
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû
×î¾ßÈËÆøÈÈÌûÍÆ¼ö [²é¿´È«²¿] ×÷Õß »Ø/¿´ ×îºó·¢±í
[¿¼ÑÐ] 085600£¬321·ÖÇóµ÷¼Á +6 ´ó²öС×Ó 2026-03-31 6/300 2026-03-31 17:40 by 544594351
[¿¼ÑÐ] 0710ÉúÎïѧÇóµ÷¼Á£¡ +5 ÐðÊöÎÄ 2026-03-31 5/250 2026-03-31 17:32 by ÌÆãå¶ù
[¿¼ÑÐ] ²ÄÁϵ÷¼Á +8 Eujd1 2026-03-31 9/450 2026-03-31 17:25 by ÌÆãå¶ù
[¿¼ÑÐ] Çóµ÷¼Á£º085600²ÄÁÏÓ뻯¹¤£¬¿¼²Ä¿Æ»ù£¬×Ü·Ö319 +16 678lucky 2026-03-31 19/950 2026-03-31 16:39 by hypershenger
[¿¼ÑÐ] 334·Ö Ò»Ö¾Ô¸ÎäÀí-080500 ²ÄÁÏÇóµ÷¼Á +9 ÀîÀî²»·þÊä 2026-03-25 9/450 2026-03-31 16:25 by hypershenger
[¿¼ÑÐ] 311Çóµ÷¼ÁÒ»Ö¾Ô¸ºÏ·Ê¹¤Òµ´óѧ +9 Çï¶þÊ®¶þ 2026-03-30 9/450 2026-03-31 13:15 by Dyhoer
[¿¼ÑÐ] Ò»Ö¾Ô¸´óÁ¬Àí¹¤´óѧ£¬»úе¹¤³Ìѧ˶£¬341 +3 Î÷¹ÏÌïµÄÊØÍûÕß 2026-03-30 3/150 2026-03-31 11:08 by asdfzly
[¿¼ÑÐ] 320·Ö£¬²ÄÁÏÓ뻯¹¤×¨Òµ£¬Çóµ÷¼Á +10 Ò»¶¨Éϰ¶aaa 2026-03-27 14/700 2026-03-31 10:47 by foria
[¿¼ÑÐ] 085601Ò»Ö¾Ô¸ÖÐɽ´óѧÉîÛÚ²ÄÁϹ¤³Ì330Çóµ÷¼Á +5 pipiver 2026-03-30 5/250 2026-03-31 07:37 by JourneyLucky
[¿¼ÑÐ] Ó¢Ò»ÊýÒ»408£¬×Ü·Ö284£¬¶þÕ½Õæ³ÏÇóµ÷¼Á +3 12.27 2026-03-30 5/250 2026-03-31 00:47 by ²»³Ôâ¹û17
[¿¼ÑÐ] 328Çóµ÷¼Á +8 àŵεĻù±¾¶¼ 2026-03-27 8/400 2026-03-30 17:20 by Wang200018
[¿¼ÑÐ] 086000ÉúÎïÓëÒ½Ò©µ÷¼Á +5 Feisty¡£ 2026-03-28 9/450 2026-03-29 12:02 by longlotian
[¿¼ÑÐ] ÊýÒ»Ó¢Ò»271ר˶£¨085401£©Çóµ÷¼Á£¬¿É¿ç +7 ǰÐбØÓйâ 2026-03-28 8/400 2026-03-28 23:22 by Сľ³ætim
[¿¼ÑÐ] 299Çóµ÷¼Á +7 àÅàÅàÅàÅ2 2026-03-27 7/350 2026-03-28 13:09 by ÌÆãå¶ù
[¿¼ÑÐ] 352·Ö »¯¹¤Óë²ÄÁÏ +5 º£Äɰٴ¨Ly 2026-03-27 5/250 2026-03-28 03:39 by fmesaito
[¿¼²©] 26É격 +3 ¼ÓÓͳ尡£¡ 2026-03-26 3/150 2026-03-27 15:38 by cls512
[¿¼ÑÐ] 0856µ÷¼Á +5 ÇóÇóÈÃÎÒÓÐÊé¶Á° 2026-03-26 6/300 2026-03-27 15:12 by caszguilin
[¿¼ÑÐ] ²ÄÁÏר˶ 335 ·ÖÇóµ÷¼Á +4 ¾Ü¾øÀ䱩Á¦ 2026-03-25 4/200 2026-03-25 18:45 by haxia
[¿¼ÑÐ] ¡¾2026¿¼Ñе÷¼Á¡¿ÖÆÒ©¹¤³Ì 284·Ö ÇóÏà¹Ø×¨Òµµ÷¼ÁÃû¶î +4 Ô¬Û¼Û¼ 2026-03-25 8/400 2026-03-25 14:32 by lbsjt
[¿¼ÑÐ] ¸÷λÀÏʦÄúºÃ£º±¾È˳õÊÔ372·Ö +5 jjÓ¿77 2026-03-25 6/300 2026-03-25 14:15 by mapenggao
ÐÅÏ¢Ìáʾ
ÇëÌî´¦ÀíÒâ¼û