| 1 | module mod_prism |
|---|
| 2 | |
|---|
| 3 | ! !USES: |
|---|
| 4 | use mod_oasis_kinds ,only: ip_single_p |
|---|
| 5 | use mod_oasis_kinds ,only: ip_double_p |
|---|
| 6 | use mod_oasis_kinds ,only: ip_realwp_p |
|---|
| 7 | use mod_oasis_kinds ,only: ll_single |
|---|
| 8 | use mod_oasis_kinds ,only: ip_i2_p |
|---|
| 9 | use mod_oasis_kinds ,only: ip_i4_p |
|---|
| 10 | use mod_oasis_kinds ,only: ip_i8_p |
|---|
| 11 | use mod_oasis_kinds ,only: ip_intwp_p |
|---|
| 12 | |
|---|
| 13 | use mod_oasis_parameters |
|---|
| 14 | |
|---|
| 15 | USE mod_oasis_namcouple ,ONLY: namflddti |
|---|
| 16 | |
|---|
| 17 | USE mod_oasis_auxiliary_routines ,ONLY: prism_get_ncpl_proto => oasis_get_ncpl |
|---|
| 18 | USE mod_oasis_auxiliary_routines ,ONLY: prism_get_freqs_proto => oasis_get_freqs |
|---|
| 19 | USE mod_oasis_auxiliary_routines ,ONLY: prism_put_inquire_proto => oasis_put_inquire |
|---|
| 20 | |
|---|
| 21 | use mod_oasis_method ,only: prism_init_comp_proto => oasis_init_comp |
|---|
| 22 | use mod_oasis_method ,only: prism_terminate_proto => oasis_terminate |
|---|
| 23 | use mod_oasis_method ,only: prism_get_localcomm_proto => oasis_get_localcomm |
|---|
| 24 | use mod_oasis_method ,only: prism_set_couplcomm => oasis_set_couplcomm |
|---|
| 25 | use mod_oasis_method ,only: prism_create_couplcomm => oasis_create_couplcomm |
|---|
| 26 | use mod_oasis_method ,only: prism_get_intracomm => oasis_get_intracomm |
|---|
| 27 | use mod_oasis_method ,only: prism_get_intercomm => oasis_get_intercomm |
|---|
| 28 | use mod_oasis_method, only: prism_set_debug => oasis_set_debug |
|---|
| 29 | use mod_oasis_method, only: prism_get_debug => oasis_get_debug |
|---|
| 30 | use mod_oasis_method ,only: prism_enddef_proto => oasis_enddef |
|---|
| 31 | |
|---|
| 32 | use mod_oasis_part ,only: prism_def_partition_proto => oasis_def_partition |
|---|
| 33 | |
|---|
| 34 | use mod_oasis_var ,only: prism_def_var_proto => oasis_def_var |
|---|
| 35 | |
|---|
| 36 | use mod_oasis_getput_interface ,only: prism_get_proto => oasis_get |
|---|
| 37 | use mod_oasis_getput_interface ,only: prism_put_proto => oasis_put |
|---|
| 38 | |
|---|
| 39 | use mod_oasis_grid ,only: prism_start_grids_writing => oasis_start_grids_writing |
|---|
| 40 | use mod_oasis_grid ,only: prism_write_grid => oasis_write_grid |
|---|
| 41 | USE mod_oasis_grid ,ONLY: prism_write_angle => oasis_write_angle |
|---|
| 42 | use mod_oasis_grid ,only: prism_write_corner => oasis_write_corner |
|---|
| 43 | use mod_oasis_grid ,only: prism_write_mask => oasis_write_mask |
|---|
| 44 | use mod_oasis_grid ,only: prism_write_area => oasis_write_area |
|---|
| 45 | use mod_oasis_grid ,only: prism_terminate_grids_writing => oasis_terminate_grids_writing |
|---|
| 46 | |
|---|
| 47 | use mod_oasis_sys ,only: prism_abort_proto => oasis_abort |
|---|
| 48 | |
|---|
| 49 | implicit none |
|---|
| 50 | |
|---|
| 51 | !=============================================================================== |
|---|
| 52 | |
|---|
| 53 | end module mod_prism |
|---|
