Содержание документа: Межгосударственный стандарт ГОСТ 30319.3-96 "Газ природный. Методы расчета физических свойств. Определение физических свойств по уравнению состояния" (введен в действие постановлением Государственного комитета РФ по стандартизации, метрологии и сертификац

1 Назначение и область применения

2 Нормативные ссылки

3 Уравнение состояния природного газа

3.1 Вид уравнения состояния

3.2 Пределы применения уравнения состояния и погре...

4.2 Определение показателя адиабаты

1 k = 1 l = 0 kl п п

2 k = 1 l = 0 kl п п

3 k = 1 l = 0 kl п п

4.3 Определение скорости звука

4.4 Определение динамической вязкости

5 Вычисление погрешности расчета физических свойст...

6 Применение уравнения состояния для аттестации др...

200 WRITE(*,300)

300 FORMAT(18(/))

1 FORMAT(' Введите исходные данные для расчета.'/)

35 FORMAT(' Введите 0, если состав задан в молярны...

33 FORMAT(' Значение объемной доли, в об.%')

3 FORMAT(' Значение молярной доли, в мол.%')

5 YC(I)=YC(I)/100.

500 WRITE(*,100)

100 FORMAT(25(/))

13 ETAP(J,K)=ETAP(J+1 ,K)

19 ETAP(K,I)=ETAP(K,I+1)

44 FORMAT(//' Устройство вывода результатов расчет...

100 FORMAT(25(/))

88 FORMAT(A58/A39/)

3 FORMAT(' Содержание в мол.%')

33 FORMAT(' Содержание в об.%')

5 FORMAT(2(A26,F7.4))

17 FORMAT('----------',6A9)

19 FORMAT(' |',А28)

21 FORMAT(' p, МПа ',6А9)

23 FORMAT(10X,6(:,' |',F6.2))

66 FORMAT(/' Назначить другое устройство вывода ?'...

23 CPC(J,I)=CPC(J,NI(I))

27 B(I,J)=AIJ(I,J)+BIJ(I,J)*PIM

100 YI(I)=YC(I)

67 YS1=YS1+YI(I)

69 YS2=YS2+YI(I)

7 ROM=ROM+YI(I)*ROI(I)

9 GI(I)=YI(I)*ROI(I)/ROM

11 SUM=SUM+GI(I)/BMI(I)

13 YI(I)=GI(I)*SUM/BMI(I)

551 Y(I)=Y(I)/YSUM

1 DIJ(I,J)=0.D0

1 V13(I)=VC(I)**(1.D0/3.D0)

5 TCM=TCM+Y(I)*Y(J)*VCIJ(I,J)*TCIJ(I,J)**2

4 CALL COMPL(X,T,NPRIZ)

1 BK(I)=BK(I)+B(I,J)/TR**(J-1)

3 A3=A3+(J-1)*(2-J)*D1/I

9 S2=S2+CPC(J+1,I)*TAU**J

7 IF(N.EQ.0)GO TO 11

13 S3=S3+CPC(M+J+1,I)/TAU**J

11 CPO(I)=S1+S2+S3

21 CVOS=CVOS+Y(I)*CVO(I)