Dear all
I have a problem.
Now, I am running a regcm3 using the SST_A1B_1_2001010100_2029123118 from regcm3 global datasets.
I was endded successfuly until 2000.
I want to run from 2001 to 2030.
The period of run time of EH5RF is for 'RF' run, from 1930 to 2001, 864 months, for 'A2' and 'B2' run, from 2030 to 2100, 852 months in SST_EH50M.f file.
I change date of SST_EH50M.f.
ELSE IF(SSTTYP.EQ.'EH5A2') THEN
there=.false.
IF((IDATE1.GE.2001010100.AND.IDATE1.LE.2029123118).OR.
& (IDATE2.GE.2001010100.AND.IDATE2.LE.2029123118)) THEN
inquire(file='../DATA/SST
/SST_A2_1_2001010100_2029123118'
& ,exist=there)
if(.not.there) then
print *, 'SST_A2_1_2001010100_2029123118 is not available'
& , ' under ../DATA/SST/'
ELSE IF(IDATE.GE.2001010100.AND.IDATE.LE.2029123118) THEN
open(11,file='../DATA/SST/SST_A2_1_2001010100_2029123118'
& ,form='unformatted'
&nb
sp; & ,recl=(192*96/2+4)*ibyte,access='direct')
it_base=0
But, there are some error message
[root@localhost ICBC]# ./icbc.x
rm -f *.o SST SST_FVGCM SST_EH5OM ERAHI_HT ERAHI_PS ERAHI_T ERAHI_Q ERAHI_U ERAHI_V ICBC
pgf90 -byteswapio -c SST_EH5OM.f
pgf90 -byteswapio -o SST_EH5OM SST_EH5OM.o
Segmentation fault
pgf90 -byteswapio -c ICBC.f
pgf90 -byteswapio -o ICBC ICBC.o -L../../Commons/env/liblinuxamd64/ -lnetcdf
NREC = 289276
NSTART,NNNEND: 77438 92045
IDATE1,IDATE2: 2001010106 2011010100
READ IN fields at DATE: 2001010106 from ATM.2001010100
GLONMN,ALONMN,ALONMX,GLONMX =
99.23546 123.0228 132.4791 150.5493
GLATMN,ALATMN,ALATMX,GLATMX =
24.72374 32.92353 40.19521 50.26548
SST file is not the right one
12
How can I change the code of SST_EH50M.f file or obtain new code?
Anebody know this problems.
Teach me
Thanks
>Sanghun Lee, Ph.D.
>E-mail: sanghunchang@hotmail.com