²é¿´: 1476  |  »Ø¸´: 3

junfang138

гæ (³õÈëÎÄ̳)

[ÇóÖú] ÇóÖú£ºabaqus ×Ó³ÌÐòÎÊÌâ

¸Õѧabaqus ×Ó³ÌÐò£¬ÏÂÃæÊÇ×Ó³ÌÐò£º     subroutine dload(f, kstep, kinc, time, noel, npt, layer, kspt,
      1    coords, jltyp, sname)
C
       include 'aba_param.inc'
       parameter (zini=10d0,
      1           speed=5.5556d0,
      1           length=0.22d0,
      1           pressure=0.7d6) )
C
       dimension time(2),coords(3)
       character*80 sname
C      --------------------------------------------------------------------
C     speed Ϊ³µËÙ C     bcmax ºÍ bcmin ·Ö±ðΪºÉÔØµÄÉÏϱ߽ç
C     length Ϊ³µÂÖºÉÔØµÄ³¤¶È
C     distance Ϊ time£¨2£©Ê±¼äÄÚºÉÔØÒÆ¶¯µÄ¾àÀë
C      --------------------------------------------------------------------
         distance=speed*time(2)
         bcmid=zini-distance
         bcmax= bcmid
         bcmin=bcmax-length
        do 100 k=1,npt
        if(coords(3).lt.bcmax.and.coords(3).ge.bcmin) then
                f=pressure
        else
                f=0
        end if
100     continue
        return
        end   
Ä£ÄâÐгµºÉÔØ£¬£¨×¢£º×Ó³ÌÐòËûÈËѧÊõÎÄÏ×Öеģ©£¬
ÔËÐÐʱ´íÎó£ºproblem during compliation -c:\ljf\temp\dload.for

ÎÒÏëÎÊ£ºÊÇ×Ó³ÌÐò±¾ÉíµÄÎÊÌ⣿Êǰ²×°µÄ³ÌÐòÓÐÎÊÌ⣿
Çë´Í½Ì£¬½«²»Éõ¸Ð¼¤£¡£¡
»Ø¸´´ËÂ¥

» ²ÂÄãϲ»¶

» ±¾Ö÷ÌâÏà¹Ø¼ÛÖµÌùÍÆ¼ö£¬¶ÔÄúͬÑùÓаïÖú:

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

890520kk

гæ (³õÈëÎÄ̳)

Ö§³Öһϣ¡ÎÒÒ²Åöµ½ÁËÕâ¸öÎÊÌ⣬¥Ö÷½â¾öÁËÂð
2Â¥2014-09-19 11:20:06
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

Liusumei16

гæ (³õÈëÎÄ̳)

Â¥Ö÷£¬ÄãÎÊÌâ½â¾öÁËÂð£¿ÎÒÒ²Óöµ½ÁËͬÑùµÄÎÊÌ⣬ÎÒÔËÓÃÉÏÃæµÄ³ÌÐòÒ²³ö´í£¬ºóÀ´³ÌÐò¸Ä¶¯ÁËÒ»µã£¬ÄÜÔËÐгöÀ´£¬µ«·¢ÏÖÁ¦Ã»Ê©¼ÓÉÏÈ¥¡£ÏëÇë½ÌÄúÓйØÒƶ¯ºÉÔØ×Ó³ÌÐòdloadµÄÎÊÌâ¡£ÄúÄÜ·¢¸øÎÒ¸öDload×Ó³ÌÐòÂð£¬ÄúÄܼÓÎÒºÃÓÑÂð£¬Q1152609427¡£Ð»Ð»
3Â¥2015-04-25 09:54:59
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

ÇàÄêС·¹

гæ (³õÈëÎÄ̳)

ÎÒÒ²ÔÚÑо¿ANSYSÄ£ÄâÐгµºÉÔØµÄÎÊÌâ £¬ÊǸÃÄ£ÄâËĸöÂÖ×Ó£¬»¹ÊÇֻҪģÄâÒ»¸öÖáÖØÄØ£¿
4Â¥2015-10-10 18:13:58
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû
Ïà¹Ø°æ¿éÌø×ª ÎÒÒª¶©ÔÄÂ¥Ö÷ junfang138 µÄÖ÷Ìâ¸üÐÂ
×î¾ßÈËÆøÈÈÌûÍÆ¼ö [²é¿´È«²¿] ×÷Õß »Ø/¿´ ×îºó·¢±í
[¿¼ÑÐ] һ־Ըɽ´ó07»¯Ñ§ 332·Ö ËÄÁù¼¶Òѹý ±¾¿ÆÉ½¶«Ë«·Ç Çóµ÷¼Á£¡ +3 ²»ÏëÀíÄã 2026-03-16 3/150 2026-03-21 03:59 by JourneyLucky
[¿¼ÑÐ] ²ÄÁϹ¤³Ì£¨×¨£©Ò»Ö¾Ô¸985 ³õÊÔ335Çóµ÷¼Á +3 hiloiy 2026-03-17 4/200 2026-03-21 03:04 by JourneyLucky
[¿¼ÑÐ] Çóµ÷¼Á +3 Ma_xt 2026-03-17 3/150 2026-03-21 02:05 by JourneyLucky
[¿¼ÑÐ] Ò»Ö¾Ô¸»ªÖпƼ¼´óѧ£¬080502£¬354·ÖÇóµ÷¼Á +5 ÊØºòϦÑôCF 2026-03-18 5/250 2026-03-21 01:06 by JourneyLucky
[¿¼ÑÐ] 295Çóµ÷¼Á +4 Ò»Ö¾Ô¸¾©Çø211 2026-03-18 6/300 2026-03-20 23:41 by JourneyLucky
[¿¼ÑÐ] 304Çóµ÷¼Á +7 ˾¿Õ. 2026-03-18 7/350 2026-03-20 23:08 by JourneyLucky
[¿¼ÑÐ] Ò»Ö¾Ô¸ÄϾ©Àí¹¤´óѧ085701×ÊÔ´Óë»·¾³302·ÖÇóµ÷¼Á +4 ¿ûè÷ÎÀ¶Ó 2026-03-18 6/300 2026-03-20 23:02 by JourneyLucky
[¿¼ÑÐ] Ò»Ö¾Ô¸Î人Àí¹¤²ÄÁϹ¤³Ìר˶µ÷¼Á +9 Doleres 2026-03-19 9/450 2026-03-20 22:36 by JourneyLucky
[¿¼ÑÐ] ±±¿Æ281ѧ˶²ÄÁÏÇóµ÷¼Á +5 tcxiaoxx 2026-03-20 5/250 2026-03-20 21:35 by laoshidan
[¿¼ÑÐ] 265Çóµ÷¼Á +12 ÁºÁºÐ£Ð£ 2026-03-19 13/650 2026-03-20 21:01 by Î޼ʵIJÝÔ­
[¿¼ÑÐ] »·¾³¹¤³Ìµ÷¼Á +9 ´ó¿Édigkids 2026-03-16 9/450 2026-03-20 17:38 by ×íÔÚ·çÀï
[¿¼ÑÐ] 311Çóµ÷¼Á +11 ¶¬Ê®Èý 2026-03-15 12/600 2026-03-18 14:36 by ÐÇ¿ÕÐÇÔÂ
[¿¼ÑÐ] ²ÄÁÏר˶306Ó¢Ò»Êý¶þ +10 z1z2z3879 2026-03-16 13/650 2026-03-18 14:20 by 007_lilei
[¿¼ÑÐ] 334Çóµ÷¼Á +3 Ö¾´æ¸ßÔ¶ÒâÔÚ»úÐ 2026-03-16 3/150 2026-03-18 08:34 by lm4875102
[¿¼ÑÐ] 301Çóµ÷¼Á +4 A_JiXing 2026-03-16 4/200 2026-03-17 17:32 by ruiyingmiao
[˶²©¼ÒÔ°] ºþ±±¹¤Òµ´óѧ ÉúÃü¿ÆÑ§Ó뽡¿µÑ§Ôº-¿ÎÌâ×éÕÐÊÕ2026¼¶Ê³Æ·/ÉúÎï·½Ïò˶ʿ +3 1ϲ´º8 2026-03-17 5/250 2026-03-17 17:18 by ber´¨cool×Ó
[ÂÛÎÄͶ¸å] ÓÐûÓдóÀз¢Ð¡ÂÛÎÄÄÜ´øÎÒ¸ö¶þ×÷ +3 ÔöÈñ©ÈË 2026-03-17 4/200 2026-03-17 09:26 by xs74101122
[¿¼ÑÐ] »úеר˶325£¬Ñ°ÕÒµ÷¼ÁԺУ +3 y9999 2026-03-15 5/250 2026-03-16 19:58 by y9999
[¿¼ÑÐ] 326Çóµ÷¼Á +4 ŵ±´¶û»¯Ñ§½±êéê 2026-03-15 7/350 2026-03-16 17:11 by ŵ±´¶û»¯Ñ§½±êéê
[¿¼ÑÐ] 318Çóµ÷¼Á +3 Yanyali 2026-03-15 3/150 2026-03-16 16:41 by houyaoxu
ÐÅÏ¢Ìáʾ
ÇëÌî´¦ÀíÒâ¼û