24 lines
		
	
	
		
			644 B
		
	
	
	
		
			Python
		
	
	
	
	
	
		
		
			
		
	
	
			24 lines
		
	
	
		
			644 B
		
	
	
	
		
			Python
		
	
	
	
	
	
| 
								 | 
							
								import pytest
							 | 
						||
| 
								 | 
							
								
							 | 
						||
| 
								 | 
							
								import numpy as np
							 | 
						||
| 
								 | 
							
								
							 | 
						||
| 
								 | 
							
								from . import util
							 | 
						||
| 
								 | 
							
								
							 | 
						||
| 
								 | 
							
								
							 | 
						||
| 
								 | 
							
								@pytest.mark.slow
							 | 
						||
| 
								 | 
							
								class TestCommonBlock(util.F2PyTest):
							 | 
						||
| 
								 | 
							
								    sources = [util.getpath("tests", "src", "common", "block.f")]
							 | 
						||
| 
								 | 
							
								
							 | 
						||
| 
								 | 
							
								    def test_common_block(self):
							 | 
						||
| 
								 | 
							
								        self.module.initcb()
							 | 
						||
| 
								 | 
							
								        assert self.module.block.long_bn == np.array(1.0, dtype=np.float64)
							 | 
						||
| 
								 | 
							
								        assert self.module.block.string_bn == np.array("2", dtype="|S1")
							 | 
						||
| 
								 | 
							
								        assert self.module.block.ok == np.array(3, dtype=np.int32)
							 | 
						||
| 
								 | 
							
								
							 | 
						||
| 
								 | 
							
								
							 | 
						||
| 
								 | 
							
								class TestCommonWithUse(util.F2PyTest):
							 | 
						||
| 
								 | 
							
								    sources = [util.getpath("tests", "src", "common", "gh19161.f90")]
							 | 
						||
| 
								 | 
							
								
							 | 
						||
| 
								 | 
							
								    def test_common_gh19161(self):
							 | 
						||
| 
								 | 
							
								        assert self.module.data.x == 0
							 |