I am trying to turn cosp on in cesm1_2_1
I am getting a compile error in
/glade/p/cesmdata/cseg/collections/cesm1_2_1/models/atm/cam/src/physics/icarus-scops/congvec.f
mpiifort -I. -I/glade/scratch/hannay/f.e12.F2000C5.f09_f09.cosp_bug.001/bld/pio -I/glade/apps/opt/netcdf/4.3.0/intel/13.0.1/include -I/glade/apps/opt/pnetcdf/1.3.0/intel/default/include -I/glade/scratch/hannay/f.e12.F2000C5.f09_f09.cosp_bug.001/bld/mct/mct -I/glade/scratch/hannay/f.e12.F2000C5.f09_f09.cosp_bug.001/bld/mct/mpeu -I/glade/scratch/hannay/f.e12.F2000C5.f09_f09.cosp_bug.001/bld/pio -I/glade/scratch/hannay/f.e12.F2000C5.f09_f09.cosp_bug.001/bld/gptl -I/glade/p/cesmdata/cseg/collections/cesm1_2_1/models/utils/pio -I/glade/scratch/hannay/f.e12.F2000C5.f09_f09.cosp_bug.001/bld/lib/include -I. -I/glade/p/work/hannay/my_cases/f.e12.F2000C5.f09_f09.cosp_bug.001/SourceMods/src.cam -I/glade/p/cesmdata/cseg/collections/cesm1_2_1/models/atm/cam/src/chemistry/pp_trop_mam3 -I/glade/p/cesmdata/cseg/collections/cesm1_2_1/models/atm/cam/src/chemistry/modal_aero -I/glade/p/cesmdata/cseg/collections/cesm1_2_1/models/atm/cam/src/chemistry/mozart -I/glade/p/cesmdata/cseg/collections/cesm1_2_1/models/atm/cam/src/chemistry/bulk_aero -I/glade/p/cesmdata/cseg/collections/cesm1_2_1/models/atm/cam/src/chemistry/utils -I/glade/p/cesmdata/cseg/collections/cesm1_2_1/models/atm/cam/src/physics/rrtmg -I/glade/p/cesmdata/cseg/collections/cesm1_2_1/models/atm/cam/src/physics/rrtmg/ext/rrtmg_mcica -I/glade/p/cesmdata/cseg/collections/cesm1_2_1/models/atm/cam/src/physics/rrtmg/ext/rrtmg_lw -I/glade/p/cesmdata/cseg/collections/cesm1_2_1/models/atm/cam/src/physics/rrtmg/ext/rrtmg_sw -I/glade/p/cesmdata/cseg/collections/cesm1_2_1/models/atm/cam/src/physics/cam -I/glade/p/cesmdata/cseg/collections/cesm1_2_1/models/atm/cam/src/dynamics/fv -I/glade/p/cesmdata/cseg/collections/cesm1_2_1/models/atm/cam/src/utils/pilgrim -I/glade/p/cesmdata/cseg/collections/cesm1_2_1/models/atm/cam/src/cpl_mct -I/glade/p/cesmdata/cseg/collections/cesm1_2_1/models/atm/cam/src/cpl_share -I/glade/p/cesmdata/cseg/collections/cesm1_2_1/models/atm/cam/src/control -I/glade/p/cesmdata/cseg/collections/cesm1_2_1/models/atm/cam/src/utils -I/glade/p/cesmdata/cseg/collections/cesm1_2_1/models/atm/cam/src/physics/cosp -I/glade/p/cesmdata/cseg/collections/cesm1_2_1/models/atm/cam/src/physics/icarus-scops -I/glade/p/cesmdata/cseg/collections/cesm1_2_1/models/atm/cam/src/physics/cosp/quickbeam -I/glade/p/cesmdata/cseg/collections/cesm1_2_1/models/atm/cam/src/physics/cosp/actsim -I/glade/p/cesmdata/cseg/collections/cesm1_2_1/models/atm/cam/src/physics/cosp/llnl -I/glade/p/cesmdata/cseg/collections/cesm1_2_1/models/atm/cam/src/physics/cosp/MISR_simulator -I/glade/p/cesmdata/cseg/collections/cesm1_2_1/models/atm/cam/src/physics/cosp/MODIS_simulator -I/glade/scratch/hannay/f.e12.F2000C5.f09_f09.cosp_bug.001/bld/lib/include -free -O2 -fp-model source -convert big_endian -assume byterecl -ftz -traceback -xHost -openmp -DCO2A -DMAXPATCH_PFT=numpft+1 -DLSMLAT=1 -DLSMLON=1 -DPLON=288 -DPLAT=192 -DPLEV=30 -DPCNST=25 -DPCOLS=16 -DPSUBCOLS=1 -DPTRM=1 -DPTRN=1 -DPTRK=1 -DSTAGGERED -DSPMD -DMODAL_AERO -DMODAL_AERO_3MODE -DUSE_COSP -DLINUX -DMCT_INTERFACE -DHAVE_MPI -DTHREADED_OMP -DFORTRANUNDERSCORE -DNO_R16 -DHAVE_NANOTIME -DLINUX -DCPRINTEL -DHAVE_SLASHPROC -r8 -c /glade/p/cesmdata/cseg/collections/cesm1_2_1/models/atm/cam/src/physics/cosp/actsim/lidar_simulator.F90
/glade/p/cesmdata/cseg/collections/cesm1_2_1/models/atm/cam/src/physics/icarus-scops/congvec.f(60): error #5082: Syntax error, found END-OF-FILE when expecting one of: ; BLOCK BLOCKDATA PROGRAM MODULE TYPE INTEGER REAL ...
^
/glade/p/cesmdata/cseg/collections/cesm1_2_1/models/atm/cam/src/physics/icarus-scops/congvec.f(39): error #6385: The highest data type rank permitted is INTEGER(KIND=8). [BIGENDIAN]
if (bigendian) then
--------------^
/glade/p/cesmdata/cseg/collections/cesm1_2_1/models/atm/cam/src/physics/icarus-scops/congvec.f(39): error #6341: A logical data type is required in this context. [BIGENDIAN]
if (bigendian) then
--------------^
/glade/p/cesmdata/cseg/collections/cesm1_2_1/models/atm/cam/src/physics/icarus-scops/congvec.f(41): error #6410: This name has not been declared as an array or a function. [SEED]
seed(irand)=transfer(ishft(69069_i8*seed(irand)+1234567,
-------------^
/glade/p/cesmdata/cseg/collections/cesm1_2_1/models/atm/cam/src/physics/icarus-scops/congvec.f(41): error #6975: A kind-param must be a digit-string or a scalar-int-constant-name [I8]
seed(irand)=transfer(ishft(69069_i8*seed(irand)+1234567,
----------------------------------------------^
/glade/p/cesmdata/cseg/collections/cesm1_2_1/models/atm/cam/src/physics/icarus-scops/congvec.f(41): warning #7319: This argument's data type is incompatible with this intrinsic procedure; procedure assumed EXTERNAL. [ISHFT]
seed(irand)=transfer(ishft(69069_i8*seed(irand)+1234567,
------------------------------------------------------------^
/glade/p/cesmdata/cseg/collections/cesm1_2_1/models/atm/cam/src/physics/icarus-scops/congvec.f(42): error #6363: The intrinsic data types of the arguments must be the same. [ISHFT]
& bit_size(1)),1)
----------------------------------------^
/glade/p/cesmdata/cseg/collections/cesm1_2_1/models/atm/cam/src/physics/icarus-scops/congvec.f(45): error #6423: This name has already been used as an external function name. [SEED]
seed(irand)=transfer(69069_i8*seed(irand)+1234567,1)
-------------^
/glade/p/cesmdata/cseg/collections/cesm1_2_1/models/atm/cam/src/physics/icarus-scops/congvec.f(45): error #6515: This function, which is specified as the left side of an assignment statement, is invalid. [SEED]
seed(irand)=transfer(69069_i8*seed(irand)+1234567,1)
-------------^
/glade/p/cesmdata/cseg/collections/cesm1_2_1/models/atm/cam/src/physics/icarus-scops/congvec.f(45): error #6975: A kind-param must be a digit-string or a scalar-int-constant-name [I8]
seed(irand)=transfer(69069_i8*seed(irand)+1234567,1)
.....
compilation aborted for /glade/p/cesmdata/cseg/collections/cesm1_2_1/models/atm/cam/src/physics/icarus-scops/congvec.f
I am getting a compile error in
/glade/p/cesmdata/cseg/collections/cesm1_2_1/models/atm/cam/src/physics/icarus-scops/congvec.f
mpiifort -I. -I/glade/scratch/hannay/f.e12.F2000C5.f09_f09.cosp_bug.001/bld/pio -I/glade/apps/opt/netcdf/4.3.0/intel/13.0.1/include -I/glade/apps/opt/pnetcdf/1.3.0/intel/default/include -I/glade/scratch/hannay/f.e12.F2000C5.f09_f09.cosp_bug.001/bld/mct/mct -I/glade/scratch/hannay/f.e12.F2000C5.f09_f09.cosp_bug.001/bld/mct/mpeu -I/glade/scratch/hannay/f.e12.F2000C5.f09_f09.cosp_bug.001/bld/pio -I/glade/scratch/hannay/f.e12.F2000C5.f09_f09.cosp_bug.001/bld/gptl -I/glade/p/cesmdata/cseg/collections/cesm1_2_1/models/utils/pio -I/glade/scratch/hannay/f.e12.F2000C5.f09_f09.cosp_bug.001/bld/lib/include -I. -I/glade/p/work/hannay/my_cases/f.e12.F2000C5.f09_f09.cosp_bug.001/SourceMods/src.cam -I/glade/p/cesmdata/cseg/collections/cesm1_2_1/models/atm/cam/src/chemistry/pp_trop_mam3 -I/glade/p/cesmdata/cseg/collections/cesm1_2_1/models/atm/cam/src/chemistry/modal_aero -I/glade/p/cesmdata/cseg/collections/cesm1_2_1/models/atm/cam/src/chemistry/mozart -I/glade/p/cesmdata/cseg/collections/cesm1_2_1/models/atm/cam/src/chemistry/bulk_aero -I/glade/p/cesmdata/cseg/collections/cesm1_2_1/models/atm/cam/src/chemistry/utils -I/glade/p/cesmdata/cseg/collections/cesm1_2_1/models/atm/cam/src/physics/rrtmg -I/glade/p/cesmdata/cseg/collections/cesm1_2_1/models/atm/cam/src/physics/rrtmg/ext/rrtmg_mcica -I/glade/p/cesmdata/cseg/collections/cesm1_2_1/models/atm/cam/src/physics/rrtmg/ext/rrtmg_lw -I/glade/p/cesmdata/cseg/collections/cesm1_2_1/models/atm/cam/src/physics/rrtmg/ext/rrtmg_sw -I/glade/p/cesmdata/cseg/collections/cesm1_2_1/models/atm/cam/src/physics/cam -I/glade/p/cesmdata/cseg/collections/cesm1_2_1/models/atm/cam/src/dynamics/fv -I/glade/p/cesmdata/cseg/collections/cesm1_2_1/models/atm/cam/src/utils/pilgrim -I/glade/p/cesmdata/cseg/collections/cesm1_2_1/models/atm/cam/src/cpl_mct -I/glade/p/cesmdata/cseg/collections/cesm1_2_1/models/atm/cam/src/cpl_share -I/glade/p/cesmdata/cseg/collections/cesm1_2_1/models/atm/cam/src/control -I/glade/p/cesmdata/cseg/collections/cesm1_2_1/models/atm/cam/src/utils -I/glade/p/cesmdata/cseg/collections/cesm1_2_1/models/atm/cam/src/physics/cosp -I/glade/p/cesmdata/cseg/collections/cesm1_2_1/models/atm/cam/src/physics/icarus-scops -I/glade/p/cesmdata/cseg/collections/cesm1_2_1/models/atm/cam/src/physics/cosp/quickbeam -I/glade/p/cesmdata/cseg/collections/cesm1_2_1/models/atm/cam/src/physics/cosp/actsim -I/glade/p/cesmdata/cseg/collections/cesm1_2_1/models/atm/cam/src/physics/cosp/llnl -I/glade/p/cesmdata/cseg/collections/cesm1_2_1/models/atm/cam/src/physics/cosp/MISR_simulator -I/glade/p/cesmdata/cseg/collections/cesm1_2_1/models/atm/cam/src/physics/cosp/MODIS_simulator -I/glade/scratch/hannay/f.e12.F2000C5.f09_f09.cosp_bug.001/bld/lib/include -free -O2 -fp-model source -convert big_endian -assume byterecl -ftz -traceback -xHost -openmp -DCO2A -DMAXPATCH_PFT=numpft+1 -DLSMLAT=1 -DLSMLON=1 -DPLON=288 -DPLAT=192 -DPLEV=30 -DPCNST=25 -DPCOLS=16 -DPSUBCOLS=1 -DPTRM=1 -DPTRN=1 -DPTRK=1 -DSTAGGERED -DSPMD -DMODAL_AERO -DMODAL_AERO_3MODE -DUSE_COSP -DLINUX -DMCT_INTERFACE -DHAVE_MPI -DTHREADED_OMP -DFORTRANUNDERSCORE -DNO_R16 -DHAVE_NANOTIME -DLINUX -DCPRINTEL -DHAVE_SLASHPROC -r8 -c /glade/p/cesmdata/cseg/collections/cesm1_2_1/models/atm/cam/src/physics/cosp/actsim/lidar_simulator.F90
/glade/p/cesmdata/cseg/collections/cesm1_2_1/models/atm/cam/src/physics/icarus-scops/congvec.f(60): error #5082: Syntax error, found END-OF-FILE when expecting one of: ; BLOCK BLOCKDATA PROGRAM MODULE TYPE INTEGER REAL ...
^
/glade/p/cesmdata/cseg/collections/cesm1_2_1/models/atm/cam/src/physics/icarus-scops/congvec.f(39): error #6385: The highest data type rank permitted is INTEGER(KIND=8). [BIGENDIAN]
if (bigendian) then
--------------^
/glade/p/cesmdata/cseg/collections/cesm1_2_1/models/atm/cam/src/physics/icarus-scops/congvec.f(39): error #6341: A logical data type is required in this context. [BIGENDIAN]
if (bigendian) then
--------------^
/glade/p/cesmdata/cseg/collections/cesm1_2_1/models/atm/cam/src/physics/icarus-scops/congvec.f(41): error #6410: This name has not been declared as an array or a function. [SEED]
seed(irand)=transfer(ishft(69069_i8*seed(irand)+1234567,
-------------^
/glade/p/cesmdata/cseg/collections/cesm1_2_1/models/atm/cam/src/physics/icarus-scops/congvec.f(41): error #6975: A kind-param must be a digit-string or a scalar-int-constant-name [I8]
seed(irand)=transfer(ishft(69069_i8*seed(irand)+1234567,
----------------------------------------------^
/glade/p/cesmdata/cseg/collections/cesm1_2_1/models/atm/cam/src/physics/icarus-scops/congvec.f(41): warning #7319: This argument's data type is incompatible with this intrinsic procedure; procedure assumed EXTERNAL. [ISHFT]
seed(irand)=transfer(ishft(69069_i8*seed(irand)+1234567,
------------------------------------------------------------^
/glade/p/cesmdata/cseg/collections/cesm1_2_1/models/atm/cam/src/physics/icarus-scops/congvec.f(42): error #6363: The intrinsic data types of the arguments must be the same. [ISHFT]
& bit_size(1)),1)
----------------------------------------^
/glade/p/cesmdata/cseg/collections/cesm1_2_1/models/atm/cam/src/physics/icarus-scops/congvec.f(45): error #6423: This name has already been used as an external function name. [SEED]
seed(irand)=transfer(69069_i8*seed(irand)+1234567,1)
-------------^
/glade/p/cesmdata/cseg/collections/cesm1_2_1/models/atm/cam/src/physics/icarus-scops/congvec.f(45): error #6515: This function, which is specified as the left side of an assignment statement, is invalid. [SEED]
seed(irand)=transfer(69069_i8*seed(irand)+1234567,1)
-------------^
/glade/p/cesmdata/cseg/collections/cesm1_2_1/models/atm/cam/src/physics/icarus-scops/congvec.f(45): error #6975: A kind-param must be a digit-string or a scalar-int-constant-name [I8]
seed(irand)=transfer(69069_i8*seed(irand)+1234567,1)
.....
compilation aborted for /glade/p/cesmdata/cseg/collections/cesm1_2_1/models/atm/cam/src/physics/icarus-scops/congvec.f