| File |
Line number |
Procedure |
Code |
|
./pkg/aim_v23/aim_do_co2.F |
113 |
AIM_DO_CO2 |
READ(iUnit,rec=1) tmpco2 |
|
./pkg/aim_v23/aim_do_co2.F |
116 |
AIM_DO_CO2 |
CALL MDS_BYTESWAPR8( 2, tmpco2 ) |
|
./pkg/aim_v23/aim_do_co2.F |
119 |
AIM_DO_CO2 |
Atm_CO2_Moles = tmpco2(1) |
|
./pkg/aim_v23/aim_do_co2.F |
120 |
AIM_DO_CO2 |
atpco2_check = tmpco2(2) |
|
./pkg/aim_v23/aim_do_co2.F |
161 |
AIM_DO_CO2 |
tmpco2(1)= Atm_CO2_Moles |
|
./pkg/aim_v23/aim_do_co2.F |
162 |
AIM_DO_CO2 |
tmpco2(2)= atm_pCO2 |
|
./pkg/aim_v23/aim_do_co2.F |
163 |
AIM_DO_CO2 |
WRITE(iUnit,rec=1) tmpco2 |
|
./pkg/aim_v23/aim_do_co2.F |
52 |
AIM_DO_CO2 |
Real*8 tmpco2(2) |