±±¾©Ê¯ÓÍ»¯¹¤Ñ§Ôº2026ÄêÑо¿ÉúÕÐÉú½ÓÊÕµ÷¼Á¹«¸æ
²é¿´: 663  |  »Ø¸´: 0

lajiiwang

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

[ÇóÖú] R22ÖÆÀä¼ÁµÄÖÊÁ¿·ÖÊýºÍĦ¶û·ÖÊý²»ÊǶ¼Ó¦¸ÃµÈÓÚ1 Âð£¿

R22µÄÖÊÁ¿·ÖÊýΪ1£¬µ÷ÓÃRefpropµÄXMOLE(zkg,z,wm),ΪɶµÃµ½½á¹û ZKG,Z,WM        1.0000     0.0000    86.4680
ΪɶĦ¶û·ÖÊýΪ0£¿
Çë¸ßÊÖÃǰï°ïæ

c       Units are K, kPa, mol/dm^3, mole fraction, J/mol, J/mol-K, m/s
c       uPa-s, W/m-K, N/m

      program test50
      implicit double precision (a-h,o-z,l)
      implicit integer (i-k,m,n)
      parameter (ncmax=1)   !max number of components in mixture
      dimension zkg(ncmax)
      character hrf*3, herr*255
      character*255 hf(ncmax),hfmix

c...Call SETUP to initialize the program and set the pure fluid component name
c...For a mixture, use the following setup instead of the lines above.
      i=1
      hf(1)='..\fluids\R22.FLD'
      hfmix='..\fluids\HMX.BNC'
      hrf='DEF'
      call SETUP (i,hf,hfmix,hrf,ierr,herr)
      if (ierr.ne.0) write (*,*) herr

c    To input mass fraction of composition
      zkg=1.0d0   

c    Converts mass fraction to mole fraction
          call XMOLE(zkg,z,wm)
      write (*,100) 'ZKG,Z,WM   ',zkg,z,wm

100   format (1x,a22,5f11.4)

      end
»Ø¸´´ËÂ¥

» ²ÂÄãϲ»¶

ÖÆÀ伯Ëã
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû
Ïà¹Ø°æ¿éÌø×ª ÎÒÒª¶©ÔÄÂ¥Ö÷ lajiiwang µÄÖ÷Ìâ¸üÐÂ
×î¾ßÈËÆøÈÈÌûÍÆ¼ö [²é¿´È«²¿] ×÷Õß »Ø/¿´ ×îºó·¢±í
[¿¼ÑÐ] 362Çóµ÷¼Á +7 ÎÒÒª¿¼´ó 2026-04-06 11/550 2026-04-07 09:32 by ÎÒÒª¿¼´ó
[¿¼ÑÐ] 312Çóµ÷¼Á +4 LR6 2026-04-06 4/200 2026-04-07 08:42 by jp9609
[¿¼ÑÐ] 071000ÉúÎïѧµ÷¼Á +7 À­ÌáÌÒ 2026-04-06 7/350 2026-04-06 18:55 by 52305043001
[¿¼ÑÐ] 308Çóµ÷¼Á +13 ÌÈÈôÆð·çÁËÄØ 2026-04-05 13/650 2026-04-06 14:20 by ½¯ð©Óí
[¿¼ÑÐ] 296Çóµ÷¼Á +3 Íô£¡£¿£¡ 2026-04-05 4/200 2026-04-05 20:13 by à£à£à£0119
[¿¼ÑÐ] µ÷¼ÁÇóÖú +10 Ïë»»ÊÖ»ú²»Ïë½âÊ 2026-04-02 13/650 2026-04-05 09:41 by sam3303
[¿¼ÑÐ] 324Çóµ÷¼Á +9 ÏëÉÏѧÇóµ÷ 2026-04-03 9/450 2026-04-04 23:57 by ¹û¶³´óÍõ
[¿¼ÑÐ] ²ÄÁÏÓ뻯¹¤306·ÖÕÒµ÷¼Á +12 ²×º£ÇáÖÛe 2026-04-03 13/650 2026-04-04 23:45 by lqwchd
[¿¼ÑÐ] Äܶ¯µ÷¼Á326ר˶ +4 wan112233 2026-04-04 4/200 2026-04-04 22:47 by yu221
[¿¼ÑÐ] ¿É¿çרҵµ÷¼Á +3 ÖÜµÄµÃµØ 2026-04-04 6/300 2026-04-04 22:21 by barlinike
[¿¼ÑÐ] »·¾³285·Ö£¬¹ýÁù¼¶£¬Çóµ÷¼Á +10 xhr12 2026-04-02 10/500 2026-04-04 21:53 by bn53987
[¿¼ÑÐ] 296²ÄÁÏר˶Çóµ÷¼Á +21 202451007219 2026-04-02 22/1100 2026-04-04 21:48 by hemengdong
[¿¼ÑÐ] 298Çóµ÷¼Á +5 zzz£¬£¬r 2026-04-02 8/400 2026-04-04 19:55 by À¶ÔÆË¼Óê
[¿¼ÑÐ] 278Çóµ÷¼Á +6 Yy7400 2026-04-03 6/300 2026-04-04 09:53 by zhangdingwa
[¿¼ÑÐ] 266Çóµ÷¼Á +8 ѧԱ97LZgn 2026-04-03 8/400 2026-04-04 09:02 by 20021109
[¿¼ÑÐ] ²ÄÁϵ÷¼Á +4 Ò»ÑùYWY 2026-04-03 4/200 2026-04-03 09:48 by À¶ÔÆË¼Óê
[¿¼ÑÐ] µ÷¼Á +3 ºÃºÃ¶ÁÊé¡£ 2026-04-01 6/300 2026-04-02 15:49 by liumengping
[¿¼ÑÐ] ²ÄÁÏרҵÇóµ÷¼Á +10 ÔÂÔÂÄñľ 2026-04-01 10/500 2026-04-02 12:57 by wxiongid
[¿¼ÑÐ] Ò»Ö¾Ô¸9³õÊÔ366 ±¾Ë«·ÇÇóµ÷¼Á +4 ÔËÆøÀ´µÃÈôÓÐËÆÎ 2026-04-02 4/200 2026-04-02 09:56 by guanxin1001
[¿¼ÑÐ] 0710ÉúÎïѧ£¬325Çóµ÷¼Á +3 mkkkkkl 2026-04-01 3/150 2026-04-02 09:48 by Jaylen.
ÐÅÏ¢Ìáʾ
ÇëÌî´¦ÀíÒâ¼û